I have a problem when I run the code:
%put This is Tom's car;
You need to "macro" quote the unmatched single quote.
192 %put This is Tom%nrbquote(')s car;
This is Tom's car
%put %str(This is Tom%'s car) ;