Help for this page
my $HoH = { map{ $_ => { @{ $HoA->{$_} } } } keys %{ $HoA } };
my $HoH = { map{ $_ => { map{ $_ => } @{ $HoA->{$_} } } } keys %{ $Ho +A } };
www.com | www.net | www.org
No recent polls found