perl脚本中IP::QQWry::Decoded能提供一下吗 执行报错

[palmerqiu]

perl脚本中IP::QQWry::Decoded能提供一下吗

[wisdomfusion]

安装模块即可

cpanm IP::QQWry::Decoded

[gxs-gc]

安装完成还是查不出来啊
Use of uninitialized value $info in pattern match (m//) at ./ip_query.pl line 25, line 1.
Use of uninitialized value $info in concatenation (.) or string at ./ip_query.pl line 29, line 1.
Use of uninitialized value $pro in concatenation (.) or string at ./ip_query.pl line 29, line 1.
1 0
Use of uninitialized value $info in concatenation (.) or string at ./ip_query.pl line 30, line 1.
Use of uninitialized value $pro in concatenation (.) or string at ./ip_query.pl line 30, line 1.