The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Acme::Collector64 - Yet Another Base64?

SYNOPSIS

    use utf8;
    use Acme::Collector64;

    my $japanese64 = Acme::Collector64->new(
        index_table => 'あいうえおかきくけこさしすせそたちつてとなにぬねのはひふへほまみむめもらりるれろがぎぐげござじずぜぞばびぶべぼぱぴぷぺぽやゆよわ=',
    );

    $japanese64->encode('Hello, world!');
    $japanese64->decode('てきにごふきやごけくほずへれぞりけち==');

DESCRIPTION

Let's make your own Base64!

METHODS

my $c64 = Acme::Collector64->new([\%args])

Create new instance of Acme::Collector64.

index_table

This is user definable index table. You have to define 65-character string.

index_table by default is "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=".

$c64->encode($data)

This function takes binary string to encode and return the encoded string.

$c64->decode($string)

This function takes text string to decode and return the decoded data.

AUTHOR

Takumi Akiyama <t.akiym at gmail.com>

LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.