いささか出遅れた感があるけれど、Web::ScraperやXPathの練習代わりに書いてみた。使い方はこんな感じ。 use WWW::Mixi::Scraper; my $mixi = WWW::Mixi::Scraper->new( email => 'foo@bar.com', password => 'password' ); my @list = $mixi->parse('http://mixi.jp/new_friend_diary.pl'); my @list = $mixi->new_friend_diary->parse; my @list = $mixi->parse('http://mixi.jp/new_bbs.pl?page=2'); my @list = $mixi->new_bbs->parse( page => 2 ); my $diary = $mixi-