Бок при использовании IPTables::IPv4

http://search.cpan.org/~dpates/IPTables-IPv4-0.98/IPv4.pm

Трабл при использовании модуля IPTables::IPv4. странные вещи творятся..

начнем с iptables
host ~ # iptables -xnv -L table_a
Chain table_a (1 references)
pkts bytes target prot opt in out source destination
0 0 DROP all -- * * 192.168.7.155 10.10.0.0/21

Это правило я вбил руками.

а вот пеловый скрипт, который пытаеться показать это правило

-------8<-----------------------------------------
#!/usr/bin/perl
use IPTables::IPv4;
use Data::Dumper;

my $table = IPTables::IPv4::init('filter');
unless ($table) {
print ("Can't initialize IPv4 table\n");
exit;
}

my @rules = $table->list_rules("table_a");
print Dumper(@rules);
-------8<-----------------------------------------

I run it:
host new # ./aaa.pl
$VAR1 = {
'pcnt' => '0',
'jump' => 'DROP',
'bcnt' => '0'
};

заметьте, полей source и destination нету.

теперь я создам похожее правило, не через модуль IPTables::IPv4

-------8<-----------------------------------------
#!/usr/bin/perl
use IPTables::IPv4;
use Data::Dumper;
use strict;
use warnings;

my $table = IPTables::IPv4::init('filter');
unless ($table) {
print ("Can't initialize IPv4 table\n");
exit;
}

my $rule = {"source" => "192.168.7.154",
"destination" => "10.10.0.0/21",
"jump" => "DROP"};

$table->append_entry("table_a", $rule) ||
print "Error: $!";
$table->commit() ||
print "Commit Error: $!";
-------8<-----------------------------------------

iptables:
host ~ # iptables -nv -L table_a
Chain table_a (1 references)
pkts bytes target prot opt in out source destination
0 0 DROP all -- * * 192.168.7.155 10.10.0.0/21
0 0 DROP all -- * * 192.168.7.154 10.10.0.0/21

теперь вызываем смотрим на записи:

host new # ./aaa.pl
$VAR1 = {
'pcnt' => '0',
'jump' => 'DROP',
'bcnt' => '0'
};
$VAR2 = {
'source' => '192.168.7.154',
'pcnt' => '0',
'destination' => '10.10.0.0/21',
'jump' => 'DROP',
'bcnt' => '0'
};

вуаля, правило есть.
где бок ?
автору на dpates@dsdk12.net я уже отписал.