in reply to LWP::UserAgent redirection troubles

Your $ua->request($req) returns an HTTP::Response object, according to the documentation for LWP::UserAgent.

The base method in HTTP::Response does what you want. Here is some example code, without any error checking though:

my $response = $ua->request($req); # Assumes $req is an HTTP::Request + object print $response->base;