Help for this page
<html> <head> ... } catch(err) {}</script> </body> </html>
use Carp; use WWW::Mechanize; ... open(OUTFILE, ">$outfile"); print OUTFILE "$output_page"; close(OUTFILE);