diff --git a/t/crc.t b/t/crc.t new file mode 100644 index 0000000..43c3f48 --- /dev/null +++ b/t/crc.t @@ -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(); \ No newline at end of file