Help for this page
split'[\w|\W]';
my @array; for(0..$#string){ my $i = $_; push @array,substr($string,$1,1); }