| lib/Archive/Tar/File.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 20 | 31 | 64.5 |
| line | l | !l | condition |
|---|---|---|---|
| 329 | 22 | 0 | $type == 2 && 1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 241 | 58 | 184 | 0 | $obj->is_file and $obj->name =~ m[/$] |
| 373 | 12 | 0 | 16 | $opt and ref $opt eq "HASH" |
| 400 | 119 | 0 | 13 | $self->is_dir and not length $file |
| 486 | 0 | 1167 | 206 | defined $self->prefix and length $self->prefix |
| 532 | 8 | 7 | 72 | defined $self->data && length $self->data |
| 617 | 0 | 0 | 1 | defined $mode and $mode =~ /^[0-7]{1,4}$/ |
| line | l | !l | condition |
|---|---|---|---|
| 574 | 8 | 3 | shift() || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 240 | 0 | 0 | 242 | not length $obj->type or $obj->type =~ /\W/ |
| 309 | 1 | 0 | 21 | $type == 5 or $type == 2 |
| 517 | 183 | 2 | 0 | unpack('%16C*', $raw) == $self->chksum || unpack('%16c*', $raw) == $self->chksum |