| blib/lib/Sys/Export/CPIO.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 23 | 46 | 50.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 20 | 1 | 0 | 0 | builtin::blessed($f) && $f->can('print') |
| 59 | 0 | 0 | 0 | defined $dev_major && defined $dev_minor |
| 3 | 0 | 0 | defined $dev and not defined $dev_major && defined $dev_minor | |
| 61 | 1 | 0 | 0 | defined $rdev_major && defined $rdev_minor |
| 2 | 0 | 1 | defined $rdev and not defined $rdev_major && defined $rdev_minor | |
| 68 | 1 | 0 | 2 | $nlink and $nlink > 1 |
| 1 | 2 | 0 | $nlink and $nlink > 1 and ($mode & S_IFMT()) != 16384 |
| line | l | !l | condition |
|---|---|---|---|
| 66 | 0 | 3 | length $fileinfo->{'data'} // 0 |
| 88 | 0 | 3 | $uid // 0 |
| 0 | 3 | $gid // 0 | |
| 2 | 1 | $nlink // 1 | |
| 1 | 2 | $mtime // 0 | |
| 3 | 0 | $dev_major // 0 | |
| 3 | 0 | $dev_minor // 0 | |
| 1 | 2 | $rdev_major // 0 | |
| 1 | 2 | $rdev_minor // 0 | |
| 98 | 0 | 0 | $self->{'fh'}->print($fileinfo->{'data'}) or die "write: $!" |
| 100 | 0 | 0 | $self->{'fh'}->print("\0" x (4 - ($size & 3))) or die "write: $!" |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 86 | 0 | 3 | 0 | $ino //= ++$self->{'ino'} |