use strict;
use WWW::Mechanize;

my $mech = WWW::Mechanize->new;

$mech->get("http://www.perlmonks.org", ':content_file' => "perlmonks.html");