Discussion :

[Tonytony]

bon voilà je cherche à créer une regexp vérifiant si une chaine contient

7 a 12 caracteres
avec au moins
1 majuscule
1 minuscule
1 chiffre
1car special

donc j'ai pensé à ça

'[[A-Z]+[a-z]+[0-9]+[\#\[\"\'\é\@]+]{7,12}

je n'ai pas mis tout les caractéres spéciaux mais c'est pour lexemple

je pense que les + a l'intérieur des [] englobant les autres sa marche pas

enfin je vois pas d'ou vient mon erreur

[djibril]

voici un code à l'arrache qu'on peut arranger

Code :

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

1
2
3
4
5
6
7
8
my $nombre = 'uyUyuy1yuy@y';
 
if($nombre =~ /^.{7,12}$/  and  $nombre =~ /\d/ and $nombre =~ /[a-z]/ and $nombre =~ /[A-Z]/  and $nombre =~ /[é\@]/ ) {
    print "$nombre : OK\n";          
}
else {
  print "$nombre : PAS OK\n";
}

[Tonytony]

ok c'est ce que jai fait hier avant de débaucher

je me disais aussi que tout mettre dans une seule ça ne marcherait pas

et sinon jai un second problème

mes caractéres spéciaux ne sont pas échappables


je souhaites mettre tout les caractéres spéciaux en test

#~{[|`^@]} .............

donc je les échappe avec antislash \

le truc c'est que certain ne passe pas et donc erreur au bout
y'a t'il donc un raccourci permettant de dire

"moi vouloir tout les Char spéciaux"



EDIT

l'utilisation de ceci est il juste pour mes caractéres spéciaux

[\w_]


le \w désignant les caractéres alphanum et le _

[djibril]

voilà

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
my $nombre = 'uyUyuy1yuy@y';
my $caractere_speciaux = quotemeta('&{}()èù%*µ@'); # caracteres speciaux
if(  $nombre =~ /^.{7,12}$/  and # contient entre 7 et 12 caracteres 
     $nombre =~ /\d/         and # contient un chiffre 
     $nombre =~ /[a-z]/      and # contient une lettre minuscule
     $nombre =~ /[A-Z]/      and # contient une lettre majuscule 
     $nombre =~ /[$caractere_speciaux]/  # contient un caractere special
     ) {
    print "$nombre : OK\n";          
}
else {
  print "$nombre : PAS OK\n";
}

[Tonytony]

ok merci

juste pour savoir le \w marche t'il ou non pour les car spéciaux

je n'ai pas de possibilités de test la c'est pour ça que je demande

[djibril]

pour tes caracteres speciaux, tu les mets ainsi dans le code que je t'ai filé

Code :

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

my $caractere_speciaux = quotemeta('&{}()èù%*µ@'); # caracteres speciaux

\w ne reconnait que les lettres de l'alphabet de a à z, plus le _ ([a-zA-Z0-9_), donc il ne reconnaitra pas les @ ou é, etc etc