[REBOL] Re: Decimal to IP address
From: kevin:sunshinecable at: 11-Dec-2000 11:59
On Sat, 9 Dec 2000, Paul E Tretter wrote:
> Anyone have an easy solution for converting a 32 bit decimal number to ip address.
>
> Paul Tretter
Hi Paul,
How about:
dectoip: make function! [netdec] [
d: netdec // 256
c: (to-integer netdec / 256) // 256
b: (to-integer netdec / 65536) // 256
a: (to-integer netdec / 16777216)
ip: to-tuple rejoin [a "." b "." c "." d]
]
print dectoip 3509897244
== 209.52.200.28
Regards,
Kev
