Discussion :

[delph_b]

Bonjour,

J'aimerais récuperer la date d'un fichier et la comparer avec la date courante pour savoir si mon fichier a plus d'un jour.

Pour l'instant, j'ai ce bout de code:
Code:

my($date_fichier) = ctime(stat($mon_fichier)->mtime);
print($date_fichier);
my($sec,$min,$heure,$jour,$annee,$jour_semaine,$jour_annee,$drap_ete) = localtime(time);



print($date_fichier); m'affiche Mon Aug 23 16:10:02 2004, tout va bien !
Mais comment puis-je la comparer avec la date courante ???

Merci de votre aide

[dmitry_ovsianko]

Je crois que

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

stat($mon_fichier)->mtime

chez toi est le temps UNIX: secondes dès 1970-01-01 00:00:00. Comme la fonction time. Tu peux les comparer comme nombres.

[delph_b]

Tu peux les comparer comme nombres.

C'est a dire ? qu'est ce que je dois faire ???

[dmitry_ovsianko]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
my ($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size, $atime, $mtime, $ctime, $blksize, $blocks) = stat $mon_fichier;
my $time = time;
 
print "mtime = $mtime, time = $time\n";
print $time < $mtime ? 'Futur fichier!' : 'C\'est normal';

[delph_b]

merci de m'avoir aidée mais finalement je vais le faire par un script shell...