for(<>){$s=0;
for$i(a..z){$s^=/$i/}
print$s,$/}