Crypt-Hill
view release on metacpan or search on metacpan
lib/Crypt/Hill.pm view on Meta::CPAN
=head2 decode($encoded_message)
Decodes the encoded message using the key provided.
use strict; use warnings;
use Crypt::Hill;
my $crypt = Crypt::Hill->new({ key => 'DDCF' });
my $encoded = $crypt->encode('HELP');
my $decoded = $crypt->decode($encoded);
print "Encoded: [$encoded]\n";
print "Decoded: [$decoded]\n";
=cut
sub decode {
my ($self, $message) = @_;
return $self->_process($self->_decrypt_key, $message);
}
#
( run in 0.396 second using v1.01-cache-2.11-cpan-26ccb49234f )