my $oecd = URI->new('http://cs3-hq.oecd.org/scripts/hpv/DetailProduit_Contenu.asp?CASNUM='."$_"); $mech->get($oecd); #$mech->follow_link(url_regex => qr/\.pdf/); #my $url = $mech->find_link(text_regex => qr/\.pdf/); my @links = $mech->find_all_links(); for(@links) { print $_->url(), "\n"; print $_->text(), "\n"; }