my $tar = Archive::Tar->new();
$tar->add_files(@all_files) or die LOG_MESSAGE("!!! Can't run program: $!\n");
# This is needed for older Perl version => otherwise "COMPRESS_GZIP" Bareword warning
no strict;
$tar->write( "$ARCHIVE_FILE", COMPRESS_GZIP) or die LOG_MESSAGE("Can't run program: $!\n");
LOG_MESSAGE ("### Archiving finished");