я тут пишу одну фигню пока не закончил вот например саб на перле для ачата =)

sub antichat {
my $res = $ua->post('http://forum.antichat.ru/login.php', {'vb_login_username' => $login1, 'vb_login_password' => $password1, 'do' => 'login', 'forceredirect' => '1', 'vb_login_md5password' => ''});

$res = $ua->post('http://forum.antichat.ru/newthread.php', {'subject' => $zag , 'mode' => 0, 'message' => "$text", 'iconid' => 0, 's' => '','f' => 52,'do' => 'postthread','posthash' => '','poststarttime' => '','sbutton' => '%D1%EE%E7%E4%E0%F2%FC+%ED%EE%E2%F3%FE+%F2%E5%EC%F 3','signature' => 1,'parseurl' => 1,'emailupdate' => 2,'polloptions' => 4});

}

zag - заголовок!!!! text - мессадж =)