Re: Problem: HTTP::Message calls to HTTP::Headers
Gisle Aas (aas@bergen.sn.no)
04 Aug 1997 17:42:32 +0200
Christian Gilmore <cgilmore@research.att.com> writes:
> I'm wondering if someone here might be able to help me out. I've got the
> following snippet of code:
>
> use URI::URL;
> use HTTP::Response;
> use HTTP::Status;
> use LWP::UserAgent;
> use LWP::Simple;
>
> sub get_url {
> my ($url) = shift;
>
> my ($user_agent) = new LWP::UserAgent;
> $user_agent->agent("$Name/$Version");
>
> my ($request) = new HTTP::Request GET => $url;
> my ($result) = $user_agent->request($request);
>
> if ($result->is_success) {
> my ($content) = $result->content;
> my ($headers) = $result->headers;
> return $headers;
> } else {
> my ($code) = $result->code;
> my ($message) = $result->message;
> return "$code: $message";
> }
> }
>
>
> This code gives the following error:
>
> denali.research.att.com% ./get_url.pl http://www.research.att.com/
> Can't locate object method "headers" via package "HTTP::Headers" at
> /weblab/software/packages/perl-5.004_01/lib/HTTP/Message.pm line 172.
>
> The installation of libwww went well, so far as I could tell. Any ideas?
Why do expect the HTTP::Response to have a headers() method? Did you
find it in any of the documentation?
--
Gisle Aas <aas@sn.no>