Entonces hay que modificar el código, en la línea 28, a algo así:
Using perl Syntax Highlighting
- for my $hash_ref ( @{ $hash->{'grupo'}->{'usuarios'} } ) { # {grupo}{usuarios} nos lleva a un array, que contiene hashes
- print "$hash_ref->{'username'}: $hash_ref->{'clave'}"; # pintamos contenidos de cada hash
- }
Coloreado en 0.005 segundos, usando GeSHi 1.0.8.4
