| blib/lib/Class/ParseText/Base.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 22 | 31.8 |
| line | true | false | branch |
|---|---|---|---|
| 16 | 2 | 0 | if (my $type = ref $source) { } |
| 17 | 2 | 0 | if ($type eq 'SCALAR') { } |
| 0 | 0 | elsif ($type eq 'ARRAY') { } | |
| 32 | 0 | 0 | unless ref $self |
| 41 | 0 | 0 | unless ref $self |
| 44 | 0 | 0 | unless open SRC, "< $filename" |
| 56 | 0 | 0 | unless ref $self |
| 68 | 2 | 3 | unless ref $self |
| 71 | 0 | 5 | unless defined $self->{'parser'} |
| 74 | 5 | 0 | if $self->{'ensure_newline'} |
| 78 | 0 | 5 | unless defined $start_rule |