die "interrupted by signal\n";
};
- my $qmpclient = PVE::QMPClient->new();
-
- my $backup_cb = sub {
- my ($vmid, $resp) = @_;
- $backup_job_uuid = $resp->{return}->{UUID};
- };
-
my $outfh;
if ($opts->{stdout}) {
$outfh = $opts->{stdout};
($cpid, $outfileno) = $fork_compressor_pipe->($self, $comp, $outfileno);
}
- my $add_fd_cb = sub {
+ my $qmpclient = PVE::QMPClient->new();
+ my $backup_cb = sub {
+ my ($vmid, $resp) = @_;
+ $backup_job_uuid = $resp->{return}->{UUID};
+ };
+ my $add_fd_cb = sub {
my ($vmid, $resp) = @_;
my $params = {