Help for this page
my %hash; open my $IN2, "<", $file2 or die "could not open $file2 $!"; ... } close $IN1; close $OUT;