IP地址查询的Perl脚本 for QQWry.Dat

非常想自己写一个程序分析QQWry.dat的格式， 从而使用在我的网站日志分析程序中。由于ieasy.org用的是awstats,支持perl写的插件，我就打算写一个perl脚本。

找到如下信息:

《关于QQwry格式》 http://dev.csdn.net/article/33/33563.shtm

正当我想自己写的时候，碰巧找到了雷傲论坛的代码，里面正好有perl写好的：） 这里下载 用的时候，把脚本的保存为qqwry.pl，再去http://www.cz88.net/下载一份最新的QQWry.Dat，
写一个你得Perl脚本test.pl，如

#!/usr/bin/perl

use strict;

require "qqwry.pl";

print ipwhere("${ARGV[0]}");

print "\n";

$./test.pl ip地址

hehe,这样就可以查了 .下一篇blog我会讲讲怎么写那个awstats的插件。