use strict; use warnings; use 5.010; 
use WWW::Mechanize;
my $mech = WWW::Mechanize->new( autocheck => 1 );
$mech->get( "https://www.example.com" );
print $mech->content;