Ploximeth

<?
$sock = fsockopen("irc.inaki.name", 6667, $errno, $errstr, 30);
if (!$sock) { die("Failed to open sock\n"); }
write($sock, "NICK PHPFox\r\n");
write($sock, "USER PHPFox \"\" \"\" :PHPFoxen\r\n");
while (1) { 
	$vartext = fgets($sock);
	$var = explode(' ', $vartext);
	if ($var[0] == "PING") { write($sock, "PONG $var[1]\r\n"); }
	if ($var[1] == "005")  { write($sock, "JOIN #magickfox\r\n"); }
	print $vartext;
}

function write($sock, $text) {
	print $text;
	fputs($sock, $text);
}
?>