Branch Coverage

blib/lib/Media/DateTime/JPEG.pm
Criterion Covered Total %
branch 8 10 80.0


line true false branch
21 2 6 unless $exifTool
22 2 6 unless ($exifTool->ExtractInfo($f))
28 2 4 unless (my $datetime = $exifTool->GetValue('DateTimeOriginal'))
44 0 4 unless (my($y, $m, $d, $h, $min, $s) = $datetime =~ / (\d{4}) : # year (\d{2}) : # month (\d{2}) # day \s # space (\d{2}) : # hour (\d{2}) : # min (\d{2}) # sec /x)
61 2 0 if (&blessed($_) and $_->isa('Specio::Exception') or /to DateTime::new did not pass/) { }