my @name;
push @name, m{ /(\w+) /foo\z }x
  for @FILES;

##</code><code>##

my @name = map m{ /(\w+) /foo\z }x, @FILES;