Help for this page
my %HoH = ( SUB1 => { ... for my $sub_key (sort {$HoH{$a}{Test1}{value1} <=> $HoH{$b}{Test1}{val +ue1} }keys %HoH){ print "$HoH{$sub_key}{Test1}{value1}\n"; }
www.com | www.net | www.org
No recent polls found