Ich gestehe, ich bin etwas schockiert, dass Du kein Beispiel zum Thema Prüfsumme gefunden hast.

lmgtfy ;-) -> https://www.google.com/search?q=Perl+Pr%C3%BCfsumm...

Thema "Prüfsumme": https://de.wikipedia.org/wiki/Pr%C3%BCfsumme
Man kann es relativ einfach machen mit unpack: perlfunc unpack
Oder man greift auf modernere Verfahren zurück, für die man aber Module nachinstallieren müsste.
Ich würd's dann beispielsweise mit Digest::SHA1 umsetzen

Thema "Datei öffnen":
open() ist schon mal ein guter Ansatz; Dokumentation: perlfunc open
Siehe auch Perl's Tutorial zu open perlopentut
Da stehen auch noch einige nette Tipps drin.