Help for this page

Select Code to Download


  1. or download this
    use v5.20;
use Data::Dump qw( pp );
my $str = <<STR;
...

$str =~ /$re{$_}/ and say "$_ found $&" for keys %re;
  2. or download this
     " .. \\" .. "
Eily found " .. \\" .. "
LanX found " .. \\"