| 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}' ]")) |
|
155
|
0 |
0 |
unless (-r $dir) |
|
158
|
0 |
0 |
unless opendir my $dh, $dir |
|
170
|
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') { } |
|
202
|
0 |
0 |
wantarray ? : |
|
217
|
2 |
0 |
wantarray ? : |
|
232
|
2 |
0 |
wantarray ? : |
|
249
|
3 |
2 |
if (snapshot_newer($this_snapshot, $target)) { } |
|
257
|
2 |
0 |
wantarray ? : |
|
275
|
2 |
2 |
if (snapshot_older($this_snapshot, $target)) { } |
|
283
|
2 |
0 |
wantarray ? : |
|
298
|
2 |
1 |
if snapshot_newer($older, $newer) |
|
303
|
3 |
2 |
if (snapshot_older_or_eq($snapshots[$i], $newer)) |
|
306
|
6 |
3 |
if (snapshot_newer_or_eq($this_snapshot, $older)) { } |
|
317
|
3 |
0 |
wantarray ? : |
|
334
|
5 |
10 |
if (snapshot_older_or_eq($this_snapshot, $target)) { } |
|
|
1 |
9 |
elsif ($i == $#snapshots) { } |
|
335
|
1 |
4 |
if (snapshots_eq($this_snapshot, $target)) { } |
|
|
1 |
3 |
elsif ($i == 0) { } |
|
348
|
2 |
1 |
if ($last_target_diff <= $this_target_diff) { } |
|
362
|
7 |
0 |
wantarray ? : |
|
529
|
0 |
4 |
unless $self->at_eos |
|
547
|
2 |
1 |
unless $self->at_eos |
|
565
|
0 |
1 |
unless $self->at_eos |
|
582
|
0 |
1 |
unless $self->at_eos |
|
596
|
0 |
1 |
unless $self->at_eos |
|
611
|
0 |
1 |
unless $self->at_eos |
|
625
|
0 |
1 |
unless $self->at_eos |
|
657
|
2 |
25 |
unless ($n =~ /^\d+$/u and $n > 0) |
|
663
|
13 |
12 |
if ($unit =~ /^(?:minutes|mins|m)$/u) { } |
|
|
9 |
3 |
elsif ($unit =~ /^(?:hours|hrs|h)$/u) { } |
|
|
2 |
1 |
elsif ($unit =~ /^(?:days|d)$/u) { } |