check_backuppc: improve debug output
This commit is contained in:
parent
6c048b83b7
commit
a18b4d6ae9
1 changed files with 3 additions and 0 deletions
|
@ -174,6 +174,9 @@ foreach my $host (sort(keys(%Status)))
|
|||
# Debug
|
||||
if ($verbose == 2)
|
||||
{
|
||||
while (my ($key, $value) = each %{$Status{$host}}) {
|
||||
print "$key:\t$value\n";
|
||||
}
|
||||
print "Host $host state " . $Status{$host}{'state'} . "\n";
|
||||
print " with reason: " . $Status{$host}{'reason'} . "\n";
|
||||
print " with error: " . $Status{$host}{'error'} . "\n";
|
||||
|
|
Loading…
Reference in a new issue