Perl string replacement

Question

Perl string replacement

I've used string substitution in perl a couple of times and have substrings and replace them with something else.

I am curious if there is a trick to only preserve certain characters, in particular I want to remove any characters from a string that is not az, AZ, or 0-9.

eg. a b c !@#$%^&*()_~+=[]{}\|;':",./<>? 123

will beabc123

+3

string replace perl

James oravec Dec 24. 14 at 22:27

source to share

1 answer

Dry27 · Accepted Answer · 2014-12-24T22:30:23+0000

Using regex,

s/[^a-zA-Z0-9]//g;

using translation,

tr/a-zA-Z0-9//dc;

Perl string replacement

More articles: