| blib/lib/FLV/File.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 17 | 30 | 56.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 197 | 0 | 0 | 17 | defined $info{'audrate'} && $info{'audrate'} ne $invalid |
| 231 | 0 | 0 | 17 | defined $info{'audformat'} and $info{'audformat'} ne $invalid |
| 235 | 0 | 0 | 17 | defined $info{'vidcodec'} and $info{'vidcodec'} ne $invalid |
| 239 | 3 | 0 | 14 | defined $info{'vidwidth'} and $info{'vidwidth'} ne $invalid |
| 243 | 3 | 0 | 14 | defined $info{'vidheight'} and $info{'vidheight'} ne $invalid |
| line | l | !l | condition |
|---|---|---|---|
| 68 | 2 | 40 | $opts ||= {} |
| 395 | 65037 | 0 | shift() || 0 |
| 431 | 873 | 5662 | shift() || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 134 | 17 | 0 | 0 | $$self{'body'} ||= 'FLV::Body'->new |
| 275 | 18 | 1 | 0 | shift() || croak('Please specify a filehandle') |
| 349 | 57 | 1 | 0 | $$self{'body'} ||= 'FLV::Body'->new |