Condition Coverage

blib/lib/Dancer/Logger/File/PerRequest.pm
Criterion Covered Total %
condition 1 23 4.3


and 3 conditions

line !l l&&!r l&&r condition
80 0 0 0 ref $fh and $fh->opened
100 0 0 0 $logroot and not -d $logroot
0 0 0 $logroot and not -d $logroot and not mkdir($logroot)
109 0 0 0 -d $expected_path and -x _
0 0 0 -d $expected_path and -x _ and -w _
111 0 0 0 -w $logroot and -x _
114 0 0 0 -w $logroot and -x _

or 2 conditions

line l !l condition
37 1 0 setting('logfile_callback') || sub { my(@d) = localtime(); my $file = sprintf('%04d%02d%02d%02d%02d%02d', $d[5] + 1900, $d[4] + 1, $d[3], $d[2], $d[1], $d[0]); my $request_id = 'Dancer::SharedData'->request ? 'Dancer::SharedData'->request->id : ''; return $file . '-' . $$ . '-' . $request_id . '.log'; }