Example 1
use LWP::Simple;
use HTML::LinkExtractor;
use Data::Dumper;
my $input = get("http://google.com");
my $LX = new HTML::LinkExtractor();
$LX->parse(\$input);
print Dumper($LX->links);
continued...
use LWP::Simple;
use HTML::LinkExtractor;
use Data::Dumper;
my $input = get("http://google.com");
my $LX = new HTML::LinkExtractor();
$LX->parse(\$input);
print Dumper($LX->links);
continued...
| Copyright © 2006 Yung-chung Lin |