Branch Coverage

blib/lib/oEdtk/Tracking.pm
Criterion Covered Total %
branch 1 70 1.4


line true false branch
8 0 1 if (defined $_TRACK_TRK and $_TRACK_SIG =~ /warn/i)
16 0 0 if (defined $_TRACK_TRK)
44 0 0 if ($source =~ /^\-/)
53 0 0 if ($mode eq 'NONE')
65 0 0 if (@$keys > $$cfg{'EDTK_MAX_USER_KEY'})
76 0 0 if (length $key > 8)
80 0 0 if (exists $seen{$key})
90 0 0 if (length $app > 20)
102 0 0 if (length $user > 10)
108 0 0 if (length $source > 128)
130 0 0 if ($$dbh{'Driver'}{'Name'} eq 'SQLite')
132 0 0 if ($@)
138 0 0 if (defined $$cfg{'EDTK_TRACK_SIG'} and not $$cfg{'EDTK_TRACK_SIG'} =~ /no/i)
150 0 0 if $$self{'mode'} eq 'NONE'
155 0 0 if (@data > @usercols + 1)
187 0 0 if ($#data > 0)
188 0 0 if (defined $data[$i] and length $data[$i] > 128)
197 0 0 if ($job eq 'W' or $job eq 'H') { }
0 0 elsif ($job eq 'J') { }
201 0 0 if $job eq 'H'
217 0 0 unless $sth->execute(values %$values)
219 0 0 if (not $$dbh{'AutoCommit'})
220 0 0 unless $dbh->commit
228 0 0 if (not defined $entity or length $entity == 0)
257 0 0 if (defined $end)
262 0 0 if (defined $excluded_users)
305 0 0 if (defined $end)
310 0 0 if (defined $excluded_users)
318 0 0 if (defined $ed_app)
364 0 0 if (defined $end)
369 0 0 if (defined $excluded_users)
402 0 0 if $job =~ /^H/
403 0 0 unless (defined $job and $job =~ /^([JSDLWEHR])/)
404 0 0 defined $job ? :
426 0 0 unless (defined $edmode and $edmode =~ /^([BTMWG])/)