
Envoyé par
helkha86
Bonjour
Dans cette instruction de regexes :
($LINE = $_) =~ s!(.*)\#.*$!$1!;
Je veux savoir si cette ligne d’instruction est correcte vue que on voit bien que la chaine qui vas remplacer le motif est commenter
NB:
! Peut aussi être un séparateur ?
Merci
bonjour,
concernant ton regexp le \# est inutile, nul besoin de l exempt, test ceci pour verifier :
1 2 3
| my $Text_A_Split = "bla#bli";
(my $Text_Split = $Text_A_Split) =~ s/^(.*)#(.*)$/$2$1/
print $Text_Split."\n"; |
puis :
1 2 3
| my $Text_A_Split = "bla#bli";
(my $Text_Split = $Text_A_Split) =~ s/^(.*)\#(.*)$/$2$1/;
print $Text_Split."\n"; |
ensuite les ! sont des / 
donc ton regexp aura plutot cette forme :
(my $Line = $_) =~ s/^(.*)#.*$/$1/;
normalement, tu peux meme retirer les ^ ( debut de la chaine ) et $ ( fin de la chaine )
et en allegeant completement , ceci devrait meme marcher ( sauf si tu as plusieurs # dans $_ ) :
(my $Line = $_) =~ s/#.*//;
cordialement
ours
Partager