Branch Coverage

blib/lib/Data/Password.pm
Criterion Covered Total %
branch 34 50 68.0


line true false branch
34 12 0 if -r $sym
40 0 12 unless $Data::Password::DICTIONARY
43 0 12 unless $dict
44 0 12 unless open DICT, "$dict"
49 0 22 if length $dict_line < $Data::Password::DICTIONARY
51 2 20 if (index($pass, $dict_line) > -1)
61 0 18 unless $Data::Password::FOLLOWING
72 6 26 if $diffs =~ /([\@AB])\1{$len}/
73 0 26 unless $Data::Password::FOLLOWING_KEYBOARD
85 0 22 unless $Data::Password::GROUPS
90 47 41 if $pass =~ /[$_]/
97 1 22 if $Data::Password::SKIPCHAR
104 0 25 if $Data::Password::MINLEN and $len < $Data::Password::MINLEN
105 2 23 if $Data::Password::MAXLEN and $len > $Data::Password::MAXLEN
111 2 23 if (CheckLength($pass))
112 2 0 if ($Data::Password::MAXLEN and $Data::Password::MINLEN) { }
0 0 elsif (not $Data::Password::MAXLEN) { }
118 1 22 if CheckCharset($pass)
119 4 18 if CheckTypes($pass)
121 6 12 if CheckSort($pass)
124 2 10 if $dict
131 7 4 if $reason
134 0 4 if $pass =~ /$tuser/i
138 4 0 unless $comment
140 0 0 if $pass =~ /$_/i