Mail::DKIM::PrivateKey(3pm)				User Contributed Perl Documentation			       Mail::DKIM::PrivateKey(3pm)

NAME

       Mail::DKIM::PrivateKey - a private key loaded in memory for DKIM signing

SYNOPSIS

	my $key1 = Mail::DKIM::PrivateKey->load(
		      File => "/path/to/private.key");

	my $key2 = Mail::DKIM::PrivateKey->load(
		      Data => $base64);

	# use the loaded key in a DKIM signing object
	my $dkim = Mail::DKIM::Signer->new(
		      Key => $key2,
		    );

CONSTRUCTOR

   load() - loads a private key into memory
	my $key1 = Mail::DKIM::PrivateKey->load(
		      File => "/path/to/private.key");

       Loads the Base64-encoded key from the specified file.

	 my $key2 = Mail::DKIM::PrivateKey->load(Data => $base64);

       Loads the Base64-encoded key from a string already in memory.

	 my $key3 = Mail::DKIM::PrivateKey->load(Cork => $openssl_object);

       Creates a Mail::DKIM::PrivateKey wrapper object for the given OpenSSL key object. The key object should be of type Crypt::OpenSSL::RSA.

METHODS

   cork() - access the underlying OpenSSL key object
	 $openssl_object = $key->cork;

       The returned object is of type Crypt::OpenSSL::RSA.

   sign_digest()
       Cryptographically sign the given message digest.

	 $key->sign_digest("SHA-1", sha1("my message text"));

       The first parameter is the name of the digest: one of "SHA-1", "SHA-256".

       The second parameter is the message digest as a binary string.

       The result should be the signed digest as a binary string.

AUTHOR

       Jason Long, <jlong@messiah.edu>

COPYRIGHT AND LICENSE

       Copyright (C) 2006-2008 by Messiah College

       This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.6 or,
       at your option, any later version of Perl 5 you may have available.

perl v5.10.1							    2010-11-14					       Mail::DKIM::PrivateKey(3pm)