$<.chars{|x|p'\{}$&
#^_
 

~%'.index(x.tr'A-Za-z',$/)||12}