use Digest::CRC;;

$ctx = Digest::CRC->new(type=>"crc32");;

print $ctx->add( pack 'H*', '50020301' )->hexdigest;;

b5e76785