导出带有尾随空格和引号的变量

Question

如何导出带有尾随空格和引号的字符变量？

例如：

data x;
format x $quote17.;
x='ruby';
put x=;
run;

(log extract)
x="ruby"

获得以下结果的最有效方法是什么？

x="ruby             "

Answer 1

data x;
  Format x $17. q$1.;
  x='Ruby';
  q='"';
  qxq=cat(q,x,q);
  Put qxq=;
run;

Answer 2

找到了一种方法..

data x;
format x $19.;
x='ruby';
x=quote(subpad(x,1,17));
put x=;
run;

但不确定这是否是最有效的！