Finally - re-arrange tar params to avoid warning in logs

This commit is contained in:
Brian Read 2025-02-25 12:25:46 +00:00
parent 0fd7137edd
commit ce96f72726

View File

@ -16,8 +16,10 @@
} }
my $clvl = $c->stash('compressionlevel'); my $clvl = $c->stash('compressionlevel');
my $cmd = "/bin/tar --directory / --create @{$c->stash('directories')} --file=-" my $cmd = "/bin/tar --create --file=- --directory / @{$c->stash('exclude')} "
. "@{$c->stash('exclude')} | /usr/bin/gzip $clvl "; . "@{$c->stash('directories')} | /usr/bin/gzip $clvl ";
#die("$cmd");
my $success = open my $fh, '-|', $cmd; my $success = open my $fh, '-|', $cmd;
unless ($success) { return "Error dowload command."; }; unless ($success) { return "Error dowload command."; };