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


NOTE - You can use these HTML tags and attributes:
<a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>

(Spamcheck Enabled)

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