split("lpha ravo harlie elta cho oxtrot olf otel ndia uliet ilo ima ike ovember scar apa uebec omeo ierra ango niform ictor hiskey -ray ankee ulu",A){for($0=$(FS=e);c>sprintf("%c",e++)||e=c=toupper($++j);)$j=c A[e-64]}1