1 files changed, 9 insertions, 5 deletions

diff --git a/es-es/perl-es.html.markdown b/es-es/perl-es.html.markdown
index fecaf5c4..644182ff 100644
--- a/es-es/perl-es.html.markdown
+++ b/es-es/perl-es.html.markdown
@@ -36,19 +36,19 @@ my $respuesta = 42;
 
 ## Arreglos
 # Un arreglo representa una lista de valores:
-my @animales = {"camello","llama","buho"};
-my @numeros  = {23,42,69};
-my @mixto    = {"camello",42,1.23};
+my @animales = ("camello","llama","buho"};
+my @numeros  = (23, 42, 69);
+my @mixto    = ("camello", 42, 1.23);
 
 ## Hashes
 # Un hash representa un conjunto de pares llave/valor:
-my %color_fruta = {"manzana","rojo","banana","amarillo"};
+my %color_fruta = ("manzana","rojo","banana","amarillo");
 
 # Puede usar un espacio en blanco y el operador "=>" para asignarlos más fácilmente
 my %color_fruta = (
    manzana => "rojo",
    banana  => "amarillo",
-   );
+);
 
 # Los escalares, arreglos y hashes están más documentados en perldata (perldoc perldata)
 
@@ -87,6 +87,10 @@ for ($i = 0; $i <= $max; $i++) {
     ...;
 }
 
+for $i (0 .. $max) {
+    ...;
+}
+
 foreach (@array) {
     print "Este elemento es $_\n";
 }