Simple Perl module with a single function that takes encrypted text and returns the calculated key length.