Salut à tous
Voila j'ai un petit souci pour récupérer les caractères d'une chaine.
En fait, je génère avec mon script un code composé de 6 chiffres à l'aide de la fonction rand().
Et ce que je souhaiterai, c'est récupérer un à un les chiffres qui composent ce code. Suis assez clair?
Prenons l'exemple ou le rand() génère le code 123456
Et bien je souhaiterais afficher avec un simple print "1,2,3,4,5,6".
pour cela j'ai fait le code suivant

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
my $code = int(rand(900000)+100000);
print "le code est $code";
(my $un,my $deux,my $trois,my $quatre,my $cinq,my $six) = ($code =~ m/^(.)(.)(.)(.)(.)(.)/);
print "voici mon code : $un,$deux,$trois,$quatre,$cinq,$six";
mais voila, en reponse, je n'ai rien, si ce n'est :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
le code est 257916
voici mon code : ,,,,,
c'est donc que les variables $un ... sont vides.
mais pourquoi?