For example, the following computes the same number as the Sys- tem V sum program: $checksum = do { local $/; # slurp! unpack("%32C*",<>) % 65535; };