Copiar, borrar, mover archivos en Perl
Para manejar archivos en
perl tenemos el módulo:
File::Copy#!/usr/bin/perluse File::Copy;Copiar un archivo:copy ("$file1","$file2") or die "Copy failed: $!";Borrar una archivo:unlink ($file2);Mover archivo:move ("$file1","$file2");
hola que tal, mira incorpore ese codigo en uno que ya tenia, se trata de buscar un archivo, luego de que lo encuentra pues muestra el link para su descarga y por ultimo ese archivo debe ser movido de directorio, para cuando lo vuelvan a buscar, pues ya no aparezca, gracias, te dejo el codigo en PHP:
ResponderEliminarEste comentario ha sido eliminado por el autor.
ResponderEliminarsabes si hay alguna manera de decir en ves de un "or die", setear un booleano para notificar por correo electronico que ha habido un error de copia. asi no mato el script si no lo finalizo enviando dicho correo.
ResponderEliminarsabes como puedo sustituirlo
gracias
saludos
GaladCreative.com