Select Code to Download

## I don't know how you're getting values for $i, $j, $value
$hash{$i}{$j} = $value;

foreach $i (keys %hash) {
   foreach $j (keys %{ $hash{$i} }) {
      print $i, $j, $hash{$i}{$j}, "\n";
   }
}

push @array, "$i:$j:$value";

...
foreach (@array) {
   print join (' ', split ":");
}