[caracas-pm] Problema con script para copiar archivos de un directorioa otro

Francisco Obispo fobispo at nic.ve
Thu Jun 8 07:37:53 PDT 2006


me imagino que en ese archivo "file.txt" tienes una lista de archivos...
para eso no necesitas un script de perl.. puedes hacerlo desde bash.

for i in `cat /home/aarnal/pruebacopia/file.txt`
    do cp $i /home/aarnal/pruebacopia1/
done


saludos
Alexis Arnal wrote:
> Disculpen encontré un detalle en el código anterior. Ahora es el sgte.
>
> #!/usr/bin/perl -w
>
> $org='/home/aarnal/pruebacopia/file.txt';
> $i=1;
>
> open (ORIGEN,$org);
>
> while(<ORIGEN>){
> 	print "Copiando archivo: $_\t Cantidad de archivos copiados: $i\n";
> 	`cp $_ /home/aarnal/pruebacopia1/`;
> 	$i++;
> 	}
>
> close (ORIGEN);
>
> Sin embargo sigue dando el mismo error
> _______________________________________________
> caracas-pm mailing list
> caracas-pm at pm.org
> http://mail.pm.org/mailman/listinfo/caracas-pm
>
>
>   



More information about the caracas-pm mailing list