[pve-access-control.git] / pveum

#!/usr/bin/perl

use strict;
use warnings;

use PVE::CLI::pveum;

my $prepare = sub {
    # autmatically generate the private key if it does not already exists
    PVE::Cluster::gen_auth_key();
};

PVE::CLI::pveum->run_cli_handler(prepare => $prepare);
Commit	Line	Data
7c410d63	1	#!/usr/bin/perl
2c3a6c0a DM	2
2c3a6c0a DM	3	use strict;
7c410d63	4	use warnings;
2c3a6c0a	5
09281ad7	6	use PVE::CLI::pveum;
2c3a6c0a	7
09281ad7 DM	8	my $prepare = sub {
09281ad7 DM	9	# autmatically generate the private key if it does not already exists
a8a4cd64	10	PVE::Cluster::gen_auth_key();
09281ad7	11	};
362fe4c6	12
98007830	13	PVE::CLI::pveum->run_cli_handler(prepare => $prepare);