Help for this page

Select Code to Download


  1. or download this
      DB<113> $_="AAAA";  $c="A"; $min=3; /$c {$min}/x; $&
 => "AAA"
  2. or download this
      DB<108> $c="A";$min=3
 => 3

  DB<109> "AAAAA" =~ m/${c}{$min}/;  $&
 => "AAA"