Discussion :

[cbassti1]

Bonjours,

J'essai d'aprendre a developer avec PERL.

je me retrouve actuelement devant un petit souci pour lequel je ne trouve rien dans les doc.

Si j'utilise la fonctionalité tr/x/x/ afin de compter le nombre de caractere x dans une chaine, il n'y a pas de probleme, mais si x est une variable ex: tr/$variable/$variable/ cela ne fonctionne pas il compte tous les caractere v a r i a b l e , mais pas le caractere contenue par cette variable.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
#!/usr/bin/perl -w
 
$file_enter = $ARGV[0];
$lettre = $ARGV[1];
 
open (F, "$file_enter" );
 
while (<F>) {
while (<$file_enter>) {
            $cnt=tr/$lettre/$lettre/;
        print "$cnt $_ ";
}
close F;

Voila a peut pret mon script il n'est plus comme cela, mais je ne l'ai pas avec moi actuelement. Mais a la periode ou il ete encore a cette étape j'avais deja le probleme.
Mes questions sont :
Est il normal que je ne puisse pas utiliser de variable avec tr/// alors qu'avec m// ou s/// cela est possible?.
Avez vous une astuce pour forcer la prise en compte d'une variable?
Avez vous une astuce pour compter le nombre de fois qu’une valeur de variable soit dans une ligne?

Je ne sais pas si je suis réélement clair et veuiller m’excuser.
Mon manque d’experiance est un probleme pour indiquer les termes correcte ainsi que les elements pertinant qui pourrons vous aidez a m'aider.
Pour cette raison n'hesiter pas a me posser des questions et a me rectifier.

Merci a tous

Edité par GLDavid. Merci de lire les règles du forum notamment sur l'utilisation des tags code

[nematoad]

J'ai écrit un truc sur ce sujet. Regardes http://www.developpez.net/forums/vie...62086&start=20 et dis moi si ça correspond à ce que tu cherche, ou si tu as encore des questions.

N