[perl] Listar archivos en directorio

[Humberto Hernandez]

Hola Estrella, Segun recuerdo la funcion system solo regresa el
estatus de terminacion del comando ejecutado. Esto es 0 si fue exitoso
u otro numero si no lo fue. Para hacer lo que quieres puedes usar
las "comillas alreves". 

@datos=`ls *[0.9]*.txt")`;

Otra manera de hacerlo es creando una tuberia.

open(LS, "ls *[0..9] *.txt |") or die;
@datos = <LS>
close(LS)

--
 Saludos

-----Mensaje original-----
De: Estrella Dominguez [mailto:papanatas_00@yahoo.com]
Enviado el: Lunes, 15 de Enero de 2001 10:35 a.m.
Para: Lista Perl
Asunto: [perl] Listar archivos en directorio


Saludos Lista.

Una sencilla para ustedes (espero no me agarren a
jitomatasos).

Quiero leer el contenido de un directorio y los
nombres de los archivos almacenarlos en un arreglo o
variable

algo asi:
@datos=system("ls *[0.9]*.txt");

print $datos[0];

Esto no me funciona. Me pueden ayudar?

Gracias por no aventar jitomates :)

=====
Si lo que quieres es vivir cien años, no vivas como vivo yo.





_________________________________________________________
Do You Yahoo!?
Obtenga su dirección de correo-e gratis @yahoo.com
en http://correo.espanol.yahoo.com
--------- Pie de mensaje --------------------------------
Visite: http://tlali.iztacala.unam.mx/~randrade/perl.shtml
Cancelar inscripcion:
mail to: majordomo@tlali.iztacala.unam.mx
text   : unsubscribe perl
--------- Pie de mensaje --------------------------------
Visite: http://tlali.iztacala.unam.mx/~randrade/perl.shtml
Cancelar inscripcion:
mail to: majordomo@tlali.iztacala.unam.mx
text   : unsubscribe perl