Help for this page

Select Code to Download


  1. or download this
      DB<72> (" "x10) =~ m/ (?{print $x++})/g
 => (" ", " ", " ", " ", " ", " ", " ", " ", " ", " ")
0123456789
  2. or download this
      DB<20> $_=" "x10; s/ /print $x++/ge
 => 10
0123456789