j=(q=FS=/:/?_:".")?4:32{n=8-gsub(c=q?_:":","&")+/:$/ for(i=NF;j;i--<q=p)for(j-=k=i?(p=c~$i)?q?4*n:j%4:1:p=j;k--;)printf(p?0:$i)"."}$0=(c?"ip6":"in-addr")".arpa"
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page