Wie kann ich den MD5-Hash einer wav-Datei in Perl berechnen?

8

Ich habe eine WAV-Datei und ich muss den MD5-Hash seines Inhalts berechnen. Wie kann ich das mit Perl machen?

    
MSalters 24.06.2009, 11:30
quelle

6 Antworten

19

Es gibt ein Modul dafür: Digest :: MD5 :: File . Damit vereinfacht sich der Code zu:

%Vor%     
user80168 24.06.2009 14:36
quelle
12

Sicher kannst du. Suchen Sie einfach nach Digest :: MD5 für den Hash-Teil und irgendein WAV-bezogenes Modul , wenn Sie einen bestimmten Teil der Datei hasen möchten (z. B. das Überspringen von Metadaten).

>     
JB. 24.06.2009 11:32
quelle
9

Verwenden Sie den Digest :: MD5

%Vor%

oder Sie könnten die OO-Schnittstelle verwenden:

%Vor%     
Xetius 24.06.2009 11:44
quelle
3

Verwenden Sie einfach Digest :: MD5 .

Je nach Ihren Bedürfnissen kann Perceptual Hashing übrigens auch interessant sein. Sie können Dateien vergleichen, indem Sie ihre Hashes vergleichen (ähnliche Inhalte haben ähnliche Hashes). Allerdings gibt es immer noch keine Perl-Implementierung AFAIK.

    
wazoox 24.06.2009 11:33
quelle
2

Verwenden Sie File :: Slurp mit Digest :: MD5 :

%Vor%     
Sinan Ünür 24.06.2009 13:54
quelle
2

Folgendes, basierend auf ein Kommentar von Benutzer hexten , funktioniert für mich und sollte besser funktionieren als die Antworten, die die Datei schlürfen:

%Vor%

Die (derzeit) am häufigsten gewählte Antwort schlägt vor, Digest::MD5::File zu verwenden, aber das funktioniert für mich zumindest nicht auf dem neuesten Windows-Build von ActiveState Perl, und der Link in der Antwort ist jetzt tot.

    
Kip 27.01.2015 04:30
quelle

Tags und Links