Perl CRC Checker