Proposed Module: Compress::AsciiFlate

NAME

Compress::AsciiFlate

SYNOPSIS

use Compress::AsciiFlate;
my $caf = new Compress::AsciiFlate;

# maybe set up some parameters here...
# there are plenty of things to play with, e.g:
# minimum word-size for encoding etc...

my $text = 'hello hello hello';
$caf->deflate($text);
print $text; # prints "_hello 1 1"
$caf->inflate($text);
print $text; # prints "hello hello hello"


This module sort of uses Number::Nary, but I couldn't
install the prerequisits on my laptop, so I made a
wee, self-contained, purely-perl emulation of it and
put the sub straight into the package...