;$_=q~y
: ~."@{[A..Z,'
:',Z,A..Y]}".q~
:
;$
:=q
;(?=\s`)
;
;/.$:/x
;goto$&||uc q
;v;
;C
:s
;$:
;$-?Z
:V
;ex
;eval
;E
:s
;$:
;P;x
;eval
;F
:s
;$:
;Z;x
;eval
;G
:s
;$:
; C;x
;eval
;I
:s
;$:
;J;x
;eval
;J
:s
;$:
;O;x
;eval
;K
:s
;$:
;Z;x
;eval
;M
:s
;$:
;($/,G,$".K)[$ ---]
;ex
;eval
;N
:s
;$:
;O;x
;eval
;O
:s
;$:
;$ -++?C
:$   ".V
;ex
;eval
;P
:s
;$:
;N;x
;Q
:eval
;R
:print"@{[map ucfirst lc, qw`F `]}\n"
;exit
;V
:s
;$:
;$ -? I
:X
;ex
;eval
;X
:s
;$:
;F;ex
;eval
;Z
:s
;$:
;M;x
;eval~
;eval