Avec une regex :
if ( $var =~ m/^\d+$/ ) {
print " numérique\n";
}
else {
print " alphanumérique\n";
}
edit :
Avec une regex :
if ( $var =~ m/^\d+$/ ) {
print " numérique\n";
}
else {
print " alphanumérique\n";
}
edit :
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.