next up previous contents
suivant: Dormir une fraction de monter: Les modules standards de précédent: Récupérer le répertoire courant   Table des matières

Calculer la clef MD5 d'un fichier

La clef MD5 est utilisé pour prouver la conformité d'une donnée, c'est á dire qu'á données égales, la clef MD5 sera toujours égale. Donc, si vous avez la clef MD5 d'un fichier, vous pouvez prouver son intégrité.

Habituelement, on utilise le programme openssl avec la commande md5 pour calculer la clef MD5 d'un fichier. Le module Digest::MD5 peut calculer la clef MD5 sur n'importe quelle variable, c'est à dire sur un fichier, si cette variable contient l'intégralité du contenu du fichier.

L'exemple ci dessous calcule sa propre clef et retourne le résultat suivant :

a30b10eef32f3e2f44d5dff748247394

#!/usr/local/bin/perl

use strict;
use Digest::MD5 qw(md5_hex);

my $content = `cat $0`;
print md5_hex($content) ."\n";



2006-03-15