php,perl计算crc

最新推荐文章于 2024-07-29 22:50:36 发布

weixin_34072637

最新推荐文章于 2024-07-29 22:50:36 发布

阅读量73

点赞数

文章标签： php python

原文链接：https://my.oschina.net/ifeixiang/blog/339506

版权

2019独角兽企业重金招聘Python工程师标准>>>

PHP版：

<?php
echo getCrc32("/var/www/html/resource/koc_data/2013_03/01/1ck65e.koc") ;

# php获取crc32
function getCrc32($filename) {
        if( !file_exists($filename) ) return "0" ;
        $fileSize = filesize($filename);
        if( 0 == $fileSize ) return "0" ; 
        $fileString = file_get_contents($filename) ;
        $crc = strtoupper( dechex( crc32($fileString) ) );
        $ret = $crc."_".$fileSize;
        return $ret;  
}
?>

Perl:

# 需要先安装 String::CRC32
use String::CRC32;
sub getCrc{
    open my $fd , '<' , $filepath or die("error");
    my $crc2 = crc32($fd);    
    my $crc_out = sprintf("%x", $crc2); 
    print uc($crc_out) ; 
}

转载于:https://my.oschina.net/ifeixiang/blog/339506