sysread ( $FileHandle, $Buffer, $Size, $ChecksumByteOffset ) or die; $Checksum = unpack '%C*', $Buffer;