Help for this page

Select Code to Download


  1. or download this
    c:\@Work\Perl\monks>perl -wMstrict -le
    "$_ = 'aaab';
    ...
     in m/^[a]{2,}(?![b])+ <-- HERE / at -e line 1.
    Matched 1 => 'aaab'
    LastMatch1: 'aa'