| line |
true |
false |
branch |
|
34
|
2 |
102 |
if exists $options->{$_} |
|
38
|
0 |
16 |
if exists $options->{$_} |
|
47
|
0 |
0 |
unless open my $fd, '<:utf8', $file |
|
50
|
0 |
0 |
if $self->{'playlist'} |
|
59
|
0 |
0 |
if $self->{'verbose'} |
|
60
|
0 |
0 |
unless ($self->{'playlist'}) |
|
65
|
0 |
0 |
if ($all) { } |
|
73
|
0 |
0 |
if $self->{'playlist'} |
|
81
|
1 |
9 |
if (eval {
do {
$data->[0]
}
}) { } |
|
84
|
1 |
1 |
if ($all) { } |
|
92
|
0 |
1 |
if $self->{'playlist'} |
|
97
|
7 |
2 |
if ($data =~ /^Song( \d+)?:/) { } |
|
|
0 |
2 |
elsif ($data =~ /^(?:<\?xml.*?>\s*)?
|
|
107
|
0 |
2 |
unless $data =~ m[^(irealb(?:ook)?://.*?)] |
|
117
|
0 |
10 |
if $self->{'playlist'} |
|
128
|
1 |
0 |
unless $i |
|
130
|
0 |
0 |
if ($i > 0 and $i <= @{$u->{'playlist'}->songs;}) { } |