File Coverage

blib/lib/Password/Policy/Encryption/Plaintext.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 20 21 95.2


line stmt bran cond sub pod time code
1             package Password::Policy::Encryption::Plaintext;
2             {
3             $Password::Policy::Encryption::Plaintext::VERSION = '0.02';
4             }
5              
6 1     1   35225 use strict;
  1         3  
  1         40  
7 1     1   63 use warnings;
  1         3  
  1         38  
8              
9 1     1   1051 use parent 'Password::Policy::Encryption';
  1         358  
  1         6  
10              
11 1     1   1138 use String::Multibyte;
  1         6799  
  1         124  
12              
13             sub enc {
14 5     5 0 85 my $self = shift;
15 5         22 my $password = $self->prepare(shift);
16 4         18 return $password;
17             }
18              
19             1;
20              
21              
22              
23             =pod
24              
25             =head1 NAME
26              
27             Password::Policy::Encryption::Plaintext
28              
29             =head1 VERSION
30              
31             version 0.02
32              
33             =head1 AUTHOR
34              
35             Andrew Nelson
36              
37             =head1 COPYRIGHT AND LICENSE
38              
39             This software is copyright (c) 2012 by Andrew Nelson.
40              
41             This is free software; you can redistribute it and/or modify it under
42             the same terms as the Perl 5 programming language system itself.
43              
44             =cut
45              
46              
47             __END__