The docs for HTTP::Response don't give a method to access the HTTP::Headers object, but it mentions that it's a subclass of HTTP::Message. So we have to take a look at the documentation for HTTP::Message, and there we see that it provides the headers method to give you a reference to the HTTP::Headers object. So assuming $ua is an HTTP::Response object, you'd do something like this:

for my $header (@{$ua->headers->header_field_names}) {
    print $header, ": ", $ua->header($header), "\n";
}
[download]

Note: I don't write web apps, so I've never used the HTTP classes, so this is (of course!) untested. But hopefully it will lead you in the right direction.

...roboticus

I tried that, and I get:

Can't locate object method "headers" via package "LWP::UserAgent" at..
+.
[download]

I also tried:

for my $header (@{$response->headers->header_field_names}) {
    print $header, ": ", $response->header($header), "\n";
}
[download]

and I got:

Can't use string ("29") as an ARRAY ref while "strict refs" in use at.
+..
[download]

OK, then try it like this:

for my $header ($response->headers->header_field_names) {
   ...
}
[download]

...roboticus

The response has the headers so s/ua/response/g