| lib/Archive/Tar/File.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 20 | 31 | 64.5 |
| line | l | !l | condition |
|---|---|---|---|
| 329 | 16 | 0 | $type == 2 && 1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 241 | 66 | 202 | 0 | $obj->is_file and $obj->name =~ m[/$] |
| 373 | 13 | 0 | 22 | $opt and ref $opt eq 'HASH' |
| 400 | 126 | 0 | 20 | $self->is_dir and not length $file |
| 486 | 0 | 702 | 118 | defined $self->prefix and length $self->prefix |
| 530 | 15 | 8 | 82 | defined $self->data && length $self->data |
| 615 | 0 | 0 | 1 | defined $mode and $mode =~ /^[0-7]{1,4}$/ |
| line | l | !l | condition |
|---|---|---|---|
| 572 | 8 | 3 | shift() || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 240 | 0 | 0 | 268 | not length $obj->type or $obj->type =~ /\W/ |
| 309 | 1 | 0 | 15 | $type == 5 or $type == 2 |
| 515 | 201 | 2 | 0 | unpack('%16C*', $raw) == $self->chksum || unpack('%16c*', $raw) == $self->chksum |