| blib/lib/Test/Smoke/Syncer/Snapshot.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 15 | 47 | 31.9 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 114 | 2 | 0 | 0 | -f $local_snap and $snap_size == -s $local_snap |
| 120 | 0 | 0 | 2 | $l_file eq $local_snap && $snap_size == -s $local_snap |
| 123 | 0 | 2 | 0 | $ok and $self->{'v'} |
| 211 | 0 | 0 | 2 | $self->{'snapshot'} and -f $self->{'snapshot'} |
| 322 | 0 | 3 | 0 | exists $dirs_post{$_} and delete $dirs_post{$_} |
| 438 | 8 | 0 | 0 | -f $local_patch and -s $local_patch == $patch_size |
| 558 | 0 | 0 | 8 | defined $new_level and $new_level =~ /^\d+$/ |
| line | l | !l | condition |
|---|---|---|---|
| 121 | 0 | 0 | $l_file || '' |
| 182 | 2 | 0 | $snapext ||= "tgz" |
| 183 | 0 | 2 | $verbose ||= 0 |
| 231 | 2 | 0 | $self->{'tar'} || 'Archive::Tar' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 98 | 0 | 2 | 0 | $self->{'sfile'} || __find_snap_name($ftp, $self->{'snapext'}, $self->{'v'}) |
| 324 | 1 | 0 | 0 | /\bperl/ || /perl\b/ |
| 326 | 1 | 0 | 0 | $prefix ||= "File::Spec"->abs2rel($ddir, cwd()) |
| 343 | 0 | 0 | 0 | whereis('vmstar') || whereis('tar') |
| 386 | 2 | 0 | 0 | $patch_number ||= $self->check_dot_patch |
| 583 | 0 | 2 | 0 | shift() || cwd() |