Google LWPアクセス禁止

LWPがGoogleにアクセス禁止されてるってきいたので、試したらほんまやった。
ITリーダのグーグルがするなら、はやく真似しないと！なんちゃって。

#!/usr/bin/perl -w

use strict;
use warnings;
use LWP::UserAgent;
use HTTP::Request;

my $request = HTTP::Request->new( GET => 'http://www.google.co.jp/search?hl=ja&q=lazy' );
 my $ua = LWP::UserAgent->new;
# これ追加したら、OK
#$ua->agent('Lazybot/6.9');
 my $response = $ua->request( $request );

print $response->content();