2012年10月18日木曜日

Download the Contents of a URL 指定ウェブアドレスのページを自動的にダウンロード


 Perlで書くと以下のように簡単に実現できます。
#!/usr/bin/perl
use strict;
use warnings;
use LWP::Simple;
my $url = 'http://example.com/example.html';
my $file = 'data.kml';
getstore($url, $file);

 メモリにダウンロードして、そこで処理したい場合、WWW::Mechanizeを使った方は便利です。
#!/usr/bin/perl
use strict;
use WWW::Mechanize;
my $url = 'example.com/example.html';
my $mech = WWW::Mechanize->new;
$mech->get($url);
WWW::Mechanizeでは、指定URLにあるすべてのリンクを階層指定して持ってくることも可能です。

0 件のコメント:

コメントを投稿