| line |
true |
false |
branch |
|
162
|
0 |
3 |
unless -e $path |
|
168
|
4380 |
3 |
if $line =~ /\r$/ |
|
169
|
807 |
3576 |
if ($line =~ /^Instrument/) { } |
|
|
2649 |
927 |
elsif ($line =~ /^([A-Z][A-Z]),([01]+)$/) { } |
|
|
66 |
861 |
elsif ($line =~ /^\* (.+)$/) { } |
|
181
|
804 |
57 |
if (keys %patterns) |
|
254
|
0 |
0 |
unless (keys %$set) |
|
257
|
0 |
0 |
unless ($groove_number) |
|
289
|
3 |
0 |
unless ($set and keys %$set) |
|
293
|
2 |
1 |
if ($args->{'cat'}) |
|
296
|
13 |
523 |
if (lc($set->{$k}{'cat'}) =~ /$string/) |
|
301
|
1 |
2 |
if ($args->{'name'}) |
|
304
|
3 |
265 |
if (lc($set->{$k}{'name'}) =~ /$string/) |
|
323
|
1 |
0 |
if ($self->return_patterns) { } |