| line |
true |
false |
branch |
|
44
|
2 |
7 |
if $#_ != 2 |
|
50
|
1 |
6 |
unless -f $self->{'timelog'} and -r $self->{'timelog'} |
|
52
|
1 |
4 |
unless ref $self->{'printer'} and UNIVERSAL::can($self->{'printer'}, 'isa') and $self->{'printer'}->isa('App::TimeClock::Weekly::PrinterInterface') |
|
76
|
0 |
0 |
unless $_[0]{'_report_time'} |
|
100
|
0 |
0 |
if eof $file |
|
104
|
0 |
0 |
unless $iline =~ /^i / |
|
106
|
0 |
0 |
unless (eof $file) |
|
108
|
0 |
0 |
unless $oline =~ /^o / |
|
156
|
0 |
0 |
defined $oline ? : |
|
173
|
1 |
1 |
unless open my $file, '<:encoding(UTF-8)', $self->{'timelog'} |