djtoz a écrit a écrit :
je debute egalement en perl
je pense a un truc du style:
$chaine = (s/\s//g && s/\W//g)
|
Cela devrait suffir :
Code :
- $chaine =~ s/\W//gs;
|
alors pour info (selon la doc perl perlre.html et perlop.html qui sont tout 2 dans le dossier html/lib/Pod de l'installation de Perl), \w (minuscule) match tout les caractères alphanumériques + '_' ( mais pas les espaces) et \W (majuscule) tout les autres.
Ensuite l'option g est pour dire qu'il faut remplacer toutes les occurences, et l'option s signifie que perl doit interpréter $chaine comme une simple ligne - en gros il ne s'arrête pas au premier retour chariot - .
Message édité par Tentacle le 30-08-2002 à 00:39:16
