http://www.perlmonks.org?node_id=608603


in reply to Can't get back links from page

Hi, try this,

use strict; use warnings; use WWW::Mechanize; use Data::Dumper; my $mech = WWW::Mechanize->new( autocheck => 1 ); my $url = 'http://www.perlmonks.com/?node_id=608600'; $mech->get( $url ); my @links = $mech->links(); print Dumper @links;

Regards,
Velusamy R.


eval"print uc\"\\c$_\""for split'','j)@,/6%@0%2,`e@3!-9v2)/@|6%,53!-9@2~j';