| line |
true |
false |
branch |
|
47
|
0 |
0 |
unless @_ == 0 |
|
72
|
0 |
0 |
if (@_ == 1) { } |
|
|
0 |
0 |
elsif (@_ == 2) { } |
|
73
|
0 |
0 |
unless (shift()) =~ /^(-h|--help)$/u |
|
84
|
0 |
0 |
unless (snap_exists($thing, $config_ref) or ssh_backup_exists($thing, $config_ref) or local_backup_exists($thing, $config_ref)) |
|
115
|
0 |
0 |
if (snap_exists($thing, $config_ref)) { } |
|
|
0 |
0 |
elsif (ssh_backup_exists($thing, $config_ref)) { } |
|
|
0 |
0 |
elsif (local_backup_exists($thing, $config_ref)) { } |
|
118
|
0 |
0 |
unless (-r $dir) |
|
121
|
0 |
0 |
unless opendir my $dh, $dir |
|
129
|
0 |
0 |
unless i_am_root() |
|
131
|
0 |
0 |
unless my $yabsm_uid = getpwnam "yabsm" |
|
139
|
0 |
0 |
if ($ssh->error) |
|
144
|
0 |
0 |
unless ($ssh->system("[ -r '${dir}' ]")) |
|
154
|
0 |
0 |
unless (-r $dir) |
|
157
|
0 |
0 |
unless opendir my $dh, $dir |
|
169
|
0 |
0 |
if ($query{'type'} eq 'all') { } |
|
|
0 |
0 |
elsif ($query{'type'} eq 'newest') { } |
|
|
0 |
0 |
elsif ($query{'type'} eq 'oldest') { } |
|
|
0 |
0 |
elsif ($query{'type'} eq 'after') { } |
|
|
0 |
0 |
elsif ($query{'type'} eq 'before') { } |
|
|
0 |
0 |
elsif ($query{'type'} eq 'between') { } |
|
|
0 |
0 |
elsif ($query{'type'} eq 'closest') { } |
|
201
|
0 |
0 |
wantarray ? : |
|
216
|
2 |
0 |
wantarray ? : |
|
231
|
2 |
0 |
wantarray ? : |
|
248
|
3 |
2 |
if (snapshot_newer($this_snapshot, $target)) { } |
|
256
|
2 |
0 |
wantarray ? : |
|
274
|
2 |
2 |
if (snapshot_older($this_snapshot, $target)) { } |
|
282
|
2 |
0 |
wantarray ? : |
|
297
|
2 |
1 |
if snapshot_newer($older, $newer) |
|
302
|
3 |
2 |
if (snapshot_older_or_eq($snapshots[$i], $newer)) |
|
305
|
6 |
3 |
if (snapshot_newer_or_eq($this_snapshot, $older)) { } |
|
316
|
3 |
0 |
wantarray ? : |
|
333
|
5 |
10 |
if (snapshot_older_or_eq($this_snapshot, $target)) { } |
|
|
1 |
9 |
elsif ($i == $#snapshots) { } |
|
334
|
1 |
4 |
if (snapshots_eq($this_snapshot, $target)) { } |
|
|
1 |
3 |
elsif ($i == 0) { } |
|
347
|
2 |
1 |
if ($last_target_diff <= $this_target_diff) { } |
|
361
|
7 |
0 |
wantarray ? : |
|
528
|
0 |
4 |
unless $self->at_eos |
|
546
|
2 |
1 |
unless $self->at_eos |
|
564
|
0 |
1 |
unless $self->at_eos |
|
581
|
0 |
1 |
unless $self->at_eos |
|
595
|
0 |
1 |
unless $self->at_eos |
|
610
|
0 |
1 |
unless $self->at_eos |
|
624
|
0 |
1 |
unless $self->at_eos |
|
656
|
2 |
25 |
unless ($n =~ /^\d+$/u and $n > 0) |
|
662
|
13 |
12 |
if ($unit =~ /^(?:minutes|mins|m)$/u) { } |
|
|
9 |
3 |
elsif ($unit =~ /^(?:hours|hrs|h)$/u) { } |
|
|
2 |
1 |
elsif ($unit =~ /^(?:days|d)$/u) { } |