base64 shell编码解码

编码
echo ss | perl -e 'use MIME::Base64; $_ = encode_base64(<>); print;'


解码
echo ss | perl -e 'use MIME::Base64; $_ = decode_base64(<>); print;'