Branch Coverage

blib/lib/WWW/Plurk.pm
Criterion Covered Total %
branch 6 62 9.6


line true false branch
102 11 0 unless @_
142 0 1 $ENV{'PLURK_TRACE'} ? :
149 0 1 if (@_)
150 0 0 unless @_ == 2
173 0 0 if ($self->trace)
203 0 0 unless $resp->is_success or $resp->is_redirect
218 0 0 unless $resp->is_success or $resp->is_redirect
250 0 0 if $_[1] eq 'plurkcookie'
251 0 0 unless $ok
316 0 0 if ($resp->content =~ /^\s*var\s+GLOBAL\s*=\s*(.+)$/m) { }
342 0 0 unless $self->is_logged_in
462 0 0 $self->_is_user($obj) ? :
468 0 0 if @args & 1
478 0 0 if (my(@unknown) = sort(keys %args))
482 0 0 if (length $content > 140)
499 0 0 unless delete $$args{'limit'}
515 0 0 $no_comments ? :
0 0 @limit ? :
521 0 0 if (my $error = $$reply{'error'})
557 0 0 if @args & 1
566 0 0 if (my(@extra) = sort(keys %args))
570 0 0 defined $date_from ? :
0 0 defined $date_offset ? :
583 0 0 unless $reply
596 0 0 unless $reply
613 0 0 if not exists $$hash{$key} or 'ARRAY' eq ref $$hash{$key} and @{$$hash{$key};} == 0
641 0 0 unless $$reply{'responses'}
691 0 0 if (my $error = $$reply{'error'})
700 0 11 unless exists $PATH_DEFAULT{$service}
702 11 0 unless @_
709 11 0 unless @_