use strict; use warnings; use WWW::Mechanize; my $url = 'http://cpan.org/'; my $mech = WWW::Mechanize->new(); if ( $mech->get( $url ) ){ for my $l ( $mech->links() ){ print "link ", $l->url; } } __END__
In reply to Re: regex question
by Anonymous Monk
in thread regex question
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |