Foro - Perl en Español

Buenas tardes, un cordial saludo. Tengo una duda: no encuentro la función que me permita abrir un directorio de archivos para poder manejarlos globalmente. Actualmente lo manejo uno por uno así:



¿Qué función me permite abrir el directorio y compararlos?

Gracias.

Quiero una función como la de passthru en PHP o función equivalente en Perl.

Debes usar opendir(), readdir() y closedir(). Más información en perldoc -f opendir, perldoc -f readdir, perldoc -f closedir.

Una función que ejecute código externo, puedes hacerlo con exec(), system() y qx(), dependiendo de si no quieres que regrese el control al programa que llama, o sí, o si quieres obtener además el resultado de la ejecución.

Más información en perldoc -f exec, perldoc -f system, perldoc -f qx, y perldoc perlop.

Muchas gracias, de verdad, pues no conozco Perl y es de gran ayuda tus conocimientos.

Amigo: pero tengo otro problema. En mi directorio tengo dos tipos de archivos:

el primero fi_sir_20100708_20100715.txt en cual varía por fecha, y son muchos.

Y otro sapfi_rechazo_09082010_HCM_1420.txt.

Ya los veo todos mediante el dir, pero ¿Con qué función los separo ya que cada archivo tiene que ir a una base de datos diferente?

También puedes usar glob():

Buenas, amigo. He intentado varias maneras, pero nada. Tengo una gran cantidad de archivos que quiero validar primero separándolos, por nombre:

fi_sir_*.txt, y el otro
sapfi_rechazo_*.txt

La duda: ¿cómo logro abrir y separar los dos archivos, para validarlos todos y poder cargar cada variable a base de datos?

Con la función glob() la abro pero no logro validar cada campo de los archivos.

Si nos enseñas el código que tienes, te podemos decir dónde está el problema...

Por cada archivo, lo puedes abrir, leer por líneas, y separar los campos con split().

Disculpa. Aquí está:



Quiero que me habrá solo los archivos fi_sir_*.txt.

Una de las posibles formas:

Muchas gracias.