| blib/lib/Test/Smart/Interface/File.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 20 | 80.0 |
| line | true | false | branch |
|---|---|---|---|
| 36 | 1 | 2 | unless (-e $$self{'_dir'}) |
| 38 | 0 | 1 | unless mkpath($$self{'_dir'}) |
| 56 | 0 | 1 | unless open my $qfile, '>', $self->_get_filename($Qobj->id, 'q') |
| 76 | 7 | 13 | if -e $_ |
| 85 | 1 | 4 | unless $self->has_answer($Qobj) |
| 88 | 1 | 3 | if $self->_is_y($id) |
| 89 | 2 | 1 | if $self->_is_n($id) |
| 90 | 1 | 0 | if $self->_is_s($id) |
| 108 | 0 | 4 | wantarray ? : |
| 126 | 1 | 2 | if $$self{'_dircreat'} |