my @chunks = $input =~ /(.{1,10})/g;