Discussion :

[PadawanInPerl]

Hello,

je croyais avoir fait un compteur avec :

Code :

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

1
2
3
4
5
6
7
 
...
my $cpt=o;
...
...
$cpt++;
...

résultat : r, u, x, aa, ad, ag ....

Ce n'est pas urgent...mais c'est pour la curiosité
d'habitude je n'ai pas ce genre d'affichage.

Merci

[Philou67430]

Tu considères quoi comme erroné ?
Le fait que le comptage se fasse sur du texte ?
Le fait que le comptage saute des lettres ?

Si c'est le deuxième cas, regarde bien ton code, il doit y avoir plusieurs incrémentation, jeune Padawan

[PadawanInPerl]

Hello,

mon souci
est que je croyais avoir 1,2,3,4
et j'ai : a, aa, ad

c'est pas plus bête que moi

[PadawanInPerl]

Une explication ??

effectivement je compte dans une boucle puis à l'extérieur...
je voulais que mes incrémentations soit plus clair...

Pourquoi en lettre ????????

[Schmorgluck]

Je vais peut-être dire une ânerie, mais est-ce que ça n'aurait pas à voir avec le fait que tu as mis une lettre o à la place du zéro ?


Hahem. Désolé. Peut-être que le problème ne se situe pas au niveau de la variable, mais au niveau de la façon dont tu affiches son contenu. Ou alors elle est altérée ailleurs.

Tu pourrais nous donner le résultat du one-liner suivant sur ton script ?

Code :

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

perl -lne'print if /\$cpt\b/' ton_script.pl

[PadawanInPerl]

Bien joué Schmorgluck !!!


Je me suis planté comme "une grosse Buse" comme dirait Gerra...


J'ai par erreur mis un o à la place d'un 0 !!!! chui NUL


Merci à tous les deux...

[Philou67430]

Pire... si tu n'avais pas oublié use strict, tu aurais eu une erreur t'indiquant que les bareword sont interdit, car ton o n'était pas quoté.

L'incrémentation de lettre est une fonction implicite en perl, perso, je n'étais pas surpris, c'est pourquoi j'ai posé la question au départ.