my $mech = WWW::Mechanize->new(); my $response = $mech->get( $url ); $mech->follow_link( n => 1 ); # this is the one in the META tag my $html = $mech->content; ...