| line |
true |
false |
branch |
|
158
|
0 |
1 |
if (not -d $dir && -r $dir) { } |
|
180
|
0 |
1 |
if (not -r $dir) { } |
|
185
|
0 |
1 |
unless opendir my $d, $dir |
|
186
|
3 |
1 |
if $_ ne '.' |
|
187
|
0 |
1 |
unless closedir $d |
|
192
|
0 |
2 |
unless -r 'File::Spec'->catfile($dir, $dirent) |
|
193
|
0 |
2 |
if (-d 'File::Spec'->catfile($dir, $dirent)) { } |
|
194
|
0 |
0 |
unless $self->recursive |
|
224
|
0 |
2 |
if (not -f $file && -r $file) { } |
|
|
2 |
0 |
elsif ($AUDIO{lc $extension}) { } |
|
253
|
0 |
0 |
if (defined $$self{'files'}) { } |
|
254
|
0 |
0 |
if ($self->shuffle) |
|
327
|
0 |
0 |
if $self->files |
|
331
|
0 |
0 |
unless defined $info |
|
365
|
0 |
0 |
if $self->files |
|
370
|
0 |
0 |
unless defined $info |
|
384
|
0 |
0 |
if $self->files |
|
385
|
0 |
0 |
if $self->files |
|
412
|
0 |
0 |
unless -f $file |
|
414
|
0 |
0 |
unless defined $info |
|
428
|
0 |
0 |
$offset ? : |
|
437
|
0 |
0 |
if ($offset) |
|
442
|
0 |
0 |
if (not ref $handle) { } |
|
|
0 |
0 |
elsif ($handle->can('print')) { } |
|
456
|
0 |
0 |
if (not ref $handle) { } |
|
481
|
0 |
0 |
unless $file |
|
508
|
0 |
0 |
unless $path =~ /^$qalias/ |
|
554
|
0 |
0 |
unless $file |
|
589
|
1 |
0 |
if (defined $search and defined $replace) { } |
|
|
0 |
0 |
elsif (defined $search) { } |
|
613
|
0 |
0 |
if @_ |
|
633
|
0 |
0 |
if @_ |
|
654
|
1 |
0 |
if @_ |
|
673
|
0 |
0 |
if @_ |
|
696
|
0 |
0 |
if ($format) { } |
|
698
|
0 |
0 |
$1 eq '%' ? : |
|
703
|
0 |
0 |
if $$data{'artist'} |
|
704
|
0 |
0 |
if $$data{'album'} |
|
723
|
0 |
0 |
if @_ |