Help for this page

Select Code to Download


  1. or download this
    my @array = split //, $s;
    
  2. or download this
    no strict 'vars';
    for (split //, $s) { eval "\$f$i = $_"; ++$i }