Acme::Lelek

encode/decode text to lelek code.

    use feature 'say';

    my $lek = Acme::Lelek->new;
    my $encoded = $lek->encode("LOL");

    say "encoded : $encoded";
    say "original: " . $lek->decode($encoded);

will output:

encoded : AH lEk Lek lek lEK LEK LeK leK lEK original: LOL

SEE ALSO

AH LELEK LEK LEK LEK LEK ( OFICIAL ) HD