print uc.(ulu,ankee,-ray,hiskey,ictor,niform,ango,ierra,omeo,uebec,apa,scar,ovember,ike,ima,ilo,uliet,ndia,otel,olf,oxtrot,cho,elta,harlie,ravo,lpha)[96-ord lc].$"for<>=~/./g
Note that non-ascii characters in the above source code will be escaped (such as \x9f).