@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>
E-mail: