Bonjour,

je suis débutant en perl et j'ai vu dans un exemple de la faq qu'on pouvais se servir de $1 pour substituer le texte qui match dans la regexp. J'ai alors voulu écrire mon propre exemple pour mettre la premiere lettre d'un mot en majuscule (oui, oui, comme ucfirst )

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
 
my $name = "toto";
 
$name =~ s/^[a-z]/uc($1)/eg;
 
print $name;
il me dit alors que $1 est utilisé non initialisé, je me suis alors dit qui ma premiere expression ne matchais pas, mais si je remplace $1 par une lette, la premiere lettre est bien remplacée. Voici l'erreur exacte :

Use of uninitialized value $1 in uc at
Merci à vous !