Help for this page

Select Code to Download


  1. or download this
    ... using a zero-width negative look-ahead assertion; or ... using a z
+ero-width positive look-ahead assertion together with \D ...
  2. or download this
    >perl -wMstrict -le
"my $s = 'xyzINC1234567';
...
 print 'positive assertion true' if $s =~ /INC\d{7}(?=\D)/;
"
negative assertion true