Perl NetAddress转储程序输出

尝试使用

NetAddr:：IP:：Compact

函数时，我的脚本出现问题

my $var = new NetAddr::IP '127.0.0.1/8';
print Dumper $var;

这项研究的结果是：

$VAR1 = bless({
     'addr' => '',
     'isv6' => 0,
     'mask' => '?????????????'
}, 'NetAddr::IP');

我的问题是为什么我没有看到addr和mask字段在这里填充

Use of uninitialized value in sort at blib/lib/NetAddr/IP.pm (autosplit into blib/lib/auto/NetAddr/IP/compactref.al) line 737.

---

因为Data:：Dumper的默认设置很糟糕

{
   local $Data::Dumper::Useqq = 1;
   print Dumper $var;
}

---

你读过perldoc吗？你试过他们在cpan上的例子吗<代码>打印“地址为”、$ip->addr、“带掩码”、$ip->mask、“\n”旁注，让变量名有意义是个好主意。