for my $f (@interfaces) {

##</code><code>##

for my $if (@interfaces) {