topic Re: How to use perl regular expression in SAS in SAS Programming

How to use perl regular expression in SAS

zqkal — Thu, 19 Sep 2013 22:21:12 GMT

Perl regular expression in SAS.

Does anyone knows how I could achieve this using perl regular expressions in SAS.

I have this SAS dataset.

DATA given;

input poolno $ name $;

datalines;

00581591 FN

MSR0581591 GN

0581591 FN

A581591A58591 GN

0581591A FN

0581591BB GN

05815910 FN

'0581591 GN

;

run;

I want to apply below rules using SAS regular expressions.

IF LENGTH(POOLNO) > 6 then do the following.

Remove all leading zeros
Remove 'MRS0' prefix if it exist
If a space exists, only keep the portion of the string prior to the space and not including that space Example: ABC 123 -> ABC
If the value exists twice, keep only one of them. Example: ABC123ABC123 -> ABC123
If the 7th nonzero character is alphabetical then only keep the 6 nonzero characters prior

# to that alphabetical character and not including it. Example: 123456A -> 123456

Remove two trailing characters if they exist Example: 123456BB -> 123456
Remove trailing zeroes after the sixth character Example: 12345600 -> 123456
i. Remove leading ' Example: '123456 -> 123456

This is the desired sas dataset:

0581591 FN

585191 GN

0581591 FN

A581591 GN

0581591 FN

0581591 GN

0581591 FN

0581591 GN

Thanks in advance for you kind response.

Re: How to use perl regular expression in SAS

FriedEgg — Fri, 20 Sep 2013 16:04:57 GMT

DATA given;

input ( poolno name ) (: $20.);

newpoolno=prxchange('s#([''\b]|MSR0)?(\w\d{4,5}[1-9])[0\w]{0,}\b#$2#',-1,prxchange('s#^00#0#',1,poolno));

datalines;

00581591 FN

MSR0581591 GN

0581591 FN

A581591A58591 GN

0581591A FN

0581591BB GN

05815910 FN

'0581591 GN

;

run;

An additional note, taken in priority, your rules and results do not mesh perfectly. I coded to match the results provided rather than then rules you listed.

poolno	name	newpoolno
00581591	FN	0581591
MSR0581591	GN	581591
0581591	FN	0581591
A581591A58591	GN	A581591
0581591A	FN	0581591
0581591BB	GN	0581591
05815910	FN	0581591
'0581591	GN	0581591

Re: How to use perl regular expression in SAS

zqkal — Fri, 20 Sep 2013 17:13:04 GMT

sorry ,I made a mistake when writing the desired sas data set but i have what i needed.

Thanks for your help.