Discussion :

[maxlegrand]

Bonjour,

comme je l'indique dans la chaine qui me sert de test, je souhaite supprimer les espaces qui se trouvent avant et après les % et de mettre un seul espace entre les mots.
J'ai écrit ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
#!usr/bin/perl -w
use strict;
 
my $message = "%   message qui sera affiche    %   en reduisant les espaces     %et en supprimant ceux avant et apres%";
my $chaine = supp_espace($message);
print $chaine;
 
sub supp_espace{
	my ($message) = @_;
	$message =~ s/%\s*(.*)\s*%/%$1%/g;
	$message =~ s/\s+/ /g;
	return $message;
}

En sortie, j'obtiens :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

%message qui sera affiche % en reduisant les espaces %et en supprimant ceux avant et apres%

Je ne comprends pas vraiment pourquoi l'écriture de l'expression régulière :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

$message =~ s/%\s*(.*)\s*%/%$1%/g;

Ne me supprime pas tous les espaces avant et après les %

Merci

[Woufeil]

Bonjour,

Il y a plusieurs problèmes à priori. Déjà, il te faut utiliser un quantificateur non gourmand pour la chaîne que tu veux recopier (celle entre %) : .* va te prendre aussi les espaces après la chaîne, jusqu'au prochain symbole %. Utilise plutôt .*? à la place, qui va le \s* qui suit prendre les espaces entre la fin de ta chaîne et le %.
Ensuite, ton autre problème vient je pense du fait que tes % sont entrelacés : le même % peut servir au début et à la fin de chaîne. Ce qui va faire qu'une fois que ta regex aura utilisé un % pour une fin de chaîne, elle ne va pas l'utiliser comme début de chaîne. Une solution basique à ce problème pourrait être de doubler tous tes symboles % qui servent deux fois (donc tous sauf le premier et le dernier), d'appliquer ta regex légerment modifiée (remplace .*? par .+?) et de remplacer %% par %.

[Schmorgluck]

Un autre solution serait un test avant dans la regex, ce qui donnerait:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

s/%\s*(.*?)\s*(?=%)/%$1/g

Évidemment, un test arrière au début de la regex donnerait le même résultat. Et même, en combinant les deux, on n'aurait plus que $1 dans la chaîne de substitution. C'est surtout une question de style, en l'occurence.