while (...) {
   local *INFILE;
   if (!open(INFILE, '<', $inputFile)) {
      warn("Unable to open analysis file $inputFile: $!\n");
      next;  # 
   }

   ...
}