2010-12-30から1日間の記事一覧
perlとも友好関係を結ぼうと試し中 #!/usr/bin/perl use strict; use warnings; use LWP::UserAgent; use XML::Simple; my $ua = LWP::UserAgent->new; my $r = $ua->get('http://search.hatena.ne.jp/keyword?word=ABC&mode=rss&ie=utf8&page=1'); binmode(…
perlとも友好関係を結ぼうと試し中 #!/usr/bin/perl use strict; use warnings; use LWP::UserAgent; use XML::Simple; my $ua = LWP::UserAgent->new; my $r = $ua->get('http://search.hatena.ne.jp/keyword?word=ABC&mode=rss&ie=utf8&page=1'); binmode(…
