diff options
-rwxr-xr-x | files/checkbackups.pl | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/files/checkbackups.pl b/files/checkbackups.pl index be6bf70..80fc07f 100755 --- a/files/checkbackups.pl +++ b/files/checkbackups.pl @@ -103,10 +103,13 @@ foreach $host (@hosts) { } close(FLAG); foreach my $vserver_dir (@vserver_dirs) { - $dir = "$dir/rdiff-backup$vserver_dir"; - if (opendir(DIR, $dir)) { - @vservers = grep { /^[^\.]/ && -d "$dir/$_" } readdir(DIR); + $vsdir = "$dir/rdiff-backup$vserver_dir"; + if (opendir(DIR, $vsdir)) { + @vservers = grep { /^[^\.]/ && -d "$vsdir/$_" } readdir(DIR); + $opt_v && print STDERR "found vservers $vsdir: @vservers\n"; closedir DIR; + } else { + $opt_v && print STDERR "no vserver in $vsdir\n"; } } } elsif (-d "$dir/dump") { |