À (at) 7 Dec 2006 06:19:30 -0800, "lolodev" nous disait (told us):
$var = ~ s/,//g;
merci
ben y'a qu'à tester :
#!/usr/bin/perl
use warnings; use strict;
my $var = "ofzef , eihf, epif,ofehz hefz , ,,";
print "$varn";
$var =~ s/,//g;
print "$varn"
__END__
-- Thomas vO - <http://perso.enstimac.fr/~vanouden/>
Benoit Izac
Bonjour,
le 07/12/2006 à 15:19, lolodev a écrit dans le message :
$var = ~ s/,//g;
« s/,//g » supprime les virgules de la variables $_ « ~ » effectue un complément à 1 avec le nombre de virgules supprimées « = » affecte le résultat de l'opération précédente à $var
Il me semble par ailleurs que le « » devant la virgule est superflu.
-- Benoit Izac
Bonjour,
le 07/12/2006 à 15:19, lolodev a écrit dans le message
<1165501170.146492.208920@l12g2000cwl.googlegroups.com> :
$var = ~ s/,//g;
« s/,//g » supprime les virgules de la variables $_
« ~ » effectue un complément à 1 avec le nombre de virgules supprimées
« = » affecte le résultat de l'opération précédente à $var
Il me semble par ailleurs que le « » devant la virgule est superflu.
le 07/12/2006 à 15:19, lolodev a écrit dans le message :
$var = ~ s/,//g;
« s/,//g » supprime les virgules de la variables $_ « ~ » effectue un complément à 1 avec le nombre de virgules supprimées « = » affecte le résultat de l'opération précédente à $var
Il me semble par ailleurs que le « » devant la virgule est superflu.