| line |
true |
false |
branch |
|
101
|
2 |
99 |
if ($self->has_netrc)
|
|
105
|
2 |
0 |
$self->netrc eq '1' ? :
|
|
114
|
44 |
57 |
if $self->has_username
|
|
121
|
1 |
31 |
if $@
|
|
149
|
626 |
2 |
unless ref $_
|
|
169
|
0 |
666 |
if ($http_method eq 'PUT') { }
|
|
|
420 |
246 |
elsif ($http_method =~ /^(?:GET|DELETE)$/) { }
|
|
|
246 |
0 |
elsif ($http_method eq 'POST') { }
|
|
181
|
2 |
4 |
ref $_ ? :
|
|
185
|
2 |
244 |
&first(sub {
ref $_;
}
, values %natural_args) ? :
|
|
195
|
647 |
19 |
if $authenticate
|
|
217
|
596 |
45 |
if $self->has_username and $self->has_password
|
|
252
|
0 |
665 |
if $obj and $self->decode_html_entities
|
|
255
|
5 |
660 |
if (my $since = delete $$args{-'since'} and defined $obj)
|
|
263
|
5 |
645 |
if (ref $obj and &reftype($obj) eq 'HASH' and exists $$obj{'error'} || exists $$obj{'errors'})
|
|
267
|
654 |
5 |
if $res->is_success and defined $obj
|
|
270
|
1 |
4 |
if ref $obj
|
|
285
|
1 |
4 |
if &blessed($since) and $since->isa('DateTime')
|
|
287
|
1 |
3 |
if (my($y, $m, $d) = $since =~ /^(\d{4})-(\d{2})-(\d{2})$/)
|
|
308
|
0 |
3 |
unless $self->_contains_statuses($data)
|
|
313
|
3 |
3 |
if $datetime_parser->parse_datetime($$data[$i]{'created_at'}) <= $since_dt
|
|
328
|
0 |
3 |
unless ref $e and &reftype($e) eq 'HASH'
|
|
339
|
0 |
0 |
unless /The specified user is not a $type of this list/
|