Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re (2) Maqs: One for the regexp fans

by nuance (Hermit)
on Aug 04, 2000 at 15:23 UTC ( [id://26168]=note: print w/replies, xml ) Need Help??


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.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://26168]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others musing on the Monastery: (4)
As of 2024-04-19 16:49 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found