$ perl -MMIME::Base64=encode_base64 -E'say encode_base64(shift^shift)' txt key
Hx0N