Re: commande DEL avec des espaces après le nom de l'abonné

[Raphael Hertzog <adresse@cachée>]

Le Tue, Jan 25, 2000 at 08:03:47PM +0000, Emmanuel POIRET écrivait:
> est-ce normal ?
> 
> en regardant le code il me semble qu'on ne supprime pas les espaces
> après l'adresse email de l'abonné.
> sub del
> .......
> $what =~ /^(\S+)\s+(.+)\s*$/;
>     my($which, $who) = ($1, $2);

Ben oui . = n'importe quel caractère sauf \n
et les regexps perl sont "greedy"

Solution (on enlève le "greedy" sur ".+"):
 /^(\S+)\s+(.+?)\s*$/

Ou alors si on refuse les espaces dans l'adresse (ce qui me parait
logique) :
 /^(\S+)\s+(\S+)\s*$/

A+
-- 
Raphaël Hertzog >> 0C4CABF1 >> http://tux.u-strasbg.fr/~raphael/
<pub> CD Debian : http://tux.u-strasbg.fr/~raphael/debian/#cd </pub>