| line |
true |
false |
branch |
|
80
|
0 |
0 |
if $case |
|
91
|
0 |
170 |
if @cue > 1 |
|
92
|
0 |
170 |
if @cue > 1 |
|
98
|
85 |
0 |
if ref $f |
|
100
|
0 |
85 |
if ($f =~ /\.cue$/i and -f $f) { } |
|
105
|
85 |
0 |
unless ($c) |
|
110
|
85 |
0 |
unless @cue == 1 |
|
112
|
0 |
0 |
unless open F, "< $cue[0]" |
|
113
|
0 |
0 |
if ($e = ($p || 'MP3::Tag')->get_config1("decode_encoding_cue_file")) |
|
117
|
0 |
0 |
unless close F |
|
150
|
0 |
0 |
if (defined $what) |
|
151
|
0 |
0 |
if $what =~ /^artist_collection/i |
|
152
|
0 |
0 |
if $what =~ /^al/i |
|
153
|
0 |
0 |
if $what =~ /^a/i |
|
154
|
0 |
0 |
if $what =~ /^songwriter/i |
|
155
|
0 |
0 |
if $what =~ /^tr/i |
|
156
|
0 |
0 |
if $what =~ /^y/i |
|
157
|
0 |
0 |
if $what =~ /^c/i |
|
158
|
0 |
0 |
if $what =~ /^g/i |
|
162
|
0 |
0 |
unless wantarray |
|
173
|
0 |
0 |
unless $track or length $track |
|
179
|
0 |
0 |
unless $l =~ /^\s*(REM\s+)?
(GENRE|DATE|DISCID|COMMENT|PERFORMER|TITLE
|ISRC|POSTGAP|PREGAP|SONGWRITER
|FILE|INDEX|TRACK|CATALOG|CDTEXTFILE|FLAGS)\s+(.*)/x |
|
186
|
0 |
0 |
if $field eq "track" and $val =~ /^0?(\d+)/ |
|
187
|
0 |
0 |
if length $track_seen and $track_seen != $track |
|
190
|
0 |
0 |
if length $track_seen |
|
191
|
0 |
0 |
if $field eq "title" |
|
192
|
0 |
0 |
if $field eq "performer" |
|
198
|
0 |
0 |
if exists $self->{'parsed'} |
|
248
|
0 |
0 |
if defined $self->{'track'} |
|
249
|
0 |
0 |
if $self->{'recursive'} or not $self->parent_ok |