Branch Coverage

blib/lib/CGI/Auth/Basic.pm
Criterion Covered Total %
branch 0 96 0.0


line true false branch
36 0 0 if @args % 2
44 0 0 if ($o{'cgi_object'} eq 'AUTOLOAD_CGI') { }
51 0 0 unless ($o{'ihacloaiwtui'})
52 0 0 if ref $o{'cgi_object'} ne 'CGI'
57 0 0 if ($o{'file'} and -e $o{'file'} and not -d $o{'file'}) { }
66 0 0 unless $password
88 0 0 if ref $code eq 'CODE'
95 0 0 if (!ref($$self{'hidden'}) eq 'ARRAY')
102 0 0 if $$_[0] eq $$self{'cookie_id'}
103 0 0 if $$_[0] eq $$self{'cookie_id'} . '_new'
108 0 0 @hidden_q ? :
148 0 0 unless $$self{'setup_pfile'}
149 0 0 unless ($$self{'cgi'}->param('change_password'))
174 0 0 if $not_ok
184 0 0 unless $PASSWORD->open($$self{'password_file_path'}, '>')
185 0 0 if $$self{'use_flock'}
187 0 0 if $$self{'use_flock'}
196 0 0 unless $PASSWORD->open($$self{'password_file_path'})
209 0 0 if ($$self{'cgi'}->param($$self{'changep_param'}))
210 0 0 unless ($$self{'cgi'}->param('change_password'))
232 0 0 if (ref $$self{'password'} eq 'CODE')
237 0 0 if ($$self{'cgi'}->param($$self{'logoff_param'}))
247 0 0 if ($pass_param = $$self{'cgi'}->param($$self{'cookie_id'})) { }
0 0 elsif ($pass_param = $$self{'cgi'}->cookie($$self{'cookie_id'})) { }
248 0 0 if (not $pass_param =~ /$RE/ and $self->_match_pass($pass_param)) { }
270 0 0 if (not $pass_param =~ /$RE/ and $pass_param eq $$self{'password'}) { }
297 0 0 unless $code
301 0 0 if (not $param =~ /\W/msx and exists $$self{$param})
310 0 0 unless my $key = shift()
317 0 0 if @args % 2
319 0 0 if ($o{'delete_all'}) { }
321 0 0 if $key =~ / \A template_ /msx
327 0 0 if exists $o{$key}
335 0 0 if @args % 2
338 0 0 unless $$self{'_TEMPLATE_TITLE'}{'title_' . $_}
346 0 0 if @args
399 0 0 if @args
464 0 0 $$self{'hidden_q'} ? :
465 0 0 if ($$self{'logged_in'})
491 0 0 @args % 2 ? :
492 0 0 $p{'cookie'} ? :
495 0 0 if ($$self{'hidden_q'}) { }
501 0 0 if $p eq $$self{'logoff_param'} or $p eq $$self{'changep_param'} or $p eq $$self{'cookie_id'} or $p eq $$self{'cookie_id'} . '_new'
508 0 0 if (@qs)
519 0 0 $p{'forward'} ? :
523 0 0 $p{'forward'} ? :
559 0 0 if @args
624 0 0 $exit ? :