#! c:\\Perl\\bin\\Perl.exe

use Digest::MD5 qw(md5_hex);
open(FILE, "logs.txt");  # YOU NEED ERROR CHECKING HERE
$md5_hex = Digest::MD5->new->addfile(FILE)->hexdigest;
close(FILE);
print "MD5: " . $md5_hex . "\n";