kao što naslov kaže, ne radi nešto što bi trebalo da radi.
foreach my $rule ( $table->list_rules('INPUT') ) {
if( $rule->{'jump'} eq $chain_name ) {
$table->delete_entry('INPUT', $rule) or die("Error: Couldn't remove chain '$chain_name' from INPUT chain: $!");
}
}
rezutuje sa die varijantom.
To pravilo, naravno, mogu normalno da ubijem iz konzole, ostali delovi perl skripte rade normalno, tj kao što kaže opis.
svaka ideja je dobrodošla...
PS: pokušao sam i sa
$table->delete_entry('INPUT',{ source=>$rule->{'source'}, jump=>$rule->{'jump'} } )
PPS: nov sam u kamilarstvu ;)
[Ovu poruku je menjao TiXo dana 05.02.2006. u 02:54 GMT+1]
GnuPG public key: tixo.asc
Try and be nice to people, avoid eating fat, read a good book every now and then, get some walking in, and try and live together in peace and harmony with people of all creeds and nations.









IPTables::IPv4, problem sa delete_entry