Comment obtenir la valeur de hachage MD5 en Perl

De la tâche. En Perl code de la variable. Vous avez besoin de calculer la valeur de hachage MD5 de la valeur de cette variable.

Solution

La solution est d'utiliser la bibliothèque Perl Digest::MD5. Bibliothèque Digest::MD5 va de pair avec Perl, donc si vous avez Perl, cette bibliothèque est immédiatement disponible, installation supplémentaire n'est nécessaire.

Obtenir la valeur de hachage MD5, vous pouvez utiliser ce code:

▶ Run
#!/usr/bin/perl

use Digest::MD5 qw(md5_hex);

my $var = 123;

my $md5_hash = md5_hex($var);

print $md5_hash;

Ce programme affiche la chaîne de '202cb962ac59075b964b07152d234b70'.

  • use Digest::MD5 qw(md5_hex); — nous nous connectons la bibliothèque Perl et disons qu'à partir de cette bibliothèque, nous avons besoin d'une fonction md5_hex
  • my $var = 123; — créé une variable et mettez là la valeur de 123
  • my $md5_hash = md5_hex($var); — à l'aide de la fonction md5_hex nous avons calculé la valeur de hachage MD5 de la valeur de la variable $var et mis le résultat dans une variable $md5_hash
  • print $md5_hash; — en déduit la valeur de la variable $md5_hash sur un écran

Si lors de la connexion de la bibliothèque n'est pas préciser que nous avons besoin d'une fonction md5_hex, mais simplement d'écrire use Digest::MD5;, lors de l'exécution du programme sera d'erreur:

Undefined subroutine &main::md5_hex called at a.pl line 7.

Le format de la valeur de retour de la fonction md5_hex

La fonction de md5_hex renvoie toujours une chaîne. Cette ligne est toujours exactement à 32 caractères. Cette ligne peut être des chiffres de 0 à 9 et les lettres minuscules de 'a' à 'f'. Les autres caractères de cette ligne ne peut pas être.

La fonction de md5_hex renvoie MD5 dans la forme d'une chaîne qui contient le nombre dans le système hexadécimal.

Autres articles