Suppression d'espace mais pas tous !

Bonjour à tous,

J'ai un petit souci de suppression d'espace

j'ai une variable

my $var = "bla bla ";

mon but etant de transformer cette variable en "bla bla"

Je n'arrive qu'a supprimer tous les espaces
----
use CGI::Carp qw(fatalsToBrowser);
use strict;

print "Content-type: text/htmlnn";

my $var = "bla bla ";
$var =~ s/s+//g;

print $var; <== qui donne 'blabla'
----

Il y a t'il une solution via une expression régulière de supprimer les
espaces multiples ?

merci d'avance

Fabrice


Bonjour,

Bonjour,

$var =~ s/s+/ /g;

Olivier.

$var =~ s/s+//g;

Il y a t'il une solution via une expression régulière de supprimer les
espaces multiples ?

+ signifie 1 ou plus, il faut utiliser {2,}, 2 ou plus, et remplacer par
une espace.

$var =~ s/s{2,}/ /g;

voir les docs perlre et perlretut.

Bonjour,

$var =~ s/s+/ /g;

Olivier.

Bonjour et merci pour votre réponse,

cependant cela ne répond a ma demande qui etait d'obtenir "bla bla" et non
"bla bla " qui résulte du test de votre solution.

Je continue donc a chercher

++

Fabrice


Dans ce cas il faut substituer en plusieurs étapes :

Il y a t'il une solution via une expression régulière de supprimer les
espaces multiples ?