Bonjour,
 
Est-il possible de récupérer dans une variable le fichier le plus récent d'un répertoire ?
 
Merci d'avance.

A priori, je ferais comme suit:
- faire opendir sur le répertoire
- créer un couple de variables nom de fichier et temps pour stocker le résultat
- boucler et pour chaque entrée qui est un fichier (-f) récupérer le temps de la dernière modification (stat)
- comparer avec le temps stocké, s'il est postérieur, stocker le nom et temps de dernière modif à la place de ceux stockés
- une fois la boucle terminée faire un closedir
=> on a le nom du fichier qui est stocké dans la variable ad hoc.
 
A+,

Bref un truc dans ce style ci:

#!/usr/bin/perl
use strict;
use warnings;
use autodie;
use Cwd;
 
my $dir = './bat';  # a remplacer par le nom du répertoire voulu
my $file;
if (opendir(my $dh, $dir)) {
  my $old_dir = getcwd();
  chdir($dir);
  my $ftime = 0;
  foreach (readdir($dh)) {
    if (-f) {
      if ((stat)[9] > $ftime) {
        $file = $_;
        $ftime = (stat)[9];
      }
    }
  }
  closedir($dh);
  chdir($old_dir);
}
print $file if defined($file);

A+,

bonjour Gilou,
 
Merci beaucoup encore car c'est exactement ce qu'il me fallait.
 
A+