テレワークならECナビ Yahoo 楽天 LINEがデータ消費ゼロで月額500円〜！
無料ホームページ 無料のクレジットカード 海外格安航空券　海外旅行保険が無料！ 海外ホテル

メモ３

175 ：名無しさん＠勉強中 ★：07/10/21 07:55:37 ID:???

メモ

test
http://tw.bbs.nicovideo.jp/test/read.cgi/user/1192791311/

上の12-14などはTLDが「net」になってるです。
たぶんhttp://hinet.net/のプロバイダの方だと思うので
スクリプト中の（ってどのモジュールだったか覚えてないですけど）


my($country) = "";
my(@domain2) = ();
@domain2 = split(/\./,$domain);
if ($domain2[-2] eq "softbank" || $domain2[-1] eq "jp"){
$country = "jp";
}else{
$country = $domain2[-1];
}

を

my($country) = "";
my(@domain2) = ();
@domain2 = split(/\./,$domain);
if ($domain2[-2] eq "softbank" || $domain2[-1] eq "jp"){
$country = "jp";
}else　if ($domain2[-2] eq "hinet" || $domain2[-1] eq "tw"){
$country = "tw";
}else{
$country = $domain2[-1];
}

試してないので何ですが
上のようにやれば
プロバイダがhinet.netの方も
TLDに「tw」が入るのではないかと思うです