package My::Mech; # My::Mech is a subclass of WWW::Mechanize use base qw(WWW::Mechanize); # always allow redirects, irrespective of # request_redirectable sub redirect_ok { return 1; }