I do not know why LWP is not following the redirection.
$ perldoc LWP::UserAgent |ack -i redir
max_redirect 7
requests_redirectable ['GET', 'HEAD']
$ua->max_redirect
$ua->max_redirect( $n )
redirection responses in a given request cycle.
method and the response is a redirect elsewhere which is in tu
+rn a
redirect, and so on seven times, then LWP gives up after that
$ua->requests_redirectable
$ua->requests_redirectable( \@requests )
"$ua->redirect_ok(...)" will allow redirection for. By default
+, this
push @{ $ua->requests_redirectable }, 'POST';
received, but before any redirect handling is attempted. T
+he
response_redirect => sub { my($response, $ua, $h) = @_; ... }
The request() method will process redirects and authentication
to handle redirects or authentication responses. The request()
$ua->redirect_ok( $prospective_request, $response )
redirection to the request in $response. This should return a
+TRUE
value if this redirection is permissible. The $prospective_req
+uest
the object's "requests_redirectable" list, FALSE if the propos
+ed
redirection is to a "file://..." URL, and TRUE otherwise.