Help for this page

Select Code to Download


  1. or download this
    $ perl -Mstrict -Mwarnings -E '
    "abcdef" =~ / .+ (?{say "Matched so far: $&"}) bcdef $/x;
'
Matched so far: a
  2. or download this
    $ perl -Mstrict -Mwarnings -E '
    use Regexp::Debugger;
    "abcdef" =~ / .+ (?{say "Matched so far: $&"}) bcdef $/x;
'