open my $file1In, '<', $file1 or die "Failed to open $file1: $!";