Help for this page

Select Code to Download

Select or download this

$checksum = do {
    local $/;  # slurp!
    unpack("%32C*",<>) % 65535;
};

Select or download this

$checksum = do {
    local $/;  # slurp!
    unpack("%32W*",<>) % 65535;
};