push @{$hash{$line1}}, $line[2],$line[3]; #### if (exists $hash{$cols[2]}) { if ($p1>= $hash{$cols[2]}[0] and $o2<= $hash{$cols[2]}[1]) { ...