open my $fh, '<', $filename1 or die "Cannot find the file $filename1: $!";