line |
true |
false |
branch |
41
|
85 |
0 |
if ref $filename |
44
|
84 |
1 |
unless -f $filename |
93
|
113 |
0 |
if (defined $what) |
94
|
16 |
97 |
if $what =~ /^al/i |
95
|
16 |
81 |
if $what =~ /^a/i |
96
|
16 |
65 |
if $what =~ /^tr/i |
97
|
16 |
49 |
if $what =~ /^y/i |
98
|
16 |
33 |
if $what =~ /^g/i |
99
|
0 |
33 |
if ($what =~ /^cddb_id/i) |
101
|
0 |
0 |
if $o |
104
|
0 |
33 |
if $what =~ /^cdindex_id/i |
105
|
18 |
15 |
if $what =~ /^c/i |
109
|
0 |
0 |
unless wantarray |
116
|
56 |
1 |
if exists $self->{'parsed'} |
118
|
0 |
57 |
unless open IN, "< $self->{'filename'}" |
120
|
0 |
0 |
if ($e = $self->get_config('decode_encoding_inf') and $e->[0]) |
125
|
1026 |
285 |
if $line =~ /^(\S+)\s*=\s*['"]?(.*?)['"]?\s*$/ |
128
|
0 |
57 |
unless close IN |
135
|
0 |
57 |
unless defined $parsed{'artist'} |