Branch Coverage

blib/lib/Video/Info/MPEG.pm
Criterion Covered Total %
branch 42 72 58.3


line true false branch
118 26 12 if $self->filename
124 56 205403 if (defined $file)
126 0 56 unless $fh->open($file)
160 2 6 if ($self->audio->parse) { }
3 3 elsif ($self->video->parse) { }
3 0 elsif ($self->system->parse) { }
176 2 1 if $self->vcodec eq ''
196 2 1 if $self->vcodec eq ''
227 0 0 unless ($self->next_start_code(186))
253 0 2 if $size <= 0
257 0 6 if ($char < 32 and $char != 10 and $char != 13)
263 2 0 if ($all_printable)
289 0 0 if ($code == 1) { }
0 0 elsif ($code == 2) { }
317 0 0 if ($byte1 & 8)
328 0 0 unless $$self{'vstreams'}
341 0 0 if ($self->get_byte($offset + 5) & 128) { }
377 0 0 if ($codes[0] & 1) { }
413 0 32 unless defined $offset
415 3 29 unless ($offset)
416 0 3 unless defined $offset
436 48608 1765 if ($a != 0)
439 1228 537 if ($b != 0)
442 22 515 if ($c != 1)
448 498 17 if (defined $start_code) { }
449 0 498 if (ref $start_code eq 'ARRAY') { }
451 0 0 if ($sc == $d)
459 14 484 if ($d == $start_code)
476 1 0 if defined $start_code
503 0 205362 unless my $fh = $self->handle
505 0 205362 unless defined $offset
513 1305 204057 if (tell $fh != $offset)
521 205338 24 if ($bytes == 1) { }
24 0 elsif ($bytes == 2) { }
0 0 elsif ($bytes == 4) { }
581 7 3 if $self->duration