find and replace observation

[dpa]

I have variable values like

data test;

input spool $;

15'

7'

'8

/8

13\

16j

1

2

3:

;

run;

so I want to select observation with special character before digit and after digit one and replace them with only digit so remove special character.

so out put will be like

15

7

8

8

13

16

1

2

3

Thanks

[data_null__ · Accepted solution]

spool2 = compress(spool,,'DK');