tabs ou espaces.

This commit is contained in:
Alexandre Anriot 2005-09-20 07:42:52 +00:00
parent b272c6f912
commit 0518fb39d9
1 changed files with 3 additions and 3 deletions

View File

@ -163,7 +163,7 @@ sub Control() {
$_ =~ s/#.*//;
# on split la liste des paramètres
my @tmp1 = split (/\t+/);
my @tmp1 = split (/\t+|\s+/);
system("/sbin/iptables -t nat -A PREROUTING -p $tmp1[2] -i ppp0 --dport $tmp1[1] -j DNAT --to $tmp1[0]:$tmp1[1] 2>/dev/null");
}
@ -184,7 +184,7 @@ sub Control() {
$_ =~ s/#.*//;
# on split la liste des paramètres
my @tmp2 = split (/\t+/);
my @tmp2 = split (/\t+|\s+/);
system("/sbin/iptables -A FORWARD -p $tmp2[2] -i ppp0 -o eth0 --dport $tmp2[1] -j EVOAUTH 2>/dev/null");
}
@ -207,7 +207,7 @@ sub Control() {
$_ =~ s/#.*//;
# on split la liste des paramètres
my @tmp3 = split (/\t+/);
my @tmp3 = split (/\t+|\s+/);
system("/sbin/iptables -D FORWARD -p $tmp3[2] -i ppp0 -o eth0 --dport $tmp3[1] -j EVOAUTH 2>/dev/null");
system("/sbin/iptables -t nat -D PREROUTING -p $tmp3[2] -i ppp0 --dport $tmp3[1] -j DNAT --to $tmp3[0]:$tmp3[1] 2>/dev/null");