#!/usr/bin/perl my $CMD = "/sbin/iptables"; my $arg1 = "-A INPUT -p tcp -m multiport \--dport 80,8080"; my $arg2 = "-s 10.10.10.10 -j DROP"; system("$CMD", "$arg1", "$arg2") == 0 or die "can't fork: $!\n";
In reply to problem with system function by perlknight
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |