- data test;
- input A $;
- cards;
- 4副
- 6辆
- 10副
- 5罐
- 500ml
- 1类
- 10管
- 20本
- 3盒
- 10种
- 50斤
- 6盘
- 2盒
- ;
- run;
- data test1;
- set test;
- Pattern=PRXPARSE('/(\d*)(\D*)/');
- if PRXMATCH(Pattern,a) then
- do;
- b=PRXPOSN(Pattern,1,a);
- c=PRXPOSN(Pattern,2,a);
- end;
- run;