Convert::GeekCode - Convert and generate geek code sequences.

NAME

Convert::GeekCode - Convert and generate geek code sequences.

SYNOPSIS

    use Convert::GeekCode; # exports geek_decode()
    my @out = geek_decode(q(
    -----BEGIN GEEK CODE BLOCK-----
    Version: 3.12
    GB/C/CM/CS/CC/ED/H/IT/L/M/MU/P/SS/TW/AT d---x s+: a--- C++++ UB++++
    P++++$ L+ E--- W+++$ N++ o? K w++(++++) O-- M- V-- PS+++ PE Y+
    PGP- t+ 5? X+ R+++ !tv b++++ DI+++@ D++ G+++ e-- h* r+ z**
    ------END GEEK CODE BLOCK------
    )); # yes, that's the author's geek code
    my ($key, $val);
    print "[$key]\n$val\n\n" while (($key, $val) = splice(@out, 0, 2));

DESCRIPTION

Convert::GeekCode converts and generates Geek Code sequences (cf. http://geekcode.com/). It supports different charsets and user-customizable codesets.

The geekgen and geekdec utilities are installed by default, and may be used to generate / decode geek code blocks, respectively.

SEE ALSO

the geekgen manpage, the geekdec manpage

AUTHORS

Autrijus Tang <autrijus@autrijus.org>

COPYRIGHT

Copyright 2001 by Autrijus Tang <autrijus@autrijus.org>.

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

See http://www.perl.com/perl/misc/Artistic.html

 Convert::GeekCode - Convert and generate geek code sequences.