$ua->requests_redirectable([]);
####
$ua->requests_redirectable(['GET']);
##
##
my $referral_uri = $response->header('Location');
{
# Some servers erroneously return a relative URL for redirects,
# so make it absolute if it not already is.
local $URI::ABS_ALLOW_RELATIVE_SCHEME = 1;
my $base = $response->base;
$referral_uri = "" unless defined $referral_uri;
$referral_uri
= $HTTP::URI_CLASS->new($referral_uri, $base)->abs($base);
}
$referral->uri($referral_uri);
##
##
base='http://server.com/ABC/afilename1?op=678'
referral='../../ABC/XYZ/KLM/afilename2?aa=123'
##
##
http://server.com/../ABC/XYZ/KLM/afilename2?aa=123
##
##
http://server.com/ABC/XYZ/KLM/afilename2?aa=123