我NetAddr
通过这个成功安装:cpan -i NetAddr::DNS
现在我正在尝试启动这个基本程序:
use Net::IP; my $ip = new Net::IP ('193.0.1/24') or die (Net::IP::Error()); print ("IP : ".$ip->ip()."\n"); print ("Sho : ".$ip->short()."\n"); print ("Bin : ".$ip->binip()."\n"); print ("Int : ".$ip->intip()."\n"); print ("Mask: ".$ip->mask()."\n"); print ("Last: ".$ip->last_ip()."\n"); print ("Len : ".$ip->prefixlen()."\n"); print ("Size: ".$ip->size()."\n"); print ("Type: ".$ip->iptype()."\n"); print ("Rev: ".$ip->reverse_ip()."\n");
但我得到:
rr@sd-562 # perl tmp.pl Can't locate Net/IP.pm in @INC (@INC contains: /etc/perl /usr/local/lib/perl/5.14.2 /usr/local/share/perl/5.14.2 /usr/lib/perl5 /usr/share/perl5 /usr/lib/perl/5.14 /usr/share/perl/5.14 /usr/local/lib/site_perl .) at tmp.pl line 1. BEGIN failed--compilation aborted at tmp.pl line 1. rr@sd-562 # updatedb rr@sd-562 # locate IP.pm /root/.cpan/build/NetAddr-IP-4.071-YZOO46/IP.pm /root/.cpan/build/NetAddr-IP-4.071-YZOO46/blib/lib/NetAddr/IP.pm /usr/local/lib/perl/5.14.2/NetAddr/IP.pm
我还没有在网上找到有价值的东西.