data have;
infile datalines dsd;
input x : $100. ;
cards;
London is a nice city and I like Ice cream and I wish summer come soon
Shall I compare thee to a summer day in Boston?
;
run;
%let keys= London,USA,summer ,New York, football,basketball,winter,Berlin,Autumn,food ;
data want;
set have;
length want $200. ;
do i=1 to countw("&keys.",',');
temp=scan("&keys.",i,',');
if findw(x,temp,,'itsp') then want=catx(',',want,temp);
end;
drop i temp;
run;
... View more
