Re^2: Using optional table option in Net::Netmask

I ran Data::Dumper on both the $b and $acl_block values.

($b) = $VAR1 = '10.10.10.248#0.0.0.7';
(4acl_block) = $VAR1 = bless( {
                 'IBASE' => 168430328,
                 'BITS' => 29
               }, 'Net::Netmask' );
Pseudo-hashes are deprecated at /usr/apps/ucm/perl_mod/lib/perl5/site_
+perl/5.8.8/Net/Netmask.pm line 265, <INFILE1> line 17.
Pseudo-hashes are deprecated at /usr/apps/ucm/perl_mod/lib/perl5/site_
+perl/5.8.8/Net/Netmask.pm line 265, <INFILE1> line 17.
No such pseudo-hash field "168430328" at /usr/apps/ucm/perl_mod/lib/pe
+rl5/site_perl/5.8.8/Net/Netmask.pm line 265, <INFILE1> line 17.
[download]

It looks like both values are being interpreted correctly but I'm still seeing the same issue. Thanks......

Comment on Re^2: Using optional table option in Net::Netmask Download Code

Replies are listed 'Best First'.
Re^3: Using optional table option in Net::Netmask by mrstlee (Beadle) on Oct 22, 2011 at 13:01 UTC
Cracked it I think. The documentation is misleading: `->storeNetblock([$t])` [download] It doesn't mean pass an array - it means that $t is an optional argument. This works for me: `my $acl_tbl = {}; $acl_block->storeNetblock($acl_tbl);` [download]	[reply] [d/l] [select]
Re^4: Using optional table option in Net::Netmask by cummiro (Initiate) on Oct 25, 2011 at 15:15 UTC
That was it. I thought I had tried that, but I guess something was missing. Thanks so much!!!!!	[reply]