Tengo el siguiente código
Using perl Syntax Highlighting
use Net::FTP;
$ftp=Net::FTP->new("192.168.0.102",timeout=>240) or newerr=1;
$ftp->login("usuario","password");
$ftp->pasv();
$ftp->put(archivo);
$ftp->quit;
$ftp=Net::FTP->new("192.168.0.102",timeout=>240) or newerr=1;
$ftp->login("usuario","password");
$ftp->pasv();
$ftp->put(archivo);
$ftp->quit;
Coloreado en 0.011 segundos, usando GeSHi 1.0.8.4
El script no puede poner el archivo en el servidor. Lo he notado porque he puesto mensajes para ver el avance del programa; llega a la instrucción put y ahí se queda trabado, ya no avanza en la ejecución.
Si me pueden ayudar se lo agradecería mucho.
