{
  local @ARGV = @list_of_files;
  while (<>) {
    ...
  }
}