Discussion :

[nledez]

Bonjour,

je suis sous Linux, j'ai le trigramme d'un utilisateur et je voudrais trouver sa photo sur le disque. Et bien sur la case entre les 2 n'est pas identique.

Exemple :

NLZ
nlz.jpg ou NLZ.jpg ou NlZ.jpg ou NLZ.JPG, etc

J'ai regardé du coté de File::Glob mais visiblement cela ne fonctionne pas correctement.

[Jedai]

Probablement une tâche pour File::Find avec une petite regex (si tu ignores complètement la casse de ton fichier), l'option /i permet d'ignorer la casse.

(si tu sais déjà dans quel répertoire est ton fichier, un simple opendir() readdir() sera toutefois plus rapide)

--
Jedaï

[nledez]

Voici le bout de code qui fonctionne :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
opendir(PHOTOS, $photo_folder);
my @photos = readdir(PHOTOS);
 
sub find_photo {
        my $uid_name = shift;
        for(@photos) {
                return $_ if (/$uid_name.jpg/i && -e "$photo_folder/$_");
        }
}
 
my $uid_photo = find_photo($uid);
print "$uid : $uid_photo\n";