> perl .\printhash.pl
Error codes:Cuatro = @(1 2 3 4)
Error codes:Uno = 1
Error codes:Dos = 2
Error codes:Tres = 3
Error codes:Cinco = {
        otro = 99
        rojo = Red
}