Base64 encode/decode в Perl

Base64 encode/decode в Perl

Продолжаем разговор о том, чего нет в Перле из того, что есть в PHP.
В PHP присутсвуют встроенные функции base64_encode и base64_decode для кодирования и декодирования данных по алгоритму Base64. Для выполнения этой процедуры в Perl потребуется модуль MIME::Base64 (search.cpan.org).
Подключаем модуль к своему проекту:
use MIME::Base64;
И получаем в свое распоряжение две функции: encode_base64 () и decode_base64 () для кодирования и декодирования соответственно.
$encoded_text = encode_base64("Text to encode");
$decoded_text = decode_base64("Text to Decode");

Скачать пример

Поблагодарить автора

Оставить комментарий

Your email address will not be published. Required fields are marked *

*

You may use these HTML tags and attributes: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>