| line |
true |
false |
branch |
|
35
|
0 |
3 |
if (ref $file) { } |
|
39
|
0 |
0 |
if ($size) |
|
45
|
0 |
3 |
unless (open FILE, $file) |
|
63
|
3 |
0 |
unless (ref $file) |
|
96
|
0 |
0 |
unless defined $objectSize |
|
100
|
0 |
0 |
if (ref $parser) { } |
|
101
|
0 |
0 |
if $DEBUG |
|
104
|
0 |
0 |
if $DEBUG |
|
114
|
0 |
0 |
if $val == 0 or $val == 1 |
|
128
|
3 |
4 |
unless $key |
|
135
|
3 |
3 |
unless $key |
|
142
|
0 |
0 |
unless $$self{'STREAM'} |
|
143
|
0 |
0 |
unless defined $index |
|
170
|
0 |
44 |
if ($utf8 and $] > 5.007) { } |
|
|
44 |
0 |
elsif ($] > 5.007) { } |
|
186
|
85 |
0 |
if defined $string |
|
195
|
0 |
3 |
unless read $fh, my $headerObjectData, 30 |
|
203
|
0 |
3 |
if ($DEBUG) |
|
212
|
0 |
3 |
if $$self{'size'} and $objectSize > $$self{'size'} |
|
215
|
0 |
3 |
unless _byteStringToGUID($objectId) eq $guidMapping{'ASF_Header_Object'} |
|
231
|
0 |
25 |
if ($DEBUG) |
|
233
|
0 |
0 |
defined $nextObjectGUIDName ? : |
|
242
|
0 |
25 |
if (not defined $nextObjectSize or $nextObjectSize > $$self{'size'}) |
|
244
|
0 |
0 |
if $DEBUG |
|
250
|
25 |
0 |
if (defined $nextObjectGUIDName) |
|
253
|
3 |
22 |
if ($nextObjectGUIDName eq 'ASF_File_Properties_Object') { } |
|
|
3 |
19 |
elsif ($nextObjectGUIDName eq 'ASF_Content_Description_Object') { } |
|
|
2 |
17 |
elsif ($nextObjectGUIDName eq 'ASF_Content_Encryption_Object' or $nextObjectGUIDName eq 'ASF_Extended_Content_Encryption_Object') { } |
|
|
2 |
15 |
elsif ($nextObjectGUIDName eq 'ASF_Extended_Content_Description_Object') { } |
|
274
|
4 |
21 |
if ($nextObjectGUIDName eq 'ASF_Stream_Properties_Object') { } |
|
|
2 |
19 |
elsif ($nextObjectGUIDName eq 'ASF_Stream_Bitrate_Properties_Object') { } |
|
|
3 |
16 |
elsif ($nextObjectGUIDName eq 'ASF_Header_Extension_Object') { } |
|
302
|
3 |
1 |
if ($reversedGUIDs{$$stream{'stream_type_guid'}} eq 'ASF_Audio_Media') |
|
321
|
14 |
23 |
unless $$v{'name'} =~ s[^(?:WM/|is|replay)][]i or $$v{'name'} =~ /^Author/ |
|
327
|
1 |
22 |
if (exists $$self{'TAGS'}{$name} and grep {/^$name$/;} @arrayOk) { } |
|
329
|
0 |
1 |
if (ref $$self{'TAGS'}{$name} eq 'ARRAY') { } |
|
378
|
0 |
3 |
$info{'flags_raw'} & 1 ? : |
|
379
|
2 |
1 |
$info{'flags_raw'} & 2 ? : |
|
385
|
3 |
0 |
$info{'playtime_seconds'} ? : |
|
427
|
0 |
29 |
if ($DEBUG and uc $name ne 'WM/PICTURE') |
|
446
|
1 |
28 |
if (uc $name eq 'WM/PICTURE') |
|
479
|
0 |
1 |
if ($DEBUG) |
|
530
|
0 |
4 |
$inline ? : |
|
617
|
0 |
3 |
if ($wFormatTag == 1 or $wFormatTag == 355) |
|
659
|
0 |
0 |
unless $self->_readAndIncrementInlineOffset(18) |
|
666
|
0 |
2 |
if ($$self{'inlineOffset'} - $offset < $size) |
|
672
|
0 |
0 |
if ($DEBUG) |
|
679
|
0 |
0 |
if (defined $nextObjectName and $nextObjectName eq 'ASF_Stream_Properties_Object') |
|
700
|
0 |
3 |
if ($DEBUG) |
|
711
|
0 |
12 |
if $nextObjectSize == 0 or $nextObjectSize > $ext{'extension_data_size'} |
|
712
|
0 |
12 |
unless defined $nextObjectName |
|
714
|
0 |
12 |
if ($DEBUG) |
|
722
|
4 |
8 |
if ($nextObjectName eq 'ASF_Metadata_Library_Object' or $nextObjectName eq 'ASF_Metadata_Object') { } |
|
|
2 |
6 |
elsif ($nextObjectName eq 'ASF_Extended_Stream_Properties_Object') { } |
|
727
|
0 |
4 |
if ($DEBUG) |
|
748
|
1 |
11 |
if ($name eq 'WM/Picture') |
|
759
|
0 |
12 |
if ($DEBUG) |
|
805
|
27 |
44 |
if ($data_type == 0) { } |
|
|
3 |
41 |
elsif ($data_type == 1) { } |
|
|
12 |
29 |
elsif ($data_type == 2 or $data_type == 5) { } |
|
|
20 |
9 |
elsif ($data_type == 3) { } |
|
|
7 |
2 |
elsif ($data_type == 4) { } |
|
|
2 |
0 |
elsif ($data_type == 6) { } |
|
1145
|
3 |
0 |
if ($round) |