IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Programmation et administration système Perl Discussion :

PERL : comparer 2 arborescences (synchro)


Sujet :

Programmation et administration système Perl

  1. #1
    Membre à l'essai
    Profil pro
    Inscrit en
    Décembre 2008
    Messages
    11
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2008
    Messages : 11
    Points : 10
    Points
    10
    Par défaut 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

  2. #2
    Membre éclairé
    Profil pro
    Assistant recherche bioinformatique
    Inscrit en
    Novembre 2007
    Messages
    877
    Détails du profil
    Informations personnelles :
    Localisation : Canada

    Informations professionnelles :
    Activité : Assistant recherche bioinformatique

    Informations forums :
    Inscription : Novembre 2007
    Messages : 877
    Points : 835
    Points
    835
    Par défaut
    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.

  3. #3
    Membre à l'essai
    Profil pro
    Inscrit en
    Décembre 2008
    Messages
    11
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2008
    Messages : 11
    Points : 10
    Points
    10
    Par défaut
    effectivement rsync c'est top, je l'utilisai sur unix, je vais regarder si c'est facilement utilisable sur windows

    merci bien

  4. #4
    Membre éclairé
    Profil pro
    Assistant recherche bioinformatique
    Inscrit en
    Novembre 2007
    Messages
    877
    Détails du profil
    Informations personnelles :
    Localisation : Canada

    Informations professionnelles :
    Activité : Assistant recherche bioinformatique

    Informations forums :
    Inscription : Novembre 2007
    Messages : 877
    Points : 835
    Points
    835
    Par défaut
    avec l'installation par defaut de cygwin, tu as rsync, et un acces a tes disques dures via le chemin /cygdrive. Facile!
    Z.

  5. #5
    Expert confirmé

    Homme Profil pro
    Ingénieur développement logiciels
    Inscrit en
    Avril 2009
    Messages
    3 577
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 58
    Localisation : France, Bas Rhin (Alsace)

    Informations professionnelles :
    Activité : Ingénieur développement logiciels
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Avril 2009
    Messages : 3 577
    Points : 5 753
    Points
    5 753
    Par défaut
    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.
    Plus j'apprends, et plus je mesure mon ignorance (philou67430)
    Toute technologie suffisamment avancée est indiscernable d'un script Perl (Llama book)
    Partagez vos problèmes pour que l'on partage ensemble nos solutions : je ne réponds pas aux questions techniques par message privé
    Si c'est utile, say

  6. #6
    Membre à l'essai
    Profil pro
    Inscrit en
    Décembre 2008
    Messages
    11
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2008
    Messages : 11
    Points : 10
    Points
    10
    Par défaut
    merci bien pour toutes vos réponses

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Comparer deux arborescences (+ fichiers)
    Par Leniouns dans le forum Général Python
    Réponses: 24
    Dernier message: 05/07/2012, 14h11
  2. [Bat] comparer deux arborescences d'un NAS
    Par Josh99 dans le forum Scripts/Batch
    Réponses: 5
    Dernier message: 24/01/2012, 23h04
  3. Comparer deux arborescences
    Par kalume dans le forum Langage
    Réponses: 1
    Dernier message: 09/08/2010, 15h08
  4. diff : comparer deux arborescences
    Par jsjohn dans le forum Administration système
    Réponses: 2
    Dernier message: 02/01/2010, 17h33
  5. Comparer 2 arborescences.
    Par Empty_body dans le forum VBScript
    Réponses: 1
    Dernier message: 24/10/2007, 18h05

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo