| blib/lib/IPC/Run3/ProfLogReader.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 20 | 60.0 |
| line | true | false | branch |
|---|---|---|---|
| 37 | 0 | 1 | ref $_[0] ? : |
| 40 | 0 | 1 | unless defined $$self{'Source'} and length $$self{'Source'} |
| 45 | 1 | 0 | if (ref $source eq 'GLOB' or UNIVERSAL::isa($source, 'IO::Handle')) { } |
| 0 | 0 | elsif ($source eq '-') { } | |
| 52 | 0 | 0 | unless open PROFILE, "<$$self{'Source'}" |
| 81 | 1 | 4 | unless @ln |
| 82 | 0 | 4 | unless $$self{'Handler'} |
| 87 | 1 | 3 | if @ln == 1 and not length $ln[0] or 0 == index($ln[0], '#') |
| 89 | 1 | 2 | if ($ln[0] eq '\\app_call') { } |
| 1 | 1 | elsif ($ln[0] eq '\\app_exit') { } |