print<>!~n?pack'H*',<>:uc(unpack'H*',<>),(A)[$$%5]