Select Code to Download

if ( exists( $data{$array[$i]}{$array[$j]} ) ) {
        next();
...
else {
        print OUT join("\t", $i, $j), "\n";
        }