#!/usr/bin/perl
print "Content-type: text/html; charset=windows-1251
";
use LWP::UserAgent;
$ua = LWP::UserAgent->new;
$res = $ua->request(HTTP::Request->new(GET => "
http://www.kit.com/lwp/print1.pl"));
print $res->as_string, "
";
Здраствуйте, ХЕЛП
Скрипт загружает файл print1.pl, но при этом
Нужно передать скрипту print1.pl куку: например SESSION_ID=SWUSAIETNIWMOJJXACFU;
Подправьте пожалуйста, чтоб работало, на хелп просьба не направлять, - я с
классовой моделью совсем запутался.
Заранее благодарен.