Condition Coverage

blib/lib/CGI/AuthRegister.pm
Criterion Covered Total %
condition 0 39 0.0


and 3 conditions

line !l l&&!r l&&r condition
107 0 0 0 $CGI::AuthRegister::SessionId ne '' and param('keywords') eq 'logout'
150 0 0 0 exists $args{-'redirect'} and $args{-'redirect'} ne ''
0 0 0 exists $args{-'redirect'} and $args{-'redirect'} ne '' and $args{-'redirect'} ne $ENV{'SCRIPT_NAME'}
153 0 0 0 exists $args{-'back'} and $args{-'back'}
196 0 0 0 $CGI::AuthRegister::SessionId =~ /^[\w.:-]+$/ and $CGI::AuthRegister::Ticket =~ /^\w+$/
298 0 0 0 $cnt < 100 and not mkdir("db/sessions.d/${sessionid}_$cnt", 448)
477 0 0 0 exists $$r{$k} and $v eq $$r{$k}
578 0 0 0 not -e $lockd and $locked = mkdir($lockd, 448)

or 3 conditions

line l !l&&r !l&&!r condition
203 0 0 0 not ref $se or $CGI::AuthRegister::Ticket ne $$se{'Ticket'}
292 0 0 0 mkdir 'db', 448 or croak()
293 0 0 0 mkdir 'db/sessions.d', 448 or croak()
489 0 0 0 $k eq '' or $v eq ''
595 0 0 0 -f $lockd or -l $lockd