Help for this page

Select Code to Download


  1. or download this
    \@.=~/(?<=\w{3})(\w)(.(.))(7325,20)*/;
    @_=$1..$3.$3.$3;;
    ...
        7584, print$_[$1]
        while /(?<!\$)(\d+)[^\}]/g }
    while <_>
    
  2. or download this
    1055||13733*{0}.18^0.10964||12.0&&5437
    
  3. or download this
    @foo= 'A'..'ZZZ' ;
    @foo = (' ',@foo,0) ;
    print @foo[7325,20,0,1055,13733,18,0,10964,12,0,5437,7584] ;