(perl) base64 인코딩/디코딩 예제

perl에서 base64 인코딩 예제는 다음과 같다.


#!/usr/bin/perl

use MIME::Base64;

$encoded = encode_base64('Safe1234');
print $encoded;


디코딩은 다음과 같다!


#!/usr/bin/perl

use MIME::Base64;

$decoded = decode_base64('U2FmZTEyMzQ=');
print $decoded;