line |
true |
false |
branch |
1473
|
1 |
1 |
if (@part >= 5 and $mon = $monthNum{ucfirst lc $part[1]}) { } |
|
1 |
0 |
elsif ($val =~ m[(\d{4})/\s*(\d+)/\s*(\d+)/?\s+(\d+):\s*(\d+)\s*(P?)]) { } |
|
0 |
0 |
elsif ($val =~ m[(\d{4})[-/](\d+)[-/](\d+)\s+(\d+:\d+:\d+)]) { } |
1480
|
0 |
1 |
$6 ? : |
1500
|
0 |
0 |
if ($ss >= 60) |
1502
|
0 |
0 |
if ++$min >= 60 |
1525
|
2 |
0 |
if $val[0] |
1526
|
2 |
0 |
if ($val[2] and $val[3]) |
1529
|
0 |
2 |
if $rat > "1.9" and $rat < "3.1" |
1531
|
2 |
0 |
if defined $dur1 |
1532
|
2 |
0 |
unless $subDoc++ < $et->{'DOC_COUNT'} |
1538
|
0 |
0 |
if ($subDoc == 1) { } |
1543
|
0 |
0 |
if $j |
1544
|
0 |
0 |
unless defined $rawValue->{$key} |
1552
|
0 |
0 |
if $i < 2 |
1554
|
0 |
0 |
$key ? : |
1556
|
0 |
0 |
unless defined $val[0] and defined $val[1] |
1571
|
0 |
0 |
if $size < 4 |
1572
|
0 |
0 |
if ($et->Options("Verbose")) |
1577
|
0 |
0 |
unless ($tagInfo) |
1579
|
0 |
0 |
unless $tagInfo |
1582
|
0 |
0 |
if ($tagInfo->{'SubDirectory'}) { } |
1595
|
0 |
0 |
unless ($offset) |
1625
|
0 |
0 |
if $n > 2 |
1650
|
13 |
0 |
unless ($charset) |
1651
|
0 |
13 |
if ($et->{'CodePage'}) { } |
|
13 |
0 |
elsif (defined $charset and $charset eq '0') { } |
1658
|
0 |
13 |
if $verbose |
1664
|
0 |
34 |
if ($start + $len > $end) |
1668
|
5 |
29 |
if ($tag eq "LIST" and $len >= 4) |
1676
|
28 |
6 |
if ($tagInfo) { } |
|
0 |
6 |
elsif ($verbose or $unknown) { } |
1677
|
17 |
11 |
if ($tagInfo->{'SubDirectory'}) { } |
|
10 |
1 |
elsif (not $tagInfo->{'Binary'}) { } |
1680
|
1 |
16 |
if (defined $newBase) |
1691
|
3 |
7 |
if ($format and $format eq "string") |
1695
|
3 |
0 |
if $charset |
1709
|
3 |
31 |
if $len & 1 |
1735
|
0 |
0 |
$a[2] ? : |
|
0 |
0 |
$a[4] ? : |
|
0 |
0 |
$a[6] ? : |
1738
|
0 |
0 |
unless ($ee) |
1773
|
0 |
0 |
$a[15] eq 'S' ? : |
1774
|
0 |
0 |
$a[14] eq 'W' ? : |
1778
|
0 |
0 |
unless ($ee) |
1799
|
0 |
0 |
unless ($et->Options("ExtractEmbedded")) |
1811
|
0 |
0 |
if $pos + $recLen{$rec} > $dataLen |
1815
|
0 |
0 |
if ($rec eq '0GPS') { } |
1818
|
0 |
0 |
if $endPos > $dataLen |
1823
|
0 |
0 |
if ($1 eq 'GC') { } |
1826
|
0 |
0 |
if ($buff =~ /\G(\d+),\d*,\d*,(\d+),([-\d.]+),(\d+),\d*,A/g) |
1832
|
0 |
0 |
if ($buff =~ /\GA,([\d.]+),([\d.]+),(\d+),([NS]),([EW])/g) |
1839
|
0 |
0 |
if $ns eq "S" |
1840
|
0 |
0 |
if $ew eq "W" |
1845
|
0 |
0 |
unless ($buff =~ /\$(GC|GA),$time,/g) |
1847
|
0 |
0 |
if (not $$dataPt =~ /\$(GC|GA),(\d+)/ or $1 ne $time) |
1849
|
0 |
0 |
if ($date) { } |
1855
|
0 |
0 |
if (defined $lat) |
1860
|
0 |
0 |
if (defined $alt) |
1877
|
0 |
0 |
if $_ >= 2147483648 |
1902
|
0 |
4 |
unless $raf->Read($buff, 12) == 12 |
1903
|
4 |
0 |
if ($buff =~ /^(RIFF|RF64)....(.{4})/s) { } |
1905
|
0 |
4 |
if $1 eq "RF64" |
1908
|
0 |
0 |
unless $buff =~ /^(LA0[234]|OFR |LPAC|wvpk)/ and $raf->Read($buf2, 1024) |
1911
|
0 |
0 |
unless $buff =~ /WAVE(.{4})?fmt /gs and $raf->Seek(pos($buff) - 4, 0) |
1913
|
0 |
4 |
if $et->Options("FastScan") |
1914
|
4 |
0 |
if $type |
1916
|
0 |
4 |
if $rf64 |
1927
|
4 |
15 |
if ($num < 8) |
1928
|
0 |
4 |
if $num |
1934
|
10 |
5 |
if ($tag eq 'LIST') { } |
|
0 |
5 |
elsif ($tag eq 'data' and $len == 4294967295 and $et->{'DataSize64'}) { } |
1935
|
0 |
10 |
unless $raf->Read($buff, 4) == 4 |
1943
|
3 |
12 |
if ($len <= 0) |
1944
|
0 |
3 |
if ($len < 0) { } |
|
0 |
3 |
elsif ($tag eq "\000\000\000\000") { } |
1957
|
0 |
0 |
if ($et->Options("FastScan") and $tag eq 'data' || $tag eq 'idx1' || $tag eq 'LIST_movi' && !$ee) |
1966
|
0 |
12 |
if ($ee and $tag =~ /^(\d{2})tx$/) |
1968
|
0 |
0 |
unless defined $tagTbl->{$tag} |
1972
|
12 |
0 |
if ($tagInfo or $verbose || $unknown and not $tag =~ /^(data|idx1|LIST_movi|RIFF|\d{2}(db|dc|wb))$/) { } |
|
0 |
0 |
elsif ($tag eq 'RIFF') { } |
|
0 |
0 |
elsif ($tag eq 'LIST_movi' and $ee) { } |
1973
|
0 |
12 |
unless $raf->Read($buff, $len2) == $len2 |
1975
|
0 |
11 |
if ($tagInfo and ref $tagInfo eq "HASH" and $tagInfo->{'SetGroups'}) |
1978
|
0 |
0 |
if not $tagInfo and $verbose || $unknown |
1986
|
0 |
12 |
if ($setGroups) |
1990
|
0 |
12 |
if $ee |
1993
|
0 |
0 |
unless $raf->Read($buff, 4) == 4 |
1999
|
0 |
0 |
if ($len > 2147483647 and not $et->Options("LargeFileSupport")) |
2003
|
0 |
0 |
unless $raf->Seek($len2, 1) |
2008
|
0 |
4 |
if $err |