blib/lib/Class/ParseText/Base.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 9 | 24 | 37.5 |
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 | 1 | 0 | unless ref $self |
41 | 0 | 0 | unless ref $self |
44 | 0 | 0 | unless open SRC, "< $filename" |
55 | 0 | 0 | unless ref $self |
68 | 3 | 4 | unless ref $self |
70 | 0 | 7 | unless defined $$self{'parser'} |
74 | 7 | 0 | if $$self{'ensure_newline'} |
78 | 0 | 7 | unless defined $start_rule |
81 | 0 | 7 | $$self{'debug'} ? : |