1package Digest::MD2;
2
3use strict;
4use vars qw($VERSION @ISA @EXPORT_OK);
5
6$VERSION = '2.04';
7
8require Exporter;
9*import = \&Exporter::import;
10@EXPORT_OK = qw(md2 md2_hex md2_base64);
11
12require DynaLoader;
13@ISA=qw(DynaLoader);
14Digest::MD2->bootstrap($VERSION);
15
16*reset = \&new;
17
181;
19__END__
20
21=head1 NAME
22
23Digest::MD2 - Perl interface to the MD2 Algorithm
24
25=head1 SYNOPSIS
26
27 # Functional style
28 use Digest::MD2  qw(md2 md2_hex md2_base64);
29
30 $digest = md2($data);
31 $digest = md2_hex($data);
32 $digest = md2_base64($data);
33
34 # OO style
35 use Digest::MD2;
36
37 $ctx = Digest::MD2->new;
38
39 $ctx->add($data);
40 $ctx->addfile(*FILE);
41
42 $digest = $ctx->digest;
43 $digest = $ctx->hexdigest;
44 $digest = $ctx->b64digest;
45
46=head1 DESCRIPTION
47
48The C<Digest::MD2> module allows you to use the RSA Data Security
49Inc. MD2 Message Digest algorithm from within Perl programs.  The
50algorithm takes as input a message of arbitrary length and produces as
51output a 128-bit "fingerprint" or "message digest" of the input.
52
53The C<Digest::MD2> programming interface is identical to the interface
54of C<Digest::MD5>.
55
56=head1 SEE ALSO
57
58L<Digest::MD5>
59
60=head1 COPYRIGHT
61
62This library is free software; you can redistribute it and/or
63modify it under the same terms as Perl itself.
64
65 Copyright 1998-2003 Gisle Aas.
66 Copyright 1990-1992 RSA Data Security, Inc.
67
68=head1 AUTHOR
69
70Gisle Aas <gisle@aas.no>
71
72=cut
73