my $start_page = 'https://www.yahoo.com';#fast
#$start_page = 'https://github.com'; #fast
#$start_page = 'https://metacpan.org'; #fast

my $mech = WWW::Mechanize->new()->get( $start_page );