open my $fh1, "<", $file1 or die "Cannot open file $file1: $!";
open my $fh1, "<", $file2 or die "Cannot open file $file2: $!";