| 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 | 78 | 214 | 0 | $obj->is_file and $obj->name =~ m[/$] |
| 373 | 13 | 0 | 22 | $opt and ref $opt eq "HASH" |
| 400 | 127 | 0 | 22 | $self->is_dir and not length $file |
| 486 | 0 | 1221 | 214 | defined $self->prefix and length $self->prefix |
| 532 | 17 | 8 | 83 | 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 | 292 | not length $obj->type or $obj->type =~ /\W/ |
| 309 | 1 | 0 | 15 | $type == 5 or $type == 2 |
| 517 | 213 | 2 | 0 | unpack('%16C*', $raw) == $self->chksum || unpack('%16c*', $raw) == $self->chksum |