все равно сообщение не отсылается

попробуй
'submission[msg_id]'=>'',
'submission[message]'=>'how',

так

$req = HTTP::Request->new (GET => $url . "?code=$name&month" .$pairs[0]);
$req->content_type ('text/html');
$res = $ua->request ($req);
die "Can't get url $url: " . $res->status_line . "\n" unless $res->is_success;
$content = $res->content;
open $OUT, '>','/var/www/res/'.$name. '.txt';
print $OUT decode('KOI8-R',$content);
#print $OUT $content;
close $OUT;


вот кусок кода из скрипта,суть такова что скрипт выдергивает данные и пихает их в файл,соответственно чтоб файл нормально читался в Винде необходимо сделать конверт формата из никсов под вынь
собственно делаю
$content= ~s/\n/\r\n/;
на выходе получаю пустой файл (
пробовал s и m и ~m
Что не так?
можно тупо в консоле прописать perl -pi -e 's/\n/\r\n/;' *.txt но это не удобно

ХЭЛПППП!!!!!!!!!!

делай вывод ответа с сервака через print -- и анализируй что он тебе пишет - сначала авторизацию потом постинг и тд - все должно воркать-пока сам не разберешся ничего небуит-наберайся опыта

А как в Perl написать email адес, чтобы он его правильно понял. А то он мне что то парит типа.
Что это значит?

строку 38 покажи

Всё. сорри. Он же не понимает правильно "@" - ему надо "%40"

кто? все телепаты уже спят

Perl не понимает символ "@", как надо. Он же считает, что это к массиву относится. поэтому вместо "@" - "%40"!