Rob Dixon wrote: > > I didn't think it was slick at all. In fact I was disappointed that it looked > such a mess, but I don't see a better way. Anyway, the statement is > > s/([\x00-\1F])/'^'.chr(ord($1) + 0x40)/eg > > where the regex is > > ([\x00-\1F])
Oops. That matches the characters "\0", "\1" and 'F'. It should be ([\x00-\x1F]) :-) John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
