指定のURLのカテゴリを求めるプログラム
$urlの中を適当に変更して使ってください。
wgetが入っている必要があります。
うぇぶんるいを使ってカテゴリを表示してくれます。
#!/usr/bin/perl $url='http://www.yahoo.co.jp/'; $category=`wget -q -O - "http://www.pbh.jp/cgi-bin/whatcat2.cgi?q=$url&an=1&func=cat"`; chomp $category; print $category,"\n";
結果
私用:265 転職:50
カテゴリ全部を表示用
#!/usr/bin/perl $url='http://www.yahoo.co.jp'; $category=`wget -q -O - "http://www.pbh.jp/cgi-bin/whatcat2.cgi?q=$url&an=1&func=allcat"`; chomp $category; print $category,"\n";
結果
秘密情報:20,私用:265,オークション:25,転職:50,株・先物取引:20