为什么Net::IP中的子网掩码设置错误?

Question

我试图获得一个小脚本来识别来自查询的SNMP数据，并将其存储在数据库中。但是当我用Net::IP CPAN模块处理数据时，我卡住了。如果我定义网络字符串没有问题，但是我在单独的字符串中有IP和掩码，无论我如何连接它们，模块总是将网络掩码设置为/32。

我试过了:

my $net = "${$query_snmp->{$tablekey}}{'ipRouteMask'}/${$query_snmp->{$tablekey}}{'ipRouteDest'}";
my $IP = new Net::IP ($net) or die (Net::IP::Error());

但是无论我将网络掩码设置为什么，所有的IP对象总是用/32创建的。如果我在同一字符串上定义一个字符串，如192.168.0.0/20或任何东西，我发现没有问题。

我错过了什么?

Network -> 192.168.65.64/255.255.255.248
IP  : 192.168.65.64
LASTIP  : 192.168.65.64
Sho : 192.168.65.64
Bin : 11000000101010000100000101000000
Int : 3232252224
*** Mask: 255.255.255.255 *** wtf ??
Last: 192.168.65.64
Len : 32
Size: 1
Type: PRIVATE
Rev:  64.65.168.192.in-addr.arpa.

Answer 1

来自手册:Net::IP对象可以从单个IP地址创建，也可以从无类前缀创建，…

我认为你已经选择指定一个无类网络，只要你插入一个有效的网络说明符，它对我有效。

#!/usr/bin/perl -w    
use Net::IP;
my $ip = new Net::IP('112.198.64.0/18') 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");

将输出:

IP  : 112.198.64.0
Sho : 112.198.64
Bin : 01110000110001100100000000000000
Int : 1892040704
Mask: 255.255.192.0
Last: 112.198.127.255
Len : 18
Size: 16384
Type: PUBLIC
Rev:  64.198.112.in-addr.arpa.

然而，如果你输入了"192.168.65.64/255.255.255.248"，这不是Net::IP接受的格式，你必须使用"192.68.65.64/29"，见下表。在这种情况下，它将正常工作:

IP  : 192.168.65.64
Sho : 192.168.65.64
Bin : 11000000101010000100000101000000
Int : 3232252224
Mask: 255.255.255.248
Last: 192.168.65.71
Len : 29
Size: 8
Type: PRIVATE
Rev:  64.65.168.192.in-addr.arpa.

当你使用完整的网络掩码格式时，因为它不能被识别，它只会得到IP，并会给你255.255.255.255

Answer 2

谢谢!我最后使用了一个类似的模块，它不需要将ip掩码转换为解码符号。

Net::Netmask -> https://metacpan.org/pod/Net::Netmask

构建

Net::Netmask objects are created with an IP address and optionally a mask. There are     many forms that are recognized:
'216.240.32.0/24' The preferred form.
'216.240.32.0:255.255.255.0'
'216.240.32.0-255.255.255.0'
'216.240.32.0', '255.255.255.0'
'216.240.32.0', '0xffffff00'
'216.240.32.0 - 216.240.32.255'
'216.240.32.4'
A /32 block.
'216.240.32'
Always a /24 block.
'216.240'
Always a /16 block.
'140'
Always a /8 block.
'216.240.32/24'
'216.240/16'
'default' or 'any'
0.0.0.0/0 (the default route)
'216.240.32.0#0.0.31.255'

谢谢。