| blib/lib/App/TimeClock/Weekly/Report.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 20 | 40.0 |
| line | true | false | branch |
|---|---|---|---|
| 39 | 2 | 7 | if $#_ != 2 |
| 45 | 1 | 6 | unless -f $self->{'timelog'} and -r $self->{'timelog'} |
| 47 | 1 | 4 | unless ref $self->{'printer'} and UNIVERSAL::can($self->{'printer'}, 'isa') and $self->{'printer'}->isa('App::TimeClock::Weekly::PrinterInterface') |
| 71 | 0 | 0 | unless $_[0]{'_report_time'} |
| 95 | 0 | 0 | if eof $file |
| 99 | 0 | 0 | unless $iline =~ /^i / |
| 101 | 0 | 0 | unless (eof $file) |
| 103 | 0 | 0 | unless $oline =~ /^o / |
| 151 | 0 | 0 | defined $oline ? : |
| 168 | 1 | 1 | unless open my $file, '<:encoding(UTF-8)', $self->{'timelog'} |