Re: [AOLSERVER] Help with Dotted IP conversion

[Rob Mayoff]

+---------- On Feb 25, [EMAIL PROTECTED] said:
> Can anyone help figure out why expr will not accept any values bigger
> than that,

Because your Tcl interpreter uses 32-bit signed integers.

proc dotted_ip_from_long {n} {
    binary scan [binary format I $n] c4 signed_octets
    set octets {}
    foreach octet $signed_octets {
        lappend octets [expr {$octet & 0xff}]
    }
    join $octets .
}