my @array = $string =~ /./g;