blib/lib/Net/Twitter/Core.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 25 | 38 | 65.7 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
217 | 45 | 0 | 596 | $self->has_username and $self->has_password |
252 | 5 | 660 | 0 | $obj and $self->decode_html_entities |
255 | 660 | 0 | 5 | my $since = delete $$args{-'since'} and defined $obj |
263 | 4 | 10 | 650 | ref $obj and &reftype($obj) eq 'HASH' |
14 | 650 | 0 | ref $obj and &reftype($obj) eq 'HASH' and exists $$obj{'error'} || exists $$obj{'errors'} | |
267 | 4 | 1 | 654 | $res->is_success and defined $obj |
285 | 4 | 0 | 1 | &blessed($since) and $since->isa('DateTime') |
328 | 0 | 0 | 3 | ref $e and &reftype($e) eq 'HASH' |
329 | 0 | 0 | 3 | exists $$e{'created_at'} && exists $$e{'text'} && exists $$e{'id'} |
line | l | !l | condition |
---|---|---|---|
327 | 3 | 0 | $$arrayref[0] || (return) |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
106 | 2 | 0 | 0 | 'Net::Netrc'->lookup($host) || croak("No .netrc entry for $host") |
263 | 4 | 1 | 645 | exists $$obj{'error'} || exists $$obj{'errors'} |
292 | 2 | 0 | 1 | eval { do { 'DateTime'->from_epoch('epoch', $since) } } || eval { do { $parser->parse_datetime($since) } } || croak("Invalid 'since' parameter: $since. Must be a DateTime, epoch, string in Twitter timestamp format, or YYYY-MM-DD.") |