my @array = $string =~ /.{1,70}/gs;   # Maybe?