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