Regular Expression Perl

  1. Home
  2. Perl
  3. Regular Expression
  4. A positive look ahead
$string="I love chocolate.";
$string =~ s/chocolate(?= ice)/vanilla/;
print "$string\n";
$string="this is a test.";
$string =~ s/this(?=is)/test/g;
print "$string\n";