ファイルのMD5ハッシュを求める
Perlの場合
use Digest::MD5;
my $file = 'exsample.txt';
open FILE, $file;
binmode FILE;
print Digest::MD5 -> new addfile( *FILE ) -> hexdigest;
close FILE;
PHPの場合
$file = 'exsample.txt';
echo md5_file( $file );
use Digest::MD5;
my $file = 'exsample.txt';
open FILE, $file;
binmode FILE;
print Digest::MD5 -> new addfile( *FILE ) -> hexdigest;
close FILE;
$file = 'exsample.txt';
echo md5_file( $file );
Recent Comments