Discussion :

[medmans]

Bonjour les sages.
J'ai un code perl qui demande à l'utilisateur le nom et prenom:
Mais le problem est que, à l'exécusion la chaine "Quel est le nom" se repete 2 fois. si quel qu'un peut me dire le pourquoi?
voici le bout de code:

print("Quel est le nom :");
$nom = <STDIN>;
chop($nom);
print("Quel est le prenom :");
$prenom = <STDIN>;
chop($prenom);

voici la solution aprés l'exécution sur le console:

Quel est le nom :geuey
Quel est le nom :Quel est le prenom :Jouere

[Jedai]

Ca doit être ton terminal qui as un problème, chez moi ça passe parfaitement, dans quel environnement testes-tu ?
(Et utilise plutôt chomp() que chop(), c'est plus prudent)

--
Jedaï

[medmans]

j'utlise EnginSite Perl Editor, mais il ne reconnais pas chomp.

Et dites mois svp, je veux teste aussi que le nom ne contient que des lettes a-z, A-Z et les caracteres "-", "." et "'" et pas de chiffres.

Pouvez vous m'aidez?

[Jedai]

j'utlise EnginSite Perl Editor, mais il ne reconnais pas chomp.

Et dites mois svp, je veux teste aussi que le nom ne contient que des lettes a-z, A-Z et les caracteres "-", "." et "'" et pas de chiffres.

Pouvez vous m'aidez?

Utilise tout de même chomp(), le fait que ton éditeur ne le reconnaisse pas n'est pas un problème. Et teste tes scripts dans la console Windows quand tu as des doutes, visiblement le pseudo-terminal de ton éditeur a quelques problèmes.

On peut t'aider, mais tu ferais mieux d'apprendre les regexps, c'est dans ton intérêt (les regexps sont utiles pour plein de choses, et on en voit partout maintenant, tous les langages ont leur regexps, inspirées par celle de Perl).
Consulte perlrequick et perlretut.

Pour reconnaître si le nom ne comporte que les caractères que tu as spécifié :

Code :

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

1
2
3
if( $nom =~ m/\A[-.'A-Za-z]\z/ ) {
   # ...
}

--
Jedaï

[medmans]

merci je l'ai trouvé en faisant ceci:

$tn = length($nom);
if ($chNom =~ (/[a-zA-Z -'.]{$tn}/)){
#.....
}