| blib/lib/PPI/Util.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 20 | 80.0 |
| line | true | false | branch |
|---|---|---|---|
| 34 | 0 | 17 | if @_ > 1 |
| 35 | 0 | 17 | unless defined $_[0] |
| 37 | 1 | 16 | unless ref $_[0] |
| 38 | 6 | 10 | if &_SCALAR0($_[0]) |
| 39 | 1 | 9 | if &_ARRAY0($_[0]) |
| 40 | 7 | 2 | if &_INSTANCE($_[0], "PPI::Document") |
| 46 | 1 | 687 | unless my $file = shift() |
| 49 | 1 | 686 | unless open FILE, "<", $file |
| 51 | 0 | 686 | unless close FILE |
| 67 | 0 | 165 | unless ref $content |