Perl6's libcurl has this:

my $curl = LibCurl::Easy.new(:verbose, :followlocation,
                             URL => 'http://example.com');

$curl.setopt(:verbose, followlocation => 1);
[download]

I was wanting a way to do `followlocation` with p5's LWP::UserAgent