Discussion :

[Ganondorf]

Yop

Je voudrai savoir pourquoi dans le code que j'vais vous copier le print "Pseudonyme trop long ou incorrect\n" ne s'affiche pas

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
 
# si le fichier accés n'existe pas on demande quelques renseignements et on le créer
 if (!-e "users/users.list2") {
    print "\nLe fichier utilisateurs n'existe pas, le service ne pouvant démarrer sans un accés défini
	\rnous allons vous demandez de saisir quelques renseignements sur vous
	\n\n";
 
        GET_NICK:
	print "-> Entrez votre pseudonyme\n";
	chomp (my $nick = <STDIN>);
	print "Pseudonyme trop long ou incorrect\n" && goto GET_NICK if ($nick !~ /^\w+$/ || length($nick)>32);
 
	GET_HOST:
	print "\n-> Entrez votre masque\n";
	print "Exemple: $nick*!*@*\n";
        chomp (my $host = <STDIN>);
	goto GET_HOST if ($host !~ /^.*\!.*\@.*$/);
 
	GET_PASS:
	print "\n-> Entrez votre mot de passe\n";
	chomp (my $pass = <STDIN>);
	goto GET_PASS if (length($pass)<5);
 
	open FILE, ">> users/users.list2" or die "Impossible de créer le fichier utilisateurs";
	print FILE "###############################\n# users.list\n###############################\n\n";
	print FILE "$nick ".time." $pass $host 3 0\n";
	close FILE;
	print "\n*** Votre accés a été crée avec les champs suivants:
	\rPseudonyme: $nick
	\rMasque: $host
	\rMot de passe: $pass
	\n";
}

[iblis]

Bonsoir. Tes gotos ne m'inspirent pas beaucoup. En attendant écris-le plutôt comme ça pour voir :

Code :

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

1
2
3
4
if ($nick !~ /^\w+$/ || length($nick)>32) {
    print "Pseudonyme trop long ou incorrect\n"; 
    goto GET_NICK;
}

[Ganondorf]

salut,

merci pour te réponse mais en fait j'voulai faire ca sur une seule ligne sinon j'aurai fait a peu prét la même chose, puis quel est le probleme avec mes goto ? je sais bien que l'utilisation des goto n'est pas recommandé mais en lisant pas mal de sujet à propos de ca j'en est deduis que l'utilisation que j'en fais est bonne, je peux me tromper si c'est le cas merci de m'expliquer pourquoi.

à plus