[pve-docs.git] / gen-vzdump.conf.5-opts.pl

#!/usr/bin/perl

use lib '.';
use strict;
use warnings;
use PVE::RESTHandler;
use PVE::VZDump;

my $prop = PVE::VZDump::json_config_properties();
my $skip = {
    all => 1,
    exclude => 1,
    vmid => 1,
    node => 1,
    quiet => 1,
    size => 1,
    stop => 1,
};

my $filterFn = sub {
    my ($k, $phash) = @_;

    return $skip->{$k} || 0;
};

print PVE::RESTHandler::dump_properties($prop, 'asciidoc', 'config', $filterFn);
Commit	Line	Data
d083d3d3 DM	1	#!/usr/bin/perl
	2
	3	use lib '.';
	4	use strict;
	5	use warnings;
	6	use PVE::RESTHandler;
	7	use PVE::VZDump;
	8
	9	my $prop = PVE::VZDump::json_config_properties();
	10	my $skip = {
	11	all => 1,
	12	exclude => 1,
	13	vmid => 1,
	14	node => 1,
	15	quiet => 1,
	16	size => 1,
	17	stop => 1,
	18	};
	19
	20	my $filterFn = sub {
	21	my ($k, $phash) = @_;
	22
	23	return $skip->{$k} \|\| 0;
	24	};
	25
	26	print PVE::RESTHandler::dump_properties($prop, 'asciidoc', 'config', $filterFn);