| blib/lib/Mojo/Headers.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 21 | 26 | 80.7 |
| line | l | !l | condition | |
|---|---|---|---|---|
| 25 | 0 | 9171 | $self->{'headers'}{$header} = [@_] and return $self | |
| 38 | 9063 | 4 | 0 | tr/\n\r// and croak("Invalid characters in $name header") |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 142 | 2133 | 0 | 3 | $line =~ s/^\s+//u and @$headers |
| line | l | !l | condition |
|---|---|---|---|
| 58 | 24 | 57 | $self->{'names'} // {} |
| 70 | 58 | 10 | +(shift())->{'headers'}{lc shift()} // [] |
| 97 | 2740 | 0 | +(shift())->{'state'} // "" |
| 108 | 7 | 1 | $self->link // "" |
| 113 | 1 | 4 | $$data{$params->{'rel'}} //= {%$params, "link", $target} |
| 129 | 629 | 2112 | $self->{'cache'} //= [] |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 42 | 9 | 283 | 0 | $self->{'names'}{$key} //= $name |
| 136 | 4 | 1 | 10640 | $+[0] > $size or @$headers >= $lines |