Branch Coverage

blib/lib/WWW/Suffit/Plugin/FileAuth.pm
Criterion Covered Total %
branch 0 76 0.0


line true false branch
238 0 0 $configsection ? :
242 0 0 unless path($pwdb_file)->is_abs
243 0 0 if (-e $pwdb_file) { }
244 0 0 if (open my $records, '<', $pwdb_file) { }
247 0 0 unless $_
249 0 0 unless $l
250 0 0 if $l =~ /^[#;]/u
276 0 0 if $payload{'error'}
279 0 0 unless (scalar @users)
293 0 0 ref $_[0] eq 'HASH' ? :
0 0 scalar(@_) % 2 ? :
0 0 scalar @_ ? :
298 0 0 if length $password
315 0 0 unless (length $username)
326 0 0 if ($expiration and -e $file and $ustat_tm + $expiration > $now)
333 0 0 unless ($pwdb)
343 0 0 unless (_check_pw($password, $pw))
360 0 0 $data->{'status'} ? :
367 0 0 $data->{'email'} ? :
371 0 0 unless (-e $file)
387 0 0 ref $_[0] eq 'HASH' ? :
0 0 scalar(@_) % 2 ? :
0 0 scalar @_ ? :
412 0 0 unless (length $username)
424 0 0 -e $file ? :
427 0 0 unless ($user->{'username'})
444 0 0 unless $_
447 0 0 unless length $usr and length $pwd
448 0 0 if (@line == 3) { }
0 0 elsif (@line == 2) { }
464 0 0 unless length $pwd and length $sum
465 0 0 if ($sum =~ /^[0-9a-f]+$/iu) { }
466 0 0 if (length $sum == 32) { }
0 0 elsif (length $sum == 40) { }
0 0 elsif (length $sum == 56) { }
0 0 elsif (length $sum == 64) { }
0 0 elsif (length $sum == 96) { }
0 0 elsif (length $sum == 128) { }