精确到楼层的ip查询？

[eexpress]

代码： 全选

☎ cat apnic.pl 
#!/usr/bin/perl

my ($ip1,$ip2)=split(/\./,$ARGV[0]);
my $ip="$ip1.$ip2";
print $ARGV[0];
open(who, "whois -h whois.apnic.net $ARGV[0]|");
my $l;
while(<who>){
        last if /$ip/;
}
while(<who>){
        chomp;
        s/$&:\s*//,print " ► $_" if /^descr|^country/;
}
close(who);

[leeaman]

传说中的马甲杀手?

[bones7456]

不直观,不明显

[sammysun]

怎么用？

[greco]

►

[jioyo源]

怎么用？

[bigdomain]

保存代码
chmod +x ./apnic.pl
./apnic.pl 122.231.2.115
122.231.2.115 ► CN ► CHINANET-ZJ Jiaxing node network ► Zhejiang Telecom ► CN ►

[xiooli]

代码： 全选

whois -h whois.apnic.net ip

更详细阿

[windwiny]

who 是什么玩艺？ 还少发了一些东西吧

[jyz19880823]