Bonjour,
Je recherche un script PERL réalisant la compression, suppression et l’archivage de fichiers / à une durée de rétention.
Précisions :
Le traitement disposera d’un fichier texte de configuration regroupant les informations suivantes : le module (nécessaire pour la fonction d’archivage et à titre informatif pour la suppression et la compression), répertoire de traitement, extension des fichiers à traiter (avec les jokers habituels), la durée de rétention (date du jour – la durée de rétention = la date pour laquelle l’ensemble des fichiers inférieurs à cette date seront à traiter), le répertoire d’archivage (FS où les fichiers seront à déplacer) et l’action (ZIP = compression ZIP ou GZIP, DEL = suppression des fichiers, ARCH = Archivage des fichiers)
L’archivage consistera à déplacer les fichiers (du répertoire source, vers la destination) vers un autre FileSystem (par rapport à la durée de rétention), puis de réaliser un TAR de ces fichiers (avec une date dans la nomenclature du fichier). Exemple : MUSIK_20070330120000.tar, VIDEO_20070330120000.tar
La cerise sur le gâteau serait de disposer d’un log applicative traçant par étape (ligne dans le fichier de configuration), le nombre de fichiers traités + Gestion des erreurs dans le PERL
D’avance merci pour votre aide
Environnement : Unix HP
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Exemple de fichier de configuration (config.txt) : Module,Répertoire de traitement,Extension fichiers,Rétention,Action,Répertoire darchivage MUSIK,/home/toto,*.txt,10,ZIP,NULL VIDEO,/home/toto,*.doc,10,DEL,NULL VIDEO,/home/toto,*,10,ARCH,/home/archivage/toto
Partager