note
ChuckularOne
<code>
use Data::Dumper;
$a = "fruits";
$b = "birds";
$c = "p";
$d = "g";
$e = "c";
$array1{$a}{$c}= [ "peach" ];
$array1{$a}{$d}= [ "grapes" ];
$array1{$b}{$c}= [ "parrot" ];
$array1{$b}{$e}= [ "crow" ];
print Dumper %array1;
</code>
This is the way to do it as a hash. I doubt this is helpful though.<br />
<br />
<br />
<b>Update: </b> Added missing square brackets. (I guess I should have tested it.)<br />
Better yet use borisz's example below.
378008
378008