youngfan007 发表于 2018-8-31 10:04:06

一个perl写的判断ip归属地

my $ip = ;  chomp ($ip);
  my $url = "http://ip138.com/ips.asp?ip=$ip&action=2";
  my $content = get $url;
  die "Couldn't get $url" unless defined $content;

页: [1]
查看完整版本: 一个perl写的判断ip归属地