for my $filename (@filename) { ... }