Petite optimisation de code

Version imprimable

Bonjour j'ai pas mal de dossier à tester avant l'initatialisation du code et j'aimerais savoir si il n'y a pas moyen d'optimiser tous ces unless :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 unless (-e "$root_dir") { `mkdir $root_dir`; print "$root_dir folder created "; } unless (-e "$data_dir") { `mkdir $data_dir`; print "$data_dir folder created "; } unless (-e "$processed_dir") { `mkdir $processed_dir`; print "$processed_dir folder created ";
Merci

J'ai bien une optimisation éventuelle :
Code:

1 2 3 4 5 6 7 8 9 @a_valider=($root_dir, $data_dir, $processed_dir) ; @a_creer=grep { not -e $_ } @a_valider; foreach my $dir (@a_creer) { mkdir $dir; print "$dir folder created "; }
Moi, j'aime bien les fonctions grep ou map ... 8-)

Pour l'explication :
On stocke tous les répertoires à vérifier dans une liste.
On sélectionne dans cette liste tous les répertoires qui n'existent pas. On stocke cette sélection dans une nouvelle liste.
Pour tous les éléments de cette nouvelle liste, on crée le répertoire et on loggue un message de création.

Dit comme ça, ça paraît simple, non ?

Je suis étonné que tu n'aies pas utilisé map ^^

Code:

1
2
3
4
5
6
7
8
9
10
11
 
my @a_valider=($root_dir, $data_dir, $processed_dir) ;
my @a_creer=grep { not -e $_ } @a_valider;
map { &createDir($_) } @a_creer;
 
sub createDir($)
{
    my ($dir) = @_;
    mkdir $dir;
    print "$dir folder created ";
}

27/09/2006, 10h57
2Eurocents

Citation:

Envoyé par MarneusCalgarXP

Je suis étonné que tu n'aies pas utilisé map ^^

La raison en est toute simple (mais je me demande si je ne vais pas finir par rédiger un article sur grep, map et foreach) : map a un double intérêt qui est de traiter tous les éléments, d'une part, et d'autre part de retourner le résultat de ce traitement sous forme de liste. Foreach, à contrario, parcourt tout, mais ne retourne rien.

Ayant supposé (à tort, certainement dans une bonne pratique) que le résultat du mkdir et du print était négligeable, je les ai traité à coup de foreach (lazyness programming ...).

Utiliser la syntaxe avec map a un ENORME intérêt si la fonction &create_dir retourne une valeur. Cela permet alors de conserver une liste de ces valeurs. ;)

Bien ouéj. 8-)
27/09/2006, 16h37
Konrad Florczak

Un grand merci pour la qualité de vos réponses. C'est vraiment rare de voir autant de précisions et d'explications.
Vite que mon projet se termine pour que je m'y mette vraiment !