foreach $server (keys %servers) #returns individual servers { print "$server\n"; foreach $process (keys %{$servers{$server}}) #returns individual processes on a server { print "$process\n"; foreach $processPart (keys %{$servers{$server}{$process}}) # returns part of a process { print "$processPart\n"; } } }