my %returnedHash = grep / $hash{"GNAEUS"}{"1"} / keys %hash; 

foreach my $name (keys %returnedHash){ 
        
    foreach my $number (keys %{$returnedHash{$name}}){
            
        foreach my $color (keys %{$returnedHash{$name}{$number}}){
                     
            print $returnedHash{$name}{$number}{$color};
        }
    }
}