define(_,`ifelse($1,,,`$1:format(%3d,len(translit($2,$1A-Za-z
,.)))
_(translit($1,A-Za-z,B-Za-z),$2)')')_(A,include(/dev/fd/0))