foreach my $key1 ( keys %masterClassHash ) { print "The class is $key1\n"; foreach my $key2(keys %{$masterClassHash{$key1}}) { print "\tstatus = $key2\n"; foreach (@{$masterClassHash{$key1}{$key2}}) { print "\t\tjobids = @_\n"; } } }