How can I calculate the MD5 hash of a wav file in Perl?

Question

I have a wav file and I need to calculate the MD5 hash of its contents. How can i do that using Perl?

Accepted Answer

There is module for it: Digest::MD5::File. With it the code is simplified to:

```
use Digest::MD5::File qw( file_md5_hex );
my $md5 = file_md5_hex( $some_file_name );
```

Solution