use WWW::Mechanize 1.60;
my $mech = WWW::Mechanize->new(qw' autocheck 1 ');
$mech->get( $uri, ':content_file' => $tempfile );