Branch Coverage

blib/lib/Connector/Builtin/Authentication/PasswordScheme.pm
Criterion Covered Total %
branch 25 34 73.5


line true false branch
22 0 0 unless (-r $self->{'LOCATION'})
40 0 10 unless ($user)
45 1 9 unless ($password)
53 1 8 if ($user =~ /[^a-zA-Z0-9_\-\.\@]/)
60 0 8 unless (-r $filename and open FILE, "$filename")
66 6 17 if (/^$user:/)
76 6 0 if ($t[1] =~ / \{ (\w+) \} (.+) /msx) { }
86 2 4 if ($scheme eq 'ssha') { }
1 3 elsif ($scheme eq 'smd5') { }
3 0 elsif ($scheme eq 'crypt') { }
106 0 6 if $Connector::Builtin::Authentication::PasswordScheme::EVAL_ERROR
108 0 6 unless (defined $computed_secret)
118 4 2 if ($computed_secret eq $encrypted) { }
135 1 1 if (scalar @path == 0)
148 1 3 if (scalar @path == 0)
155 0 3 unless (-r $filename and open FILE, "$filename")
161 2 5 if (/^$user:/)