PERL Beginners - Removing *some* XML Character encodings with regular expression

Author

Removing *some* XML Character encodings with regular expression

Toby Stuart

2005-06-08, 8:57 am

Hi All,

I'm trying to remove chars 00-29 from an XML document and need a regular
expression to do so...

Before: $s = "abc@123";
After : $s should only contain: "abc@123"

I've tried a few things with ranges etc. but can't get it. Obviously I
could check if the number is <= 29 and then replace but would prefer a
single regex if possible.

Thanks

Toby Stuart

Ing. Branislav Gerzo

2005-06-08, 8:57 am

Toby Stuart [TS], on Wednesday, June 8, 2005 at 16:47 (+1000 ) made
these points:

TS> Before: $s = "abc@123";
TS> After : $s should only contain: "abc@123"

TS> I've tried a few things with ranges etc. but can't get it. Obviously I
TS> could check if the number is <= 29 and then replace but would prefer a
TS> single regex if possible.

maybe you are looking for:

my $xml = "abc@123";
$xml =~ s/&\#(\d+)(??{ $1 <= 29 ? "" : "(?!)" });//g;
print $xml;

hope helps.

--

How do you protect mail on web? I use http://www.2pu.net

["Bother," said Pooh, as the hippopotamus' breath knocked him out cold]

Sponsored Links