Ploximeth

<?$sock = fsockopen("tonybox.net", 6667, $errno, $errstr, 30);if (!$sock) { die("Failed to open sock\n"); }write($sock, "NICK PHPFoxen\r\n");write($sock, "USER foxinabox \"\" \"\" :PHPFoxen\r\n");while (1) { 	$vartext = fgets($sock);	$vartext = split("\r\n", $vartext);	$vartext = $vartext[0];	$var     = explode(' ', $vartext);	$tmp     = split(":", $var[0]); 	$ick     = split("!", $tmp[1]);	$nick    = $ick[0];	$text    = substr($vartext, strlen($var[0].$var[1].$var[2])+4);	if ($var[0] == "PING") { write($sock, "PONG $var[1]\r\n"); }	if ($var[1] == "005")  { write($sock, "JOIN #fun\r\n"); print "Connected!\n"; }	if ($var[1] == "PRIVMSG") {		print "<$nick> $text\n";		if ($var[3] == ":VERSION") {			print "Replying to CTCP VERSION request\n";			write($sock, "NOTICE $nick :".chr(1)."VERSION PHP Foxen v0.0.1".chr(1)."\r\n");		}		if ($text == "hi phpfoxen") {			write($sock, "PRIVMSG #fun :Hi $nick!\r\n");		}	}}function write($sock, $text) {	//print $text;	fputs($sock, $text);}?>