| line |
true |
false |
branch |
|
142
|
85 |
1 |
if ref $filename |
|
161
|
1 |
30 |
if ($flags =~ /[oO]/) |
|
162
|
1 |
0 |
if $flags =~ /O/ |
|
164
|
0 |
1 |
unless length $data[0] or $flags =~ /z/ |
|
166
|
1 |
0 |
if ($flags =~ /D/ and $file =~ m((.*)[/\\])s) |
|
170
|
0 |
1 |
unless open OUT, "> $file" |
|
171
|
1 |
0 |
if ($flags =~ /b/) { } |
|
175
|
0 |
0 |
if ($e = $self->get_config("encode_encoding_files") and $e->[0]) |
|
181
|
0 |
1 |
unless close OUT |
|
185
|
2 |
28 |
if ($flags =~ /R/) { } |
|
193
|
30 |
0 |
if $res = $self->{'parent'}->parse_rex_match($pattern, $data) |
|
195
|
30 |
0 |
if $res |
|
198
|
0 |
30 |
if $flags =~ /m/ and not $res |
|
203
|
34 |
0 |
unless ($flags =~ /b/) |
|
207
|
0 |
34 |
unless length $res->{$k} or $flags =~ /z/ |
|
209
|
0 |
30 |
unless $res and keys %$res |
|
222
|
48 |
228 |
if not $self->{'parsing'} and exists $self->{'parsed'} |
|
225
|
210 |
24 |
unless $data and @$data |
|
234
|
6 |
31 |
if $parsing and $parsing <= $c |
|
239
|
0 |
34 |
if ($k eq 'year') { } |
|
|
0 |
34 |
elsif ($k =~ /^U(\d{1,2})$/) { } |
|
|
20 |
14 |
elsif ($k =~ /^\w{4}(\d{2,}|(?:\(([^()]*(?:\([^()]+\)[^()]*)*)\))?(?:\[(\\.|[^]\\]*)\])?)$/) { } |
|
252
|
12 |
0 |
unless length $r or $self->get_config("id3v2_frame_empty_ok")->[0] |
|
253
|
20 |
0 |
if (defined $r or $self->{'parent'}->_get_tag("ID3v2")) |
|
259
|
31 |
0 |
if $res |