diff --git a/deep_fixitycheck.pl b/deep_fixitycheck.pl index 80b1096e20bc6a842eaa7cc621a28ba7de73c780..a6bd3456f2df7c2b12d381b0c7b5334e15cc1614 100644 --- a/deep_fixitycheck.pl +++ b/deep_fixitycheck.pl @@ -28,7 +28,7 @@ use XML::LibXML; use Time::Progress; use XML::LibXML::XPathContext; use Getopt::Long::Complete qw(GetOptionsWithCompletion); -use Digest::CRC; +use Crypt::Checksum::CRC32; use Digest::MD5; use Digest::SHA; use Bloom::Filter; @@ -263,7 +263,7 @@ sub check_file_fixities($$) { my $fileobj = shift; my $result = shift; my %digest_mapping = ( # maps Rosetta fixity algorithm names to Perl fixity algorithm names - 'CRC32' => Digest::CRC->new(type=>"crc32"), + 'CRC32' => Crypt::Checksum::CRC32->new(), 'MD5' => Digest::MD5->new(), 'SHA1' => Digest::SHA->new(1), 'SHA256' => Digest::SHA->new(256),