Can some one tell me why the get in this code fails to retrieve anyhting?
#!/usr/bin/perl
use strict;
use warnings;
use LWP::Simple;
use HTML::LinkExtor;
use Data::Dumper;
my $content = get("http://www.yahoo.com/"); #Get web page in content
die "get failed" if (!defined $content);
my $parser = HTML::LinkExtor->new(); #create LinkExtor object with no callbacks
$parser->parse($content); #parse content
my @links = $parser->links; #get list of links
print Dumper \@links; #print list of links out.