foreach my $eth (@eths) { foreach my $net (@nets) { $netifaces->{$eth}{$net} = 1; } } [download]
In reply to I hate nested loops by rastoboy