使用perl MIME::Base64模块进行base64编码解码 引用root@t225 libexec]# perl -MMIME::Base64 -e 'print encode_base64("123")'MTIz[root@t225 libexec]# perl -MMIME::Base64 -e 'print decode_base64("MTIz")'123[root@t225 libexec]#