Kaptain Krayola - pie 2.0

<cfscript>
	function ip2num(ip){
		oct1 = listfirst(ip,'.');
		oct2 = listgetat(ip,2,'.');
		oct3 = listgetat(ip,3,'.');
		oct4 = listlast(ip,'.');
 
		returnThis = 1 & iif(len(oct1 LT 3),DE("#repeatstring('0',3-len(oct1))##oct1#"),DE("#oct1#")) & iif(len(oct2 LT 3),DE("#repeatstring('0',3-len(oct2))##oct2#"),DE("#oct2#")) & iif(len(oct3 LT 3),DE("#repeatstring('0',3-len(oct3))##oct3#"),DE("#oct3#")) & iif(len(oct4 LT 3),DE("#repeatstring('0',3-len(oct4))##oct4#"),DE("#oct4#")) ;
 
		return returnThis;
	}
 
 
	function num2ip(num){
		num = removechars(num,1,1);
		oct1 = left(num,3);
		oct2 = mid(num,4,3);
		oct3 = mid(num,7,3);
		oct4 = right(num,3);
 
		returnThis = "";
 
		for(i = 1; i LTE 4; i = i + 1){
			currOct = evaluate("oct#i#");
			for(z = 1; z LTE 3; z = z + 1){
				if(left(currOct,1) EQ 0){
					currOct = removechars(currOct,1,1);
				}else{
					if(i LT 4){
						returnThis = returnThis & currOct & '.';
					}else{
						returnThis = returnThis & currOct;
					}
				writeOutput(currOct & "<br>");
				break;
				}
			}
		}
		return returnThis;
	}
 
 
</cfscript>

<cfoutput>
	<cfset ipnum = ip2num("64.168.11.1")>
	<cfset numip = num2ip(ipnum)>
 
	#ipnum# - #numip#
 
</cfoutput>