Regular Expression Perl

  1. Home
  2. Perl
  3. Regular Expression
  4. Metacharacters that Turn off Greediness
# Greedy and not greedy
$_="abcdefghijklmnopqrstuvwxyz";
s/[a-z]+/XXX/;
print $_, "\n";
$_="abcdefghijklmnopqrstuvwxyz";
s/[a-z]+?/XXX/;
print $_, "\n";