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

Langage Perl Discussion :

Temps écoulé pour la modification d'un fichier


Sujet :

Langage Perl

  1. #1
    Membre à l'essai
    Inscrit en
    Septembre 2005
    Messages
    16
    Détails du profil
    Informations forums :
    Inscription : Septembre 2005
    Messages : 16
    Points : 12
    Points
    12
    Par défaut Temps écoulé pour la modification d'un fichier
    Hello à tous,

    j'ai un petit problème de compréhension sur calcul de temps d'un fichier afin de savoir depuis combien de minutes ce dernier a été modifié.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    $fic_mday1="monfichier.txt";
    my $mtime = (stat $fic_mday1)[9];
    Jusque là pas de problème j'ai pu extraire l'epoch time du fichier dans $mtime.

    Après ça se complique un peu, comment je fais pour calculer depuis l'heure actuelle l'écart en minutes avec $mtime ?

    Merci de vos sugestions.

  2. #2
    Expert confirmé
    Avatar de GLDavid
    Homme Profil pro
    Service Delivery Manager
    Inscrit en
    Janvier 2003
    Messages
    2 852
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 47
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Service Delivery Manager
    Secteur : Industrie Pharmaceutique

    Informations forums :
    Inscription : Janvier 2003
    Messages : 2 852
    Points : 4 759
    Points
    4 759
    Par défaut
    Salut

    Je te propose le code suivant :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     
    $fic = "C:\\toto.pl";
    @stat = stat $fic;
    $time = time;
    $temps = ($time-$stat[9])/60;
    print "$fic modifié il y a $temps minutes.\n";
    @++
    GLDavid
    Consultez la FAQ Perl ainsi que mes cours de Perl.
    N'oubliez pas les balises code ni le tag

    Je ne répond à aucune question technique par MP.

  3. #3
    Membre à l'essai
    Inscrit en
    Septembre 2005
    Messages
    16
    Détails du profil
    Informations forums :
    Inscription : Septembre 2005
    Messages : 16
    Points : 12
    Points
    12
    Par défaut
    Merci de la réponse, je m'empresse d'essayer.

  4. #4
    Expert confirmé
    Avatar de GLDavid
    Homme Profil pro
    Service Delivery Manager
    Inscrit en
    Janvier 2003
    Messages
    2 852
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 47
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Service Delivery Manager
    Secteur : Industrie Pharmaceutique

    Informations forums :
    Inscription : Janvier 2003
    Messages : 2 852
    Points : 4 759
    Points
    4 759
    Par défaut
    De rien.
    Si c'est OK pourtoi n'oublies pas le tag Résolu.

    @++
    GLDavid
    Consultez la FAQ Perl ainsi que mes cours de Perl.
    N'oubliez pas les balises code ni le tag

    Je ne répond à aucune question technique par MP.

  5. #5
    Membre à l'essai
    Inscrit en
    Septembre 2005
    Messages
    16
    Détails du profil
    Informations forums :
    Inscription : Septembre 2005
    Messages : 16
    Points : 12
    Points
    12
    Par défaut
    C'est ok pour moi

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    $fic = "C:\\toto.pl"; 
    @stat = stat $fic; 
    $time = time; 
    $temps = ($time-$stat[9])/60;
    je rajoute juste :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    chop($temps);
    $count = int ($temps);
    print "$fic modifié il y a $temps minutes.\n";
    pour convertir en entier le résultat.

    Merci encore pour la solution.

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

Discussions similaires

  1. Réponses: 4
    Dernier message: 05/11/2012, 14h37
  2. Date de modification d'un fichier pour un bébé développeur
    Par davidtolkien dans le forum VB 6 et antérieur
    Réponses: 7
    Dernier message: 01/09/2008, 17h08
  3. Commande AWK ou SED pour modification données dans fichier
    Par desbrandesq dans le forum Shell et commandes GNU
    Réponses: 1
    Dernier message: 29/01/2008, 17h56
  4. [DOM] Classe pour modification d'un fichier XML
    Par Dookie dans le forum Bibliothèques et frameworks
    Réponses: 2
    Dernier message: 11/10/2007, 14h59
  5. Réponses: 2
    Dernier message: 16/03/2006, 13h49

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