Perlを使って２ちゃんねるにHello Worldを書き込む

Perlを使って２ちゃんねるにHello Worldを書き込む at TECH

17:デフォルトの名無しさん
07/07/15 17:37:42
よし、たいしたことができないであろう、LWP::Simpleじゃなくて、
もっといろいろできるであろうLWP::UserAgentを使ったコートだ

use LWP::UserAgent;

$ua = LWP::UserAgent->new;
$ua->agent("Mozilla/8.0");

$req = HTTP::Request->new(GET => 'ｽﾚﾘﾝｸ(tech板)');
$req->header('Accept' => 'text/html');

$res = $ua->request($req);
if ($res->is_success) {
print $res->content;
} else {
print "Error: " . $res->status_line . "\n";
}

次ページ

続きを表示

1を表示