| line |
true |
false |
branch |
|
22
|
9 |
2 |
unless @_ |
|
24
|
0 |
2 |
if (ref $auth eq 'CODE') { } |
|
|
0 |
2 |
elsif (ref $auth eq 'HASH') { } |
|
|
1 |
1 |
elsif ($auth eq 'oauth') { } |
|
|
1 |
0 |
elsif ($auth eq 'oauth2') { } |
|
27
|
0 |
0 |
if (defined $auth->{'access_token'}) { } |
|
|
0 |
0 |
elsif (defined $auth->{'oauth_token'} and defined $auth->{'oauth_token_secret'}) { } |
|
45
|
0 |
1 |
ref $_[-1] eq 'CODE' ? : |
|
48
|
0 |
1 |
if ($cb) { } |
|
51
|
0 |
0 |
if $tx->error |
|
57
|
0 |
1 |
if $tx->error |
|
67
|
0 |
0 |
if $tx->error |
|
84
|
0 |
1 |
unless $params->{'oauth_callback_confirmed'} eq 'true' and defined $params->{'oauth_token'} and defined $params->{'oauth_token_secret'} |
|
90
|
0 |
1 |
ref $_[-1] eq 'CODE' ? : |
|
93
|
0 |
1 |
if ($cb) { } |
|
96
|
0 |
0 |
if $tx->error |
|
102
|
0 |
1 |
if $tx->error |
|
112
|
0 |
0 |
if $tx->error |
|
128
|
0 |
1 |
unless defined $params->{'oauth_token'} and defined $params->{'oauth_token_secret'} |
|
133
|
0 |
1 |
ref $_[-1] eq 'CODE' ? : |
|
136
|
0 |
1 |
if ($cb) { } |
|
139
|
0 |
0 |
if $tx->error |
|
145
|
0 |
1 |
if $tx->error |
|
155
|
0 |
0 |
if $tx->error |
|
170
|
0 |
1 |
unless defined $params->{'access_token'} |
|
175
|
0 |
4 |
ref $_[-1] eq 'CODE' ? : |
|
178
|
0 |
3 |
if ($cb) { } |
|
181
|
0 |
0 |
if $tx->error |
|
186
|
0 |
3 |
if $tx->error |
|
196
|
0 |
0 |
if $tx->error |
|
203
|
0 |
4 |
unless defined $id |
|
204
|
0 |
4 |
unless $id =~ /\A[0-9]+\z/ |
|
212
|
0 |
2 |
ref $_[-1] eq 'CODE' ? : |
|
215
|
0 |
2 |
if ($cb) { } |
|
218
|
0 |
0 |
if $tx->error |
|
223
|
0 |
2 |
if $tx->error |
|
233
|
0 |
0 |
if $tx->error |
|
241
|
1 |
1 |
if defined $params{'user_id'} |
|
242
|
1 |
1 |
if defined $params{'screen_name'} |
|
243
|
0 |
2 |
unless %query |
|
251
|
0 |
1 |
ref $_[-1] eq 'CODE' ? : |
|
254
|
0 |
1 |
if ($cb) { } |
|
257
|
0 |
0 |
if $tx->error |
|
262
|
0 |
1 |
if $tx->error |
|
272
|
0 |
0 |
if $tx->error |
|
279
|
0 |
1 |
unless defined $status |
|
284
|
0 |
0 |
$params{$_} ? : |
|
294
|
0 |
0 |
ref $_[-1] eq 'CODE' ? : |
|
297
|
0 |
0 |
if ($cb) { } |
|
300
|
0 |
0 |
if $tx->error |
|
305
|
0 |
0 |
if $tx->error |
|
315
|
0 |
0 |
if $tx->error |
|
322
|
0 |
0 |
unless defined $id |
|
323
|
0 |
0 |
if &blessed($id) and $id->isa('Mojo::WebService::Twitter::Tweet') |
|
324
|
0 |
0 |
unless $id =~ /\A[0-9]+\z/ |
|
331
|
0 |
1 |
ref $_[-1] eq 'CODE' ? : |
|
334
|
0 |
1 |
if ($cb) { } |
|
337
|
0 |
0 |
if $tx->error |
|
342
|
0 |
1 |
if $tx->error |
|
352
|
0 |
0 |
if $tx->error |
|
359
|
0 |
1 |
unless defined $q |
|
363
|
0 |
1 |
if (ref $geocode) |
|
365
|
0 |
0 |
if ref $geocode eq 'ARRAY' |
|
366
|
0 |
0 |
if ref $geocode eq 'HASH' |
|
367
|
0 |
0 |
if defined $lat and defined $long and defined $rad |
|
369
|
0 |
1 |
if defined $geocode |
|
378
|
0 |
1 |
ref $_[-1] eq 'CODE' ? : |
|
381
|
0 |
1 |
if ($cb) { } |
|
384
|
0 |
0 |
if $tx->error |
|
389
|
0 |
1 |
if $tx->error |
|
399
|
0 |
0 |
if $tx->error |
|
418
|
0 |
3 |
unless defined $api_key and defined $api_secret |
|
432
|
0 |
1 |
unless defined $api_key and defined $api_secret |
|
452
|
0 |
16 |
ref $values eq 'ARRAY' ? : |