07/10/12 04:37:32
すいません。
ソースがおかしかったんで張りなおします。
my $rss = new XML::RSS;
my $url = 'URLﾘﾝｸ(hoge.com)';
my $dat = get($url);
my $result = $rss->parse($dat);
foreach my $item ( @{$rss->{'items'}} ){
if($result =~ /1.0/){
print "$item->{'dc:date'}\n"; #エラーが出る
}elsif($result =~ /2.0/){
print "$item->{'pubDate'}\n";
}
}