« Programmation Perl/Expressions régulières » : différence entre les versions
Contenu supprimé Contenu ajouté
Ligne 369 :
Il est possible que le caractère (ou plus généralement le motif) soit présent ou non.
On utilise pour cela le quantificateur ''?''.
<source lang="perl">
#!/usr/bin/perl -w
use strict;
# quantificateur ?
@tableau = qw(pommes pomme mess);
print 'Test sur la regex : if ( $texte =~ m/me[s]?$/ )'."\n";
foreach my $texte (@tableau){
print "“$texte“";
if ( $texte =~ m/me[s]?$/ ){ print " vrai, "; }
else{ print " faux, "; }
}
print "\n";
</source>
=== Entre 0 ou un nombre non déterminé d'occurrences : * ===
| |||