blib/lib/XML/Atom/Syndication/Thing.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 11 | 18 | 61.1 |
line | true | false | branch |
---|---|---|---|
19 | 110 | 87 | @_ == 1 ? : |
21 | 186 | 11 | if (%param) { } |
22 | 110 | 76 | if (my $stream = $param{'Stream'}) { } |
76 | 0 | elsif ($param{'Elem'}) { } | |
24 | 0 | 110 | if (ref $stream eq 'SCALAR') { } |
110 | 0 | elsif (ref $stream eq 'GLOB' or not ref $stream) { } | |
29 | 110 | 0 | if (ref $stream eq 'GLOB') { } |
31 | 0 | 0 | unless open $fh, $stream |
36 | 0 | 110 | unless ref $stream eq 'GLOB' |