my $www_bot = WWW::Robot->new(
   ...
  USERAGENT => LWP::RobotUA->new(requests_redirectable => []),
  ...
);