| 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 |