#              $name++;
#              return;
#       } else { 
       open(FILE, $_);
       my @lines = <FILE>;
       # some processing missing here?
       }
}