実践Excelスクレイピング6. Perlでスクレイピング… •ぶっちゃけめんどい！ •ライブラリはそろってるけど、 ギークが多すぎて 「ソース嫁状態」 になりつつある •Encodeが出てきて？？になった •これをメンテナの人に聞かれると 殴られる •Perl 6いつ出んだよ！ 8. ソース #!/usr/bin/env perl use strict; use Encode::Locale; binmode STDOUT => ':encoding(console_out)'; use Web::Query; use HTML::Entities; $|=1; wq( 'http://www.city.shibuya.tokyo.jp/data/statics/base/nenbetu.html‘ ) ->find('table')->first ->find('tr')->each(sub{ my( $i, $
