On Nov 1, 2005, at 1:02 PM, Simon Dassow wrote:
On Tue, Nov 01, 2005 at 08:36:59AM -0800, John N. Brahy wrote:
Is there a perl interface to pf?
Perl is able to play with ioctl(2), maybe this fits your needs.
If not go ahead, learn XS and write your own libs for that.
But i hardly see any sense behind it :>
use PF::Filter;
my $rule = PF::Filter->new(
-interface => 'em0',
-log => 1,
-src_addr => '10.0.0.2',
-dst_addr => '192.168.0.1',
-dst_port => 80,
-action => 'block'
);
$rule->param( flags => 'S/SA' );
$rule->param( label => 'api\'s r0x0r!!!' );
$rule->activate;
How can you not see the value in that? ;-)
--
Jason Dixon
DixonGroup Consulting
http://www.dixongroup.net
