[背景]以前都是用perl写的，今天用php也写一个，哈哈。不错...

get_ip("218.22.93.241");
get_ip("58.242.161.5");

function get_ip($ip){

$br = (php_sapi_name() == "cli")? "\n":"
";
$qqwry=new qqwry('QQWry.Dat');

list($addr1,$addr2)=$qqwry->q($ip);
$addr1=iconv('GB2312','UTF-8',$addr1);
$addr2=iconv('GB2312','UTF-8',$addr2);
echo $addr1,'|',$addr2,"$br";

}

Result:
安徽省蚌埠市|电信
安徽省蚌埠市|网通

环境搭建
第一步
wget   http://pecl.php.net/get/qqwry
tar -zxf qqwry-0.1.0.tgz
cd qqwry-0.1.0
/usr/local/webserver/php/bin/phpize
./configure --with-php-config=/usr/local/webserver/php/bin/php-config

第二步
编辑 php.ini 加入  extension=qqwry.so 然后重启 http 服务

php -m 查看是否支持 qqwry

php -m | grep qqwry

如果报错，请注意extension_dir的值
extension_dir = "/usr/local/webserver/php/lib/php/extensions/no-debug-non-zts-20060613/"
看在这个目录下是否有qqwry.so
重启web服务，如
/usr/local/webserver/php/sbin/php-fpm restart

第三步
下载IP 数据库
http://www.newhua.com/soft/19051.htm

参考：
http://bbs.linuxtone.org/viewthread.php?tid=2999&extra=page%3D1%26amp%3Bfilter%3Dtype%26amp%3Btypeid%3D26