PPMでCPANモジュールのインストール先指定できるんじゃん!
こんばんは、Perl48です。
知らないってホントに怖いことですね。
「アマゾンのゲーム売れ筋ランキングのゲームタイトルデータを引っこ抜きたーい」
のときに、インストールした Web::Scraperモジュールが使えず無理やり
動かしていたのですが、
やっぱり、Perlモジュールのインストール先を指定できるんじゃーん!
PPMの右下の方を見ると、
「Install Area : site」の文字。
これ、明らかにPerlインストールしたフォルダの下のsiteフォルダのことじゃん!!
ということで、Web::Scraperモジュールへのパスなしでも動くので
「アマゾンのゲーム売れ筋ランキングのゲームタイトルデータを引っこ抜きたーい」
のソース訂正しておきまーす。
#!/usr/bin/perl -w
use lib 'C:/usr/cpan/build/Web-Scraper-0.32-VSDMOU/lib';use Web::Scraper;
use URI;
use encoding qw(shiftjis);# videogameRankと命名したscraperオブジェクトを作成
my $videogameRank = scraper {
# ゲームタイトル部分を gameTitles[] と命名した配列に格納
process "table.zg .productTitle", "gameTitles[]" => 'TEXT';
};# amazon.co.jpのTVゲームベストセラーページのURLオブジェクトを対象に
# scrapeメソッドでスクレイピングを実行
my $res = $videogameRank -> scrape(URI -> new('http://www.amazon.co.jp/gp/bestsellers/videogames’));# 配列gameTitles[]に格納されたスカラー値を順番に画面に表示
foreach my $gameTitle(@{$res->{gameTitles}}){
print "$gameTitle"."\n"; # 何が出るかな?
};
僕らは、転びながら強くなる。
そう、「転がる石になれ!」