perl Digest-BubbleBabble