%w{yn kofu me tsu sn matsue tg utsunomiya on naha mg sendai kn yokohama kw takamatsu is kanazawa iw morioka ib mito hy kobe hk sapporo gm maebashi e matsuyama ac nagoya tky shinjuku sig otsu}.es(2){|k,l|$_=~(v"/^#{k.ir 1,".*"}/")&&$_=l}|s($_)while gets
Note that non-ascii characters in the above source code will be escaped (such as \x9f).