print join( ".", unpack( "C4", pack( "N", $addr ) ) ),
        "/",
        join( ".", unpack( "C4", pack( "N", $mask ) ) );