for my $element (@{$List{$key1}{$key2}{$key3}{$key4}{$key5}}) { .. }

##</code><code>##

while (my $name,$value) = each %{$List{$key1}{$key2}{$key3}{$key4}{$key5}}) { .. }

##</code><code>##

my $value = $List{$key1}{$key2}{$key3}{$key4}{$key5}}