Added test for crc

This commit is contained in:
Stephen Nelson 2013-08-25 09:52:43 -07:00
parent 32c95bae3d
commit 8b16c2fe14

13
t/crc.t Normal file
View File

@ -0,0 +1,13 @@
use strict;
use warnings;
use Test::More;
use Convert::BinHex 'binhex_crc';
# Random data
my $data = "U1SBdxdMHpA2wlW3TOgUHXZ00jvHnkyU/ndXnr9RMElXdQXUAGYrPpf4F8jO";
my $crc = binhex_crc($data);
is($crc, 35360);
done_testing();