Perl script view iptables.