http://www.perlmonks.org?node_id=26168


in reply to Re: One for the regexp fans
in thread One for the regexp fans

For the substr part, why not just:
(substr ("0$1", -2))

Update: In fact I don't see any reason for the second bracketed expression in the regex. Also I can't see how it expands the first hex number if that's necessary. Is this better? or have I missed something subtle?

$str =~ s/(\.?[0-9a-eA-E]*)/(substr("0$1", -2))/ge;

Nuance

Replies are listed 'Best First'.
RE: Re (2) Maqs: One for the regexp fans
by Maqs (Deacon) on Aug 04, 2000 at 19:09 UTC
    yep. your variant is an enhanced one. I tried only to make a general idea. :)
    /Maqs.