Help for this page

Select Code to Download


  1. or download this
      my $agent = WWW::Mechanize->new();
  my $link = $agent->find_link( text => "some text", url_regex => qr/s
+omelink\.com/ );
  2. or download this
    #!/usr/bin/perl 
use strict;
...
  my @urls=$agent->find_all_links(text => "some text", url_regex => qr
+/somelink\.com/);

print stdout "@urls\n";
  3. or download this
    http://www.google.co.uk/search?hl=en&safe=off&q=intitle%3A%2
+2football+scores%22+inurl%3Aresults&meta=cr%3DcountryUK%7CcountryGB