Zeokat escribió:
Parece que devuelve el número de elementos del array tal y como hacía $#nombre_del_array.
Que no, que no lo has entendido. Que no es lo mismo el NÚMERO de elementos que el valor del ÍNDICE del ÚLTIMO elemento.
Sorry, no volvere a fallar en eso, ahora está 100% claro.
Explorer me dice que mi solucion me da una palabra de mas, pero la probé y me da exactamente 24 palabras, justo las que tiene que tener. A ver donde esta el fallo.... o esque ando despistado
Voy a modificar un poco el codigo para que me de alguna pista de lo que esta pasando. Tal que me queda el siguiente codigo.
Using perl Syntax Highlighting
#!/usr/bin/perl -w
use strict;
open (TEXTO,"texto.txt");
my @texto=<TEXTO>;
my $texto = join('',@texto); #Junto los elementos del array @texto y los almaceno en un escalar $texto
my @palabras = split(/\w+/, $texto); #divido el escalar $texto usando como separadores las palabras
#y las almaceno en el array @palabras
print '>',join(':',@palabras),'<';
close (TEXTO);
use strict;
open (TEXTO,"texto.txt");
my @texto=<TEXTO>;
my $texto = join('',@texto); #Junto los elementos del array @texto y los almaceno en un escalar $texto
my @palabras = split(/\w+/, $texto); #divido el escalar $texto usando como separadores las palabras
#y las almaceno en el array @palabras
print '>',join(':',@palabras),'<';
close (TEXTO);
Coloreado en 0.004 segundos, usando GeSHi 1.0.8.4
Tras ejecutarlo, el resultado es el siguiente
- Código: Seleccionar todo
>: : : : : :
: : : : : :
: : : : : :
: : : : : <
Parece todo correcto, 24 elemntos, contando las de principio de linea.
Uff... no se si me estoy liando, o equivocando, pero lo veo correcto.