x#(a:b)|abs(x-a)==32=b
x#d=x:d
m@main=getLine>>=print.(0^).sum.foldr((#).fromEnum)[]>>m