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