Foro - Perl en Español

lo puedes ir analizando línea por línea...

Código: Seleccionar todo

my %hash;
my $num = 0;

open (FILE,"file.txt");
while(my $linea = <FILE>){
   if (la línea me interesa){
      $hash{$num} = $linea;
      $num++;
   }
}


Espero que te sirva

Saludos

bueno pues si me sirve muchas gracias, aunque ya hice algo parecido esto parece ser más corto, pero lo que en realidad estoy buscando ahora es encontrar una linea especifica y procesar esa línea

Por ejemplo, si tengo

Código: Seleccionar todo

1234567 => yussen,,,,attach=no|saycid=no|envelope=no|delete=no

y como esta línea muchas y busco un número en especifico (osea el número antes del =>) por ejemplo si quisiera el 1254261, si bien ya encontré una solución que es procesar línea por línea, convertir cada línea en un arreglo al momento de procesar y verificar si $myarreglo[0] es el número que me interesa, pues tengo problemas cuando el => se encuentra pegado al número, osea 7474545=>. ¿Qué puedo hacer para que considere las dos opciones al momento de hacer el split? Osea, cuando entre el número y el igual existe espacio(1232145 =>) y cuando no existe (12458=>).

Apreciaría mucho si me dieran una solución o alguna otra alternativa.
De antemano muchas gracias.

Si vas leyendo línea a línea, sólo tienes que ver si la línea comienza (^) por el $numero que estás buscando (usamos una expresión regular).