Select Code to Download

sub getExpNumber {
  my $filePath = shift;
...
  close(INPUT) or die "Can't close $filePath: $!\n";
  return $n;
}