IPFW: Добавление пользователей в таблицу.

[reinover]

Для этого используется скрипт:

#/usr/bin/perl
use strict;
use warnings;
use 5.010;

my $cmd='/sbin/ipfw';
my $ipfw="/etc/ipfw.rules";
system "$cmd", "-f table all flush";
my @values=qw (
ip_адреса_через_пробел
 );
foreach (@values){
  system "$cmd", "table 1 add $_";
}
system $ipfw;