История изменений
Исправление Deleted, (текущая версия) :
Я вообще не знаю перл, но правильнее скорее всего будет так:
$ua->setopt( CURLOPT_POSTFIELDS, my $postContent=join('&' => map $ua->escape($_->[0]).'='.$ua->escape($_->[1]), map [each $post], 1..keys $post) );
Исходная версия Deleted, :
Я вообще не знаю перл, но правильнее скорее всего будет так:
$ua->setopt( CURLOPT_POSTFIELDS, my $postContent=join('&' => map $ua->escape($_->[0]).'='.$ua->escape($_->[1]), map [each $post], 1..keys $post) );
[/quote]
А совсем правильно - найти готовую либу с функцией кодирования пар ключ <=> значение в формат, пригодный для http. 100% такая уже есть.