@main[][tList;dLong;sErr]
$tList[^table::create{sIP	z
10.0.0.2	167772161
213.152.135.132
255.255.255.254
255.255.255.255
10.0.0..2
10.1
.10.1.1.1
10.1.1.
	z
}]


<table border="1">
	<tr>
		<td>IP</td>
		<td>^^inet:aton[IP]</td>
		<td>^^inet:ntoa(^^inet:aton[IP])</td>
	</tr>
	^tList.menu{
		$dLong[]
		$sErr[^try-catch-comment{$dLong(^inet:aton[$tList.sIP])}]
		<tr>
			<td>$tList.sIP</td>
			<td>^if(def $dLong){^dLong.format[%u]}{$sErr}</td>
			<td>^if(def $dLong){^try-catch-comment{^inet:ntoa($dLong)}}{&mdash^;}</td>
		</tr>
	}
</table>