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