Hi,
I've used this module before in Gentoo and it's worked just fine but I'm
trying to get it to work on Centos5 and it's... not working right (no
errors, just not working right)
Operating System: Centos5 - Linux flatus.fremnet.net 2.6.18-274.18.1.el5
#1 SMP Thu Feb 9 12:45:52 EST 2012 i686 athlon i386 GNU/Linux
Perl Version: v5.8.8 built for i386-linux-thread-multi
IPTables version: v1.3.5
I have the following rules:
Chain INPUT (policy ACCEPT 0 packets, 0 bytes)
pkts bytes target prot opt in out source
destination
0 0 ACCEPT tcp -- * * 192.168.10.66
0.0.0.0/0
0 0 ACCEPT tcp -- * * 192.168.10.66
0.0.0.0/0 /* foobar.net */
0 0 ACCEPT all -- * * 192.168.10.66
0.0.0.0/0 /* foobar.net */
1694 199K RH-Firewall-1-INPUT all -- * * 0.0.0.0/0
0.0.0.0/0
(I'm aware they're fairly useless but they're for testing)
My perl script is:
#!/usr/bin/perl
use IPTables::IPv4;
use Data::Dumper;
my $table = IPTables::IPv4::init('filter');
print Dumper([$table->list_rules('INPUT')]);
The result is:
$VAR1 = [
{
'pcnt' => '0',
'jump' => 'ACCEPT',
'bcnt' => '0'
},
{
'matches' => [
'comment'
],
'pcnt' => '0',
'comment-match-raw' => 'foobar.net',
'jump' => 'ACCEPT',
'bcnt' => '0'
},
{
'matches' => [
'comment'
],
'pcnt' => '0',
'comment-match-raw' => 'foobar.net',
'jump' => 'ACCEPT',
'bcnt' => '0'
},
{
'pcnt' => '1828',
'jump' => 'RH-Firewall-1-INPUT',
'bcnt' => '219829'
}
];
What's missing is the source address, and the protocol...
RT for rt.cpan.org