CM wrote:

 s/0x([\d+A-Fa-f]{2})/\\x$1/ge

The \d matches much more codepoints than you think.

Rewrite that also can do "0x400x3C0":

  s/(?=0x[[:xdigit:]])/\x{0}/g;
  s/\x{0}(0x[[:xdigit:]]+)/chr hex "$1"/ge;

--
Ruud

--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to