in reply to Creating hourglass using PERL

Take a look at Twirling baton progress indicator in Perl.

Perl is Huffman encoded by design.

In Section Seekers of Perl Wisdom