[PERL] Basic auth

[Sharky]

Подскажите как залогиниться испольльзуя перл если на сайте стоть бэйсик авторизация

[Kaimi]

Короче

use LWP::UserAgent;
$ua = LWP::UserAgent->new;
$req = HTTP::Request->new(GET => 'http://www.linpro.no/secret/');
$req->authorization_basic('aas', 'mypassword');
print $ua->request($req)->as_string;

http://search.cpan.org/dist/libwww-perl/lwpcook.pod

[BlackSun]

[rus, pdf] http://pascal.sources.ru/incoming/lwp-spec.zip

[Sharky]

всё спасибо..проблема решина...можно клозед