Select Code to Download

    $hash{$col1}{$col2 . '_' . $col3} = "$col4\t$col5"

    for my $c1 (keys %hash) {
        for my $c2_c3 (keys %{$hash{$c1}}) {
...
            }
        }
    }