open(TEMP1, $overlap_files[$i]) || die "\n\nCan't open $overlap_files[$i]!!\n\n";
open(TEMP2, $overlap_files[$j]) || die "\n\nCan't open $overlap_files[$j]!!\n\n";
my @file1 = <TEMP1>;
my @file2 = <TEMP2>;
close TEMP1;
close TEMP2;