gen-qm-cloud-init-opts.pl

   1 #!/usr/bin/perl
   2
   3 use lib '.';
   4 use strict;
   5 use warnings;
   6 use PVE::JSONSchema;
   7 use PVE::RESTHandler;
   8 use PVE::QemuServer;
   9
  10 my $prop = PVE::QemuServer::cloudinit_config_properties();
  11
  12 my $data = PVE::RESTHandler::dump_properties($prop, 'asciidoc', 'config');
  13
  14 $data =~ s/cloud-init: //g;
  15
  16 print $data;