狠狠撸

狠狠撸Share a Scribd company logo
Beginners
Session
        2012/08/24
        Perl Beginners #4
        細越 佑介 @hsksyusk
はじめに言っておきます。
オブジェクトを
使うつもりなんて
なかったんです。
とあるサイトからデー
タを取り出したい。

スクレイピングしよう
かな。

Web::Scraper
がよさそうかな。
AタグのURLを取得するところで、
気になる文があったんです。
「値は絶対パスのURI
 オブジェクトで得られます」
use   strict;
use   warnings;
use   URI;
use   Web::Scraper;
use   utf8;
use   Data::Dumper;

my $url = URI-
>new('file:/home/hsksyusk/dev/pbsample/index.html');
my $geturl = scraper {
        process '.post-title a', 'link' => '@href';
};
my $res = $geturl->scrape($url);
warn Dumper $res->{link};
$VAR1 = bless( do{(my $o =
'http://www.perl-
beginners.org/2012/08/perl-
beginners-4.html')}, 'URI::http' );
warn $res->{link};
http://www.perl-
beginners.org/2012/08/perl-beginners-
4.html at pbsample.pl line 14.
bressやdoは
 なんだったのか
なぜURLを
文字列で取得できたのか
まとめ
このコードはどういう意味?
$VAR1 = bless( do{(my $o =
'http://www.perl-
beginners.org/2012/08/perl-
beginners-4.html')}, 'URI::http' );

なぜこの命令で中のURL文
字列を取り出せるの?
warn $res->{link};
ありがとうございました

More Related Content

Beginners Session at Perl Beginners #4