You should probably look closely at perldoc Digest::CRC. Your code appears to combine several methods for generating your output. The OO approach looks close; the rest (in the short time I had to study it) seems to bear only a remote similarlity to the very simple Functional style provided in the doc.