| line |
true |
false |
branch |
|
121
|
0 |
1 |
if ($$options{'optionfile'}) |
|
128
|
1 |
0 |
unless ($self->options('lastfm_md5password')) |
|
129
|
1 |
0 |
if ($self->options('lastfm_password')) { } |
|
140
|
1 |
0 |
if ($self->options->{'lastfm_client_id'} eq 'tst') |
|
212
|
11 |
1 |
if (exists $$self{'_options'}) { } |
|
249
|
0 |
0 |
unless defined $h |
|
250
|
0 |
0 |
unless ($$self{'session_id'} and time - $$self{'timestamp'} < 3600) |
|
252
|
0 |
0 |
unless ($h) |
|
265
|
0 |
0 |
unless ($req) |
|
281
|
0 |
0 |
if ($status eq 'OK') { } |
|
|
0 |
0 |
elsif ($status eq 'BADSESSION') { } |
|
332
|
0 |
0 |
if ($h) |
|
348
|
0 |
0 |
unless scalar @{$self->scrobble_queue;} |
|
352
|
0 |
0 |
if (scalar @submit >= 50) |
|
357
|
0 |
0 |
if ($ok) |
|
361
|
0 |
0 |
if (scalar @{$self->scrobble_queue;}) |
|
370
|
0 |
0 |
unless ($$self{'session_id'} and time - $$self{'timestamp'} < 3600) |
|
372
|
0 |
0 |
unless ($h) |
|
380
|
0 |
0 |
unless defined $h |
|
396
|
0 |
0 |
unless ($req) |
|
410
|
0 |
0 |
if ($status eq 'OK') { } |
|
|
0 |
0 |
elsif ($status eq 'BADSESSION') { } |
|
441
|
0 |
0 |
unless ($info->mb_trackid) |
|
470
|
0 |
0 |
unless ($req) |
|
477
|
0 |
0 |
unless ($resp->is_success) |
|
485
|
0 |
0 |
if ($status eq 'OK') { } |
|
|
0 |
0 |
elsif ($status eq 'FAILED') { } |
|
|
0 |
0 |
elsif ($status eq 'BADAUTH') { } |
|
|
0 |
0 |
elsif ($status eq 'BADTIME') { } |
|
535
|
0 |
1 |
if ($fh) |
|
538
|
1 |
0 |
unless (exists $$self{'logfile'} and $$self{'logfile'}) |
|
539
|
1 |
0 |
if (not $self->options->{'logfile'} or $self->options->{'logfile'} eq 'STDERR') { } |
|
|
0 |
0 |
elsif ($self->options->{'logfile'} eq 'STDOUT') { } |
|
546
|
0 |
0 |
unless ($fh) |
|
568
|
1 |
0 |
if ($level <= $self->options->{'verbose'}) |
|
583
|
0 |
0 |
unless (exists $$self{'scrobble_queue'} and $$self{'scrobble_queue'}) |
|
585
|
0 |
0 |
unless tie @q, 'Tie::File', $self->options('scrobble_queue') |
|
602
|
0 |
0 |
unless (exists $$self{'ua'} and ref $$self{'ua'}) |
|
607
|
0 |
0 |
if ($self->options->{'proxy_server'}) |
|
611
|
0 |
0 |
unless ($$self{'ua'}) |
|
619
|
0 |
0 |
if (defined $theURL) |
|
631
|
0 |
0 |
if ($q) |
|
655
|
0 |
0 |
if (ref $info eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $info) { } |
|
|
0 |
0 |
elsif (-f $info) { } |
|
656
|
0 |
0 |
if (exists $$info{'filename'}) |
|
660
|
0 |
0 |
if $k eq 'secs' and exists $$info{'secs'} and $$info{'secs'} > 30 |
|
661
|
0 |
0 |
if ($self->options->{'musictag_overwrite'} or not $$info{$k}) |
|
667
|
0 |
0 |
if ($@) |
|
670
|
0 |
0 |
unless (exists $$info{$_}) |
|
673
|
0 |
0 |
if (exists $$info{'mb_trackid'}) |
|
676
|
0 |
0 |
if (exists $$info{'length'}) |
|
679
|
0 |
0 |
unless ($$info{'secs'}) |
|
692
|
0 |
0 |
if ($self->options->{'get_mbid_from_mb'} and not $info->mb_trackid) |
|
695
|
0 |
0 |
if ($info->mb_trackid) { } |
|
716
|
0 |
0 |
unless $self->options->{'musictag'} |
|
720
|
0 |
0 |
if ($minfo) |
|
721
|
0 |
0 |
if ($self->options->{'musicdb'}) |