Как отправить ICQ сообщение через PHP?

Можно легко переделать в программу отправки сообщений на пейджер (например через page.gate.ru), SMS и другое. При умении анализировать ответ сервера, можно выредать анекдоты c anecdot.ru или курс доллара с rbc.ru. Здесь лишь минимум для задачи:

• сформировать запрос из разных полей
• открыть сокет
• записать запроc

<?php
flush();
// поля надо заполнить
$from='Dmitry';
$fromemail='mail@mail.ru';
$subject='сабж';
$to='00000000';// <-- номер. (Уверен, что кто-нить не догадается :-)
$body='само сообщение';
$submit='Send Message';// don't edit
$ref="http://wwp.icq.com/$to";// don't edit
// формирование заголовка
$PostData=
'from='.urlencode($from).'&'.
'fromemail='.urlencode($frommail).'&'.
'subject='.urlencode($subject).'&'.
'body='.urlencode($body).'&'.
'to='.urlencode($to).'&'.
'submit='.urlencode($submit);
$len=strlen($PostData);
$nn="\r\n";
$zapros=
'POST /scripts/WWPMsg.dll HTTP/1.0'.$nn.
'Referer: '.$ref.$nn.
'Content-Type: application/x-www-form-urlencoded'.$nn.
'Content-Length: '.$len.$nn.
'Host: wwp.icq.com'.$nn.
'Accept: */*'.$nn.
'Accept-Encoding: gzip, deflate'.$nn.
'Connection: Keep-Alive'.$nn.
'User-Agent: Mozilla/4.0 (compatible; MSIE 5.01; Windows NT)'.$nn.
$nn.$PostData;
echo $zapros."\n\n".'-------------'."\n\n\n";
flush();
// открываем сокет и шлем заголовок
$fp=fsockopen('wwp.icq.com',80,&$errno,&$errstr,30);
if (!$fp) { echo $errstr.'($errno)<br />'."\n"; exit; }
// для наглядности выводим заголовок ответа и страницу на экран
fputs($fp,$zapros);
echo fgets($fp,20048);
fclose($fp);
?>