IP address を元に、どこの国からのアクセスか推測

。。。ていうようなことは、Google Analytics などにお任せすればよいんだけれども、そうも言ってられない場合もあって、そういう時はこのあたりから最新の情報もってきて、調べたい IP address がどの範囲か計算して。。。。っていうか、Perl なら IP::Country 使え、と

use IP::Country::Fast;

my $r = IP::Country::Fast->new;
print $r->inet_atocc('208.67.222.222'); # US
print $r->inet_atocc('haro.jp'); # JP

今さらだけどね

ちなみに、Leopard だと /Library/Perl/5.8.8/IP/Country/Fast/(cc|ip).gif あたりにあるのが元データなり