Насколько я понял из прочтения этих манов там без HTTP::Request->new(GET $url) не обойтись. В принципе вот этот код выдает то, что нужно:
my $ua = LWP::UserAgent->new();
my $req = HTTP::Request->new(GET => $url);
my $response = $ua->request($req);
printf "%s", $response->base();
но я так и не понял скачивает ли он при этом файл или нет. Судя по продолжительности ответа - скачивает. Кто-нить подскажет так ли это? И как подправить, чтобы не скачивал?