|
|
@ -135,7 +135,6 @@ my $bpc = BackupPC::Lib->new(); |
|
|
|
my $mainConf = $bpc->ConfigDataRead(); |
|
|
|
my $mainConf = $bpc->ConfigDataRead(); |
|
|
|
my $json = {}; |
|
|
|
my $json = {}; |
|
|
|
|
|
|
|
|
|
|
|
if ( $host ) { |
|
|
|
|
|
|
|
my $hostConf = $bpc->ConfigDataRead($host); |
|
|
|
my $hostConf = $bpc->ConfigDataRead($host); |
|
|
|
my $conf = { %$mainConf, %$hostConf }; |
|
|
|
my $conf = { %$mainConf, %$hostConf }; |
|
|
|
my $age = -1; |
|
|
|
my $age = -1; |
|
|
@ -175,7 +174,6 @@ if ( $host ) { |
|
|
|
$json->{age} = time - $bpc_info[$i]->{startTime}; |
|
|
|
$json->{age} = time - $bpc_info[$i]->{startTime}; |
|
|
|
$json->{last_age} = sprintf("%.1f", ($json->{age}) / 84600); |
|
|
|
$json->{last_age} = sprintf("%.1f", ($json->{age}) / 84600); |
|
|
|
} |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
# TOO BIG ? |
|
|
|
# TOO BIG ? |
|
|
|
my $toobig = "1"; |
|
|
|
my $toobig = "1"; |
|
|
|