Help for this page

Select Code to Download


  1. or download this
    if ($&) { print; }
  2. or download this
    perl  -E '$x="a0b"; $x=~/0/; say $&; if ($&) { die "not reached!" } if
+ ($x=~/0/) { say "matched zero" }'
  3. or download this
    0
matched zero