From: Jarkko Hietaniemi Date: Fri, 17 Jan 2003 20:23:42 +0000 (+0000) Subject: Upgrade to Digest 1.01. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=70ee44090a3faf48295f65df1a1fe1c53d04be10;p=p5sagit%2Fp5-mst-13.2.git Upgrade to Digest 1.01. p4raw-id: //depot/perl@18511 --- diff --git a/lib/Digest.pm b/lib/Digest.pm index 9727a1c..4ad93ff 100644 --- a/lib/Digest.pm +++ b/lib/Digest.pm @@ -3,7 +3,7 @@ package Digest; use strict; use vars qw($VERSION %MMAP $AUTOLOAD); -$VERSION = "1.00"; +$VERSION = "1.01"; %MMAP = ( "SHA-1" => "Digest::SHA1", @@ -124,11 +124,16 @@ load the right module on first use. The second form allow you to use algorithm names which contains letters which are not legal perl identifiers, e.g. "SHA-1". -If new() is called as an instance method (i.e. $ctx->new) it will just +If new() is called as a instance method (i.e. $ctx->new) it will just reset the state the object to the state of a newly created object. No new object is created in this case, and the return value is the reference to the object (i.e. $ctx). +=item $other_ctx = $ctx->clone + +The clone method creates a copy of the digest state object and returns +a reference to the copy. + =item $ctx->reset This is just an alias for $ctx->new. @@ -151,7 +156,8 @@ Return the binary digest for the message. Note that the C operation is effectively a destructive, read-once operation. Once it has been performed, the $ctx object is automatically C and can be used to calculate another digest -value. +value. Call $ctx->clone->digest if you want to calculate the digest +without reseting the digest state. =item $ctx->hexdigest