Discussion :

[gorgonite]

Bonjour,


quelqu'un saurait me faire marcher cette substitution ?

Code perl :

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

1
2
3
4
5
foreach my $char (qw("é" "è" "ê")) {
	print "$char\t";
	$search =~ s/$char/e/;
	print "$search\n";
}