Показать сообщение отдельно

  #642  
Старый 20.07.2008, 18:25
demonoid
Banned
Регистрация: 12.01.2007
Сообщений: 113
Провел на форуме:
4094601

Репутация: 495
По умолчанию

Код:
#!/usr/bin/perl -w

use LWP::UserAgent;
my $ua = new LWP::UserAgent;
my $q = $ua->post( 'http://connect.ua/spotlight?id=317891',
			[  comment_text   => ' ',
			   submit_comment => '%D0%B4%D0%BE%D0%B1%D0%B0%D0%B2%D0%B8%D1%26%2365533%3B%D1%26%2365533%3B',
			] );
 
Ответить с цитированием