07/03/22 22:08:34
#!/usr/local/bin/perl
use strict;
use LWP::Simple;
use XML::Simple;
my $api = 'URLリンク(d.hatena.ne.jp)';
my $url = 'URLリンク(www.yahoo.co.jp)';
my $document = LWP::Simple::get($api.$url)
or die "cannot get content from $url";
my $parser = XML::Simple->new;
my $data = $parser->XMLin($document);
print $data->{count}->{bookmark}->{content}, "\n";
URLリンク(www.itmedia.co.jp)
ここのサンプルなんですがエラーがでました
何が悪いのでしょうか?そんなに難しいことをやってるわけではないと思うのですが