...читаем из спам-листа мыло в переменную $user...

list($mailuser,$server)=split("@",$user);
getmxrr($server,$a);
теперь в массиве $a - список МХ серверов. выбираем один из них в $mailserv и определяем его ип.

$ip=gethostbyname($mailserv);
$sock=fsockopen($ip,25);
...конект на 25 порт сервера $a...

fwrite($sock, "HELO i-am-cool\r\n");
$str=$str.fgets($sock);
fwrite($sock, "RSET\r\n");
$str=$str.fgets($sock);
fwrite($sock, "MAIL FROM:<".$mailfrom.">\r\n");
$str=$str.fgets($sock);
fwrite($sock, "RCPT TO:<$user>\r\n");
$str=$str.fgets($sock);
fwrite($sock, "DATA\r\n");
$str=$str.fgets($sock);
fwrite($sock,"\r\n"."."."\r\n");
$str=$str.fgets($sock);
fwrite($sock, "QUIT\r\n");
$str=$str.fgets($sock);
fclose($sock);
/* $log=fopen("log.txt","a");
fwrite($log,$str);

... вуаля. сделано...

прочитав толковую мануалку по пхп, сможешь сделать неплохую спамилку... короче, с типя плюсег))