#or
my @a = $string=~/(.{1,10})/gs;