テストやっとこ終わった。id:omochistも勉強再会したようですし、うちも更新再開ですよ。 今回は、これからいろいろ使いそうなWWW::Mechanizeモジュールを試してみた。WWW::Mechanizeはすてきなモジュールで、PerlにWebブラウジングをさせることができる。これを使って月並みだけどGoogle検索を行うスクリプトを書いてみた。 まず、準備。 use strict; use warnings; use WWW::Mechanize; use HTML::TreeBuilder::XPath; use Encode; use Readonly; sub say {print @_, "\n";} おもむろに、WWW::Mechanizeオブジェクトを作って、 my $mesh = WWW::Mechanize->new(); さらに、Googleにアクセスして、フォー