Foro - Perl en Español

En estos casos en los que tenía que conectarme a un directorio y bajarme los ficheros nuevos, yo adoptaba otra solución:

Código: Seleccionar todo

* Conectarme al servidor
* Pedir un listado de los ficheros disponibles
* Por cada fichero de esa lista
*    Bajar el fichero si no está en el directorio local

Vamos, en Perl se haría también en cuatro líneas.

Esta solución se puede adoptar si en el directorio del servidor sabemos que solo pueden existir ficheros que podemos bajarnos. Si responden a un determinado patrón podemos filtrarlos con una expresión regular como ha mostrado kidd.

Pero claro, también es posible que no se pueda aplicar a tu caso y tengas que bajarte solo el fichero que te indican. O que no tengas posibilidades de pedir un listado del contenido porque el FTP esté cerrado para esa operación.

Cuando dices que te conectas por Telnet, ¿a qué te refieres exactamente? ¿A mano o a máquina?

Con módulos como Net::Telnet puedes conectarte y obtener esa salida.

Por este foro encontrarás hilos que te muestran ejemplos de cómo usar Perl para hacer lo que estás haciendo ahora mismo a mano (la conexión telnet y dialogar con el servidor). Te puede ser útil si eres capaz de automatizar esa tarea.

En cuanto al nombre del fichero en el ftp, fíjate que la solución de kidd se basa en extraer el nombre del fichero a partir de la información que la conexión Telnet te devuelve. Y mi solución es la de conectarse por las bravas en el ftp, entrar en el directorio y bajarnos todos los ficheros nuevos que no tengamos. Esta segunda solución depende de si tu servidor de FTP te permite dar un listado de esos ficheros o los deja ocultos. En ese caso, solo te puede hacer la solución de kidd.