Автоматическое заполнение форм на другом сайте

народ помогите не работает скрипт, должен добавлять запись в гостевую другого сайта

use  LWP::UserAgent;
use  LWP::Simple;
use  HTTP::Request;
use  HTTP::Request::Common qw(POST);
use  HTTP::Response;
use  HTTP::Headers;
use  HTTP::Cookies;
$url=\'http://narod.yandex.ru/guestbook/index.xhtml?owner=78282\';
 $forminfo = \'your_name=max&your_email=calculateh@mail.ru2&your_url=www.mail.ru&your_message=rgkideghndfjkhnfdjkhgjkfd krehgjkfdg\';
  $UserAgent = new LWP::UserAgent;
  $UserAgent->agent("Mozilla/5.0");
  $Headers = new HTTP::Headers(Referer => $referer);
  $Request = new HTTP::Request(POST => $url, $Headers);
  $Request->content_type(\'application/x-www-form-urlencoded\');
  $Request ->content($forminfo);
  $Response = $UserAgent->request($Request);
  if($Response->is_success) # успешно выполненный запрос
  {
  $text = $Response->content;
  }
open (F,">2.html") || print "МЕРС $_[0] ДКЪ ВРЕМХЪ";
print F $text;
close(F);