in reply to inet_ntoa question

print inet_ntoa(pack("N", $var));