Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options

Answer: Converting an IP from hexadecimal to dotted-quad

by Abigail-II (Bishop)
on Aug 29, 2002 at 13:28 UTC ( #193759=categorized answer: print w/replies, xml ) Need Help??

Q&A > data formatting > Converting an IP from hexadecimal to dotted-quad - Answer contributed by Abigail-II

Here's one way, using Regexp::Common, although it's unlikely to be the most efficient:
use Regexp::Common; $ip =~ s( ^$RE{net}{IPv4}{hex}{-sep=>''}{-keep}$ ){ join '.', map { hex } $2, $3, $4, $5 }xe;

Log In?

What's my password?
Create A New User
[Corion]: A good morning!
[Discipulus]: good morning Corion!
[Corion]: I spent parts of yesterday digging into Filter::Simple to make it not change the line numbers of unfiltered code, but I think I need regex help (which will come in a SoPW I guess). I tried @lines = /((?:"...."|[^" \n]+)\n)/gs, but that matched on...
[Corion]: ... foo "\0\0\0\n" bar\n by matching the first \n instead of matching the four-bytes-in- double-quotes part
[Corion]: ... and I still don't understand why ;)

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (11)
As of 2017-01-23 08:00 GMT
Find Nodes?
    Voting Booth?
    Do you watch meteor showers?

    Results (191 votes). Check out past polls.