Discussion :

[beware]

Bonjour,

je débute en Perl, et j'aurais souhaité savoir s'il existe un moyen plus rapide de faire un découpage et une assignation sur une chaine de caractère.

Pour résumer, est-il possible de faire ces deux opérations en une seule commande :

Code :

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

1
2
3
 
my $logfile_name = $File_name;
$logfile_name =~ s/.tsp/_MIN.log/g;

Merci.

[Gardyen]

tu veux dire

Code :

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

my $logfile_name = $File_name =~ s/.tsp/_MIN.log/gr;

?

l'option r conserve la première chaine et retourne la valeur modifiée, au lieu de retourner simplement le succès de l'opération

[Philou67430]

Une autre méthode qui pré-existait avant l'arrivée du modificateur /r :

Code :

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

(my $logfile_name = $File_name) =~ s/.tsp/_MIN.log/g;

Ceci s'explique par le fait que l'opérateur = retourne une "lvalue" (left value), c'est à dire un opérande utilisable avec un opérateur non commutatif (comme l'affectation) en tant que valeur à gauche de l'opérateur (ici, l'opérateur =~).

[beware]

Merci pour vos réponses et vos explications.