Perl HTMLソース表示 LWP::UserAgent 

何か役に立ちそうだったのでメモしておきます。

#!/usr/bin/perl

$url = "http://www.google.co.jp/";

use LWP;
print "Content-type: text/htmlnn";
print "<xmp>";
print LWP::UserAgent->new->request(
	HTTP::Request->new(GET => "$url"))->content;
print "</xmp>";

ん~何に使おうかな・・・・・・^^;
このモジュールの使い方も詳しく覚えないと

Leave a Comment

* are Required fields

*
日本語が含まれない投稿は無視されますのでご注意ください。(スパム対策)