めざましテレビ占いをスクレイプするプログラムを書いた。 #!/usr/bin/env perl use strict; use Web::Scraper; use URI; use Data::Dumper; use utf8; use Encode; my $baseurl = "http://www.fujitv.co.jp/meza/uranai/index.html"; my $scraper = scraper { process "table[background=~/rank/]",'items[]'=> scraper { process 'img[src=~/conste_/]', 'title'=>'@alt'; process 'td[class="lucky"]','lucky'=>'TEXT'; process 'td[class="text"]','text'=
