[Programación] Este ejemplo en perl no anda... (de la conferencia)

[Horacio Castellini]

Hola...

Con ánimo de aprender perl al estilo el autodidacta tucumano "Ramon 
Ortega" (viejo el chiste... ) decidí comprobar este ejemplo del apunte de 
pepe... 
--------------------------------------
#!/usr/bin/perl

@a=(1,2,3,4,5);
foreach $i (@a){ 
        print "$i "; 
}
print "\n";

%h1=(Nombre=>'Horacio',Apellido=>'Castellini');
foreach $i (keys %h1){
        print "%h1{$i} \n";
}
---------------------------------------

Pero el hash me da este indeseable resultado...

1 2 3 4 5 
%h1{Apellido}
%h1{Nombre}

Según el apunte de José debería aparecer 

Castellini
Horacio

Pero, nop...  Un bug... ??