Select Code to Download

use strict;
use warnings;
...
    return Digest::MD5->new()->add($contents)->hexdigest
      if defined( $contents = <$fh> );
}