LWPがGoogleにアクセス禁止されてるってきいたので、試したらほんまやった。 ITリーダのグーグルがするなら、はやく真似しないと！なんちゃって。 #!/usr/bin/perl -w use strict; use warnings; use LWP::UserAgent; use HTTP::Request; my $request = HTTP…

以前、Catalyst::Component::ACCEPT_CONTEXT をコントローラで継承すれば $c が取れるといったんだけど、 複数のコントローラを継承すると取れなくなるな。orz...試したスクリプト。 :-) package Nyan::BaseController::A; use base qw(Catalyst::Controller…

IPC::Run3 と mecabを使って、単語と品詞統計を計る機能作成！ グリースモンキーの課題の後は、これにしよ。