| line |
true |
false |
branch |
|
39
|
2 |
19 |
if $#_ != 2 |
|
45
|
1 |
18 |
unless -f $self->{'timelog'} and -r $self->{'timelog'} |
|
47
|
2 |
15 |
unless ref $self->{'printer'} and UNIVERSAL::can($self->{'printer'}, 'isa') and $self->{'printer'}->isa('App::TimeClock::Daily::PrinterInterface') |
|
71
|
1 |
7 |
unless $_[0]{'_report_time'} |
|
109
|
1 |
40 |
if eof $file |
|
115
|
1 |
39 |
unless $iline =~ /^i / |
|
117
|
36 |
3 |
unless (eof $file) |
|
119
|
1 |
35 |
unless $oline =~ /^[oO] / |
|
167
|
35 |
3 |
defined $oline ? : |
|
184
|
1 |
12 |
unless open my $file, '<:encoding(UTF-8)', $self->{'timelog'} |
|
198
|
11 |
27 |
if (not defined $current_date) { } |
|
|
7 |
20 |
elsif ($current_date ne $idate) { } |
|
222
|
3 |
35 |
if (defined $oproject and $oproject eq 'DANGLING') |
|
229
|
11 |
1 |
if (defined $current_date) |