| blib/lib/OAuth/Lite/Agent.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 6 | 8 | 75.0 |
| line | l | !l | condition |
|---|---|---|---|
| 31 | 3 | 1 | $req->header('Accept-Encoding') || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 11 | 0 | 9 | 0 | $ua || 'LWP::UserAgent'->new |
| 33 | 1 | 1 | 2 | @encodings == 0 or &List::MoreUtils::none(sub { $_ eq 'gzip'; } , @encodings) |