| line |
true |
false |
branch |
|
41
|
0 |
0 |
unless $class =~ /^\w+(?:::\w+)*\z/ |
|
44
|
0 |
0 |
unless eval "require $class" |
|
54
|
0 |
0 |
if defined $agent and not $agent =~ / \z/ |
|
56
|
0 |
0 |
unless defined $agent |
|
77
|
0 |
0 |
if (my(@unrecognized) = keys %opts) |
|
101
|
0 |
0 |
if (ref $response || '') ne 'HASH' |
|
109
|
0 |
0 |
if $ksr_code |
|
110
|
0 |
0 |
if $http_code |
|
111
|
0 |
0 |
if $messages and @$messages |
|
113
|
0 |
0 |
if ($recognize_404 and $http_code and $http_code eq '404') |
|
117
|
0 |
0 |
if ($messages and @$messages) |
|
129
|
0 |
0 |
if ($form) |
|
130
|
0 |
0 |
if ($method eq 'GET') { } |
|
148
|
0 |
0 |
if ($$self{'polite'}) |
|
166
|
0 |
0 |
if $cool_down > 4 |
|
169
|
0 |
0 |
if ($content_type ne 'application/json') |
|
170
|
0 |
0 |
if ($status_code >= 200 and $status_code < 300) { } |
|
177
|
0 |
0 |
if ($content_encoding and uc $content_encoding ne 'UTF-8') |
|
181
|
0 |
0 |
unless my $response = eval {
do {
$$self{'json_parser'}->decode($content)
}
} |
|
195
|
0 |
0 |
if @_ < 4 |
|
200
|
0 |
0 |
if (ref $call_type) |
|
207
|
0 |
0 |
if (defined $cursor_style) |
|
208
|
0 |
0 |
if ($cursor_style eq 'start') { } |
|
|
0 |
0 |
elsif ($cursor_style eq 'page') { } |
|
210
|
0 |
0 |
if defined $start and length $start |
|
214
|
0 |
0 |
if defined $page and length $page |
|
221
|
0 |
0 |
if (my(@unrecognized) = keys %opts) |
|
226
|
0 |
0 |
unless my $access_token = $$self{'access_token'} |
|
233
|
0 |
0 |
if ($call_type eq 'single') { } |
|
|
0 |
0 |
elsif ($call_type eq 'list') { } |
|
|
0 |
0 |
elsif ($call_type eq 'iterator') { } |
|
246
|
0 |
0 |
unless my $ks_iterator_name = $ks_iterator_name_by_class{$class} |
|
249
|
0 |
0 |
if @cursor |
|
255
|
0 |
0 |
unless $url |
|
260
|
0 |
0 |
unless $$response{$ks_iterator_name} |
|
263
|
0 |
0 |
if (my $more_url = $$response{'urls'}{'api'}{'more_' . $ks_iterator_name}) { } |
|
289
|
0 |
0 |
if @_ < 3 |
|
292
|
0 |
0 |
if (my(@unrecognized) = keys %opts) |
|
306
|
0 |
0 |
if ($ksr_code and $ksr_code eq 'invalid_xauth_login') |
|
314
|
0 |
0 |
unless my $access_token = $$response{'access_token'} |
|
319
|
0 |
0 |
unless my $user_data = $$response{'user'} |
|
351
|
0 |
0 |
exists $$fixed{$field_name} ? : |
|
354
|
0 |
0 |
unless defined $form{'q'} |
|
355
|
0 |
0 |
unless defined $form{'category'} |
|
356
|
0 |
0 |
unless defined $form{'tag'} |
|
357
|
0 |
0 |
unless defined $form{'location'} |
|
358
|
0 |
0 |
unless defined $form{'state'} and length $form{'state'} |
|
359
|
0 |
0 |
unless defined $form{'pledged'} and length $form{'pledged'} |
|
360
|
0 |
0 |
unless defined $form{'goal'} and length $form{'goal'} |
|
361
|
0 |
0 |
unless defined $form{'raised'} and length $form{'raised'} |
|
362
|
0 |
0 |
unless defined $form{'sort'} and length $form{'sort'} |
|
364
|
0 |
0 |
unless $form{'state'} =~ /^(?:all|live|successful)\z/ |
|
366
|
0 |
0 |
unless $form{'pledged'} =~ /^(?:all|[01234])\z/ |
|
368
|
0 |
0 |
unless $form{'goal'} =~ /^(?:all|[01234])\z/ |
|
370
|
0 |
0 |
unless $form{'raised'} =~ /^(?:all|[012])\z/ |
|
372
|
0 |
0 |
unless $form{'sort'} =~ /^(?:magic|end_date|newest|launch_date|popularity|most_funded)\z/ |
|
376
|
0 |
0 |
if length $form{'q'} |
|
377
|
0 |
0 |
if length $form{'category'} |
|
378
|
0 |
0 |
if length $form{'tag'} |
|
379
|
0 |
0 |
if length $form{'location'} |
|
380
|
0 |
0 |
if $form{'backed_by_self'} |
|
381
|
0 |
0 |
if $form{'starred_by_self'} |
|
382
|
0 |
0 |
if $form{'backed_by_friends'} |
|
383
|
0 |
0 |
if $form{'picked_by_staff'} |
|
384
|
0 |
0 |
if $form{'state'} ne 'all' |
|
385
|
0 |
0 |
if $form{'pledged'} ne 'all' |
|
386
|
0 |
0 |
if $form{'goal'} ne 'all' |
|
387
|
0 |
0 |
if $form{'raised'} ne 'all' |
|
388
|
0 |
0 |
if $form{'sort'} ne 'magic' |
|
423
|
0 |
0 |
if (exists $opts{'start'}) |
|
427
|
0 |
0 |
if (defined(my $page = delete $opts{'page'})) |
|
440
|
0 |
0 |
if (exists $opts{'start'}) |
|
444
|
0 |
0 |
if (defined(my $page = delete $opts{'page'})) |
|
452
|
0 |
0 |
if @_ < 2 |
|
459
|
0 |
0 |
if @_ < 2 |
|
466
|
0 |
0 |
if @_ < 2 |
|
473
|
0 |
0 |
if @_ < 2 |
|
505
|
0 |
0 |
if @_ < 2 |
|
518
|
0 |
0 |
if @_ < 2 |
|
531
|
0 |
0 |
if @_ < 2 |
|
538
|
0 |
0 |
if @_ < 2 |