混淆Perl数组行为

bvjveswy  于 2023-08-06  发布在  Perl
关注(0)|答案(1)|浏览(126)

我正在使用Infoblox设备的Perl API(doc:https://ipam.illinois.edu/api/doc/)的数据库
我有以下代码:

...

my $specificRecord = $recordResults[0];

say $specificRecord->name();

foreach ($specificRecord->ipv4addrs())
{
    say $_;
}

字符串
$specificRecord包含Infoblox::DNS::Host记录对象。
当我迭代ipv4 addrs()时,问题就出现了。根据文档和perl调试器,ipv4 addrs()返回一个包含IP或DHCP::FixedAddr对象的ARRAY。
在我的例子中,如果我调试我的程序和“x”$specificRecord-> ipv4 addrs()以及$_,我会得到相同的结果:

DB<1> b 70

DB<2> c
Results: 1
aaaa9999test.justice
main::(testScript2.pl:70):          foreach ($specificRecord->ipv4addrs())
main::(testScript2.pl:71):          {

DB<2> x $specificRecord->ipv4addrs();
0  ARRAY(0x64e9e3c)
   0  '8.8.8.8'
   1  '8.8.4.4'

DB<3> n
main::(testScript2.pl:72):              say $_;

DB<3> x $_;
0  ARRAY(0x64e9e3c)
   0  '8.8.8.8'
   1  '8.8.4.4'


下面是Infoblox::DNS::Host对象的“x”的相关部分:

DB<2> x $specificRecord;
0  Infoblox::DNS::Host=HASH(0x8b3eacc)
   '__object_id__' => 'dns.host$._default.justice.aaaa9999test'
   'aliases' => ARRAY(0x8b3e9fc)
        empty array
   'configure_for_dns' => 'true'
   'disable' => 'false'
   'ipv4addrs' => ARRAY(0x64e9e3c)
      0  '8.8.8.8'
      1  '8.8.4.4'
   'ipv6addrs' => ARRAY(0x8aa1bac)
        empty array
   'name' => 'aaaa9999test.justice'
   ...


我不知道我做错了什么,为什么foreach不能使用$_变量。我试着将ipv4 addrs()分配给一个数组,然后在上面进行foreaching,但没有用。

isr3a4wc

isr3a4wc1#

它返回一个数组引用。尝试取消引用它:

foreach ( @{ $specificRecord->ipv4addrs() } )

字符串

相关问题