アカウント名:
パスワード:
より多くのコメントがこの議論にあるかもしれませんが、JavaScriptが有効ではない環境を使用している場合、クラシックなコメントシステム(D1)に設定を変更する必要があります。
日々是ハック也 -- あるハードコアバイナリアン
カテゴリ指定で商品情報取れるようだが (スコア:2, 参考になる)
適当に作っただけだから突っ込み無用で。
---
#!/usr/bin/perl
# setting
$dir = "/home/tsukuba2000/Fujisan/";
$filename = "category.list";
$filepath = $dir . $filename;
# get once 10 days
system("wget -O $filepath http://www.fujisan.co.jp/Categories.asp") if(-C $filepath > 10);
open(FILE,"cat $filepath | nkf -Se |");
while(<FILE>){
if(/<a href="\/category\/(\d+)\/"[^>]*>(.+)<\/a>/){
($code,$txt,$big) = ($1,$2," ");
next if($code{$code});
$big = "▼" if($txt=~/【/ or $code==3000 or $code==3038);
$txt=~s/<[^>]+>//g;
$txt=~s/【//g;
$txt=~s/】//g;
print "$code: $big$txt\n";
$code{$code}++;
}
}
close(FILE);
exit;
Re:カテゴリ指定で商品情報取れるようだが (スコア:0)