my $mech = WWW::Mechanize->new( autocheck => 1 ); eval{$mech->get($url, ':content_file' => $downName);}; if($@){print "Error: $@"; <>;}