File Coverage

blib/lib/Password/Policy/Encryption.pm

Criterion	Covered	Total	%
statement	14	15	93.3
branch			n/a
condition	2	3	66.6
subroutine	6	7	85.7
pod	0	4	0.0
total	22	29	75.8

package Password::Policy::Encryption;
{
  $Password::Policy::Encryption::VERSION = '0.02';
}

use strict;
use warnings;

use Password::Policy::Exception::EmptyPassword;

sub new { bless {} => shift; }
sub enc { return "This was not implemented properly."; }

# alias
sub encrypt {
    my ($self, $arg) = @_;
    return $self->enc($arg);
}

sub prepare {
    my ($self, $password) = @_;
    return $password || Password::Policy::Exception::EmptyPassword->throw;
}

1;



=pod

=head1 NAME

Password::Policy::Encryption

=head1 VERSION

version 0.02

=head1 AUTHOR

Andrew Nelson

=head1 COPYRIGHT AND LICENSE

This software is copyright (c) 2012 by Andrew Nelson.

This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.

=cut


__END__