Help for this page

Select Code to Download


  1. or download this
    use v5.12;
use warnings;

...
  say "Match $i" if
    '2' =~ m/(??{say "in $i";$i})/;
}
  2. or download this
    # This is perl 5, version 40, subversion 3 (v5.40.3) built for aarch64
+-android

Compilation started at Sat Apr 18 20:38:08
...

Compilation finished at Sat Apr 18 20:38:08, duration 0.03 s