指定の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