open my $fIn1, '<', $filename or die "Failed to open '$filename': $!\n";