[caracas-pm] Problema con script para copiar archivos de un directorioa otro
Alexis Arnal
aarnal at gmail.com
Thu Jun 8 07:00:22 PDT 2006
Saludos, estoy teniendo un problemita con un script que hice para
copiar archivos de un directorio a otro.
El archivo file.txt contiene el nombre de los archivos a copiar
Este es el script:
#!/usr/bin/perl -w
$org='/home/aarnal/pruebacopia/file.txt';
$dest='/home/aarnal/pruebacopia1/';
$i=1;
open (ORIGEN,$org);
$copy=<ORIGEN>;
while($copy){
print "Copiando archivo: $copy\t Cantidad de archivos copiados: $i\n";
`cp $copy /home/aarnal/pruebacopia1`;
}
close (ORIGEN);
El error que me da es el siguiente:
cp: falta el fichero de destino
Pruebe `cp --help' para más información.
sh: line 1: /home/aarnal/pruebacopia1: is a directory
Sin embargo cuando lo ejecuto con un oneliner funciona:
perl -e '`cp file.txt /home/aarnal/pruebacopia1/`'
Gracias por su atención
--
#--------------------
#!/usr/bin/perl -w
# Ing. Alexis Arnal
# GNU/Linux user: 411537
# Debian - Kernel 2.6.7-1-386
# CNE. Caracas - Venezuela
#---------------------
use strict;
print "No basta con alcanzar la sabiduría, es necesario saber utilizarla\n";
print "Marco Tulio Cicerón. 106 AC-43 AC. Escritor, orador y político romano\n";
print "http://www.proverbia.net";
#---------------------
More information about the caracas-pm
mailing list