| line |
true |
false |
branch |
|
73
|
0 |
0 |
unless my $class = shift() |
|
74
|
0 |
0 |
unless my $cuefile = shift() |
|
75
|
0 |
0 |
unless -e $cuefile |
|
104
|
0 |
0 |
unless my $data = $self->cuedata |
|
124
|
0 |
0 |
unless $header |
|
133
|
0 |
0 |
unless $line =~ /\S/ |
|
152
|
0 |
0 |
unless $keyword and $data |
|
158
|
0 |
0 |
if ($ISKEYWORD{$keyword}) |
|
171
|
0 |
0 |
unless $tracks |
|
182
|
0 |
0 |
if $line =~ /\A TRACK \s+ (\d+) .* \z/msx |
|
185
|
0 |
0 |
unless @tracks |
|
190
|
0 |
0 |
if $line =~ /\A TITLE \s+ ['"]? (.*?) ['"]? \z/msx |
|
196
|
0 |
0 |
if $line =~ /\A PERFORMER \s+ ['"]? (.*?) ['"]? \z/msx |
|
200
|
0 |
0 |
if $line =~ /\A INDEX \s+ (?: \d+ \s+) ([\d:]+) \z/msx |