conversion de IP address de long a formato octetos

Hola, podria alguien indicar como convertir un direccion IP almacenada
como entero de vuelta a formato en octectos?

La funcion equivalente en Perl es
@sip hace la conversion

#!/usr/bin/perl
#gets the user entry for ip long value
$long = <STDIN>;
#when reading from stdin it is a nice idea to chomp the var =)
# it will insert a line break
chomp $long;
$n = 255;
#this calculates the ip string
@sip = ($long & $n, ($long & ($n<<8)) >>8, ($long & ($n<<16)) >>16,
($long & ($n<<24)) >>24);
print "The ip string is: $sip[0].$sip[1].$sip[2].$sip[3]";

Gracias