用sas分离文本，求大神解答。题如下：

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

please write a SAS program to separate the text below：

One meets its destiny on the road he takes to avoid it. Your mind is like this water, my friend, when it is agitated, it becomes difficult to see, but if you allow it to settle, the answer becomes clear. Yesterday is history Tomorrow is a mystery. But today is a gift. That is why it’s called the present (the gift). Hope is a good thing, maybe the best of things, and no good thing ever dies.

Require 1: the length of each fragment can’t exceed 50;
Require 2: the word can’t be truncated.

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：Difficult yesterday truncated separate Tomorrow

data wanted;
set text;
_text=text;
array txt[*] $50 text1-text10;
i=1;
do until(_text="");
loc1=anyspace(_text,-50);
loc2=anypunct(_text,-50);
loc=max(loc1,loc2);
if loc=0 then loc=50;
txt[i]=left(substr(_text,1,loc));
_text=strip(substr(_text,loc+1));
i+1;
end;
keep text:;
run;

wwang111 发表于 2017-7-24 14:49
data wanted;
set text;
_text=text;

非常感谢