PERL : comparer 2 arborescences (synchro)

Bonjour à tous,

je cherche à comparer 2 arborescences, tous les fichiers doivent être exactement identiques, idem pour les sous-répertoires.

existe-il un module qui ferait cela ?
je n'ai rien trouvé malgré mes recherches

=> en fait, mon réel besoin est de synchroniser un répertoire A vers un répertoire B et ensuite faire un check qu'ils sont bien identique.

et déjà la copie avec le module dircopy n'indique pas lorsque la copie est en échec (ex: fichier locké)

l'OS est windows.

merci pour votre aide

Bonjour,
A ta place, j'installerai cygwin ou mingw, et utiliserais la commande linux rsync. Elle te permet de verifier 2 arborescences en se basant sur le nom, la date, la taille et/ou le checksum du fichier. Si le fichier entre la source et la destination est different d'après les critères chosisis, il sera transferé/copier.
Z.

effectivement rsync c'est top, je l'utilisai sur unix, je vais regarder si c'est facilement utilisable sur windows

merci bien

avec l'installation par defaut de cygwin, tu as rsync, et un acces a tes disques dures via le chemin /cygdrive. Facile!
Z.

Le module File::Copy::Recursive (fonction dircopy) est peut-être une solution, même si elle ne répond pas complètement à ta demande : en cas d'erreur de copie, la fonction retourne prématurément. Il faudrait l'utiliser dans un contexte de liste et vérifier à la fin si $@ ou $! est mis à jour en cas d'erreur, ainsi que vérifier le nombre de fichier copiés.

Evidemment, la solution Cygwin reste parfaitement pertinente : tu peux même utiliser perl sous Cygwin, ainsi que le module File::Rsync.

merci bien pour toutes vos réponses