z="0000"T=table
while""do
s=":"..io.read().."."a,b,c,d=s:match(z.rep("(%d+%.)",4))i=1 j=1
for t in s:gfind":(%x*)"do T[i]=s.sub(z..t,-4)i=i+1 j=t>""and j or i end
for k=i,8 do T:insert(j,z)end
print(a and d..c..b..a.."in-addr.arpa"or T:concat("",1,8):reverse():gsub(".","%1.").."ip6.arpa")end