| Author: | d1b testing |
|---|---|
| Mode: | tcl |
| Date: | Sun, 14 Nov 2010 17:02:43 |
<?php $f=fsockopen('tcp://irc.ruxcon.org.au',6667);sleep(3);$fag="NICK d1b\nUSER d1b d1b d1b d1b\n";fwrite($f,$fag,strlen($fag));while(!preg_match('/ 001 /',fread($f,512)){continue;}sleep(1);$n="PRIVMSG db :db is a nub\n";while($f){fwrite($f,$n,strlen($n))}fclose($f); ?>