in reply to Hash of Hash of Listed subroutines
for my $Key(keys %Hashofsubshashes){ for my $i(@ {$Hashofsubshashes{$Key}}){ print "$Key->&{$Hashofsubshashes{$Key}->{$i}}\n"; } } [download]