String Substitution

Junior WebHelper Joined: 08 Feb 2002 Posts: 37

Dear friends,

I've got a problem with a substitution in Perl. I have a string ( let's supose $word) that can have values like the followings - it's impredictable:

asd3$( .ophG

wordº çhtn mnfbgd

@word_8 klMNBVFR 12

I want to extract only the character A to Z , a to z and 0 to 1 from the strings so I could have:

asd3 ophG

word çhtn mnfbgd

word 8 kIMNBVFR 12

How can I do this?

Please answer as soon as possible - It's very urgent (again).

Best regards,

Kepler

Posted: Fri Nov 07, 2003 10:47 am (20 years, 5 months ago)

$s = "stringwith some weirdochars";
$s =~ s![^\w\d]!!g;

Junior WebHelper Joined: 08 Feb 2002 Posts: 37

Hi,

it works like a charme...

Thank you,

Kepler