Branch Coverage

blib/lib/YATT/Lite/WebMVC0/Partial/Session.pm
Criterion Covered Total %
branch 0 90 0.0


line true false branch
41 0 0 unless my $sess = $YATT::Lite::WebMVC0::Partial::Session::CON->get_session
60 0 0 unless nonempty(my $sid = $YATT::Lite::WebMVC0::Partial::Session::CON->get_session_sid)
62 0 0 unless nonempty(my $got = $YATT::Lite::WebMVC0::Partial::Session::CON->param($name))
88 0 0 unless my $ck = $con->cookies_in->{$sid_name}
97 0 0 if (defined $prop->{'session'})
109 0 0 if num_is_ge($self->{'cf_session_debug'}, 2)
113 0 0 if (exists $prop->{'session'})
115 0 0 if $self->{'cf_session_debug'}
120 0 0 unless (my $sid = $self->session_sid($con))
122 0 0 if $self->{'cf_session_debug'}
126 0 0 unless my $sess = $self->session_create_by('load', $con, $sid)
131 0 0 if ($sess->is_expired) { }
0 0 elsif (not $sess->id) { }
133 0 0 if $self->{'cf_session_debug'}
137 0 0 if $self->{'cf_session_debug'}
147 0 0 if $self->{'cf_session_debug'}
156 0 0 if @with_init and ref $with_init[0] eq 'HASH'
158 0 0 if (keys %$opts)
164 0 0 if num_is_ge($self->{'cf_session_debug'}, 2)
168 0 0 if (defined $prop->{'session'})
173 0 0 unless my $sess = $self->session_create_by('new', $con)
180 0 0 if @with_init
193 0 0 if (my $sess = 'CGI::Session'->$method($type, $sid, \%driver_opts, $opts))
194 0 0 unless ($sess->is_expired)
207 0 0 do { ref $spec eq 'Regexp' unless not ref $spec } ? :
0 0 do { ref $spec eq 'ARRAY' } ? :
0 0 defined $spec ? :
212 0 0 unless not ref $spec
213 0 0 unless ref $spec
215 0 0 unless $name =~ /$spec/
230 0 0 $self->{'cf_session_driver'} ? :
238 0 0 if (keys %$opts)
244 0 0 if num_is_ge($self->{'cf_session_debug'}, 2)
246 0 0 if (my $sess = delete $prop->{'session'}) { }
251 0 0 if $self->{'cf_session_debug'}
254 0 0 if $self->{'cf_session_debug'}
265 0 0 unless my $sess = $prop->{'session'}
266 0 0 if $sess->errstr
268 0 0 if (my $err = $sess->errstr)
276 0 0 if ($value)
278 0 0 ref $value ? :
285 0 0 unless $self->{'cf_session_path'}
291 0 0 unless $opts->{'name'}
313 0 0 defined $_ ? :
322 0 0 unless $self->{'cf_csrftok_name'}