print/[A-Z]/?"AlphaBravoCharlieDeltaEchoFoxtrotGolfHotelIndiaJulietKiloLimaMikeNovemberOscarPapaQuebecRomeoSierraTangoUniformVictorWhiskeyX-rayYankeeZulu"=~/$_[-a-z]+/&&$&:$_,' 'for(uc<>)=~/./g