my $mech = WWW::Mechanize->new(); $mech->get($add); my $r = $mech->content;