diff options
Diffstat (limited to 'pod/perlfunc.pod')
| -rw-r--r-- | pod/perlfunc.pod | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/pod/perlfunc.pod b/pod/perlfunc.pod index f9bd2c56ad..ef27b8b44a 100644 --- a/pod/perlfunc.pod +++ b/pod/perlfunc.pod @@ -4322,9 +4322,9 @@ themselves. Default is a 16-bit checksum. For example, the following computes the same number as the System V sum program: while (<>) { - $checksum += unpack("%16C*", $_); + $checksum += unpack("%32C*", $_); } - $checksum %= 65536; + $checksum %= 65535; The following efficiently counts the number of set bits in a bit vector: |