RE: Removing *some* XML Character encodings with regular expressi on

[Thomas Bätzler]

Toby Stuart <[EMAIL PROTECTED]> asked:
> I'm trying to remove chars 00-29 from an XML document and 
> need a regular expression to do so...
> 
> Before: $s = "abc&#26;&#19;&#64;123";
> After : $s should only contain: "abc&#64;123"

$s =~ s/(&#(\d+);)/$2<=29?"":$1/eg;

HTH,
Thomas

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>