use PVE::APIClient::Helpers;
use PVE::APIClient::Config;
-use PVE::JSONSchema qw(get_standard_option);
+use PVE::APIClient::JSONSchema qw(get_standard_option);
use File::Temp qw(tempfile);
-use PVE::CLIHandler;
+use PVE::APIClient::CLIHandler;
-use base qw(PVE::CLIHandler);
+use base qw(PVE::APIClient::CLIHandler);
my $guest_status_command = sub {
my ($remote, $vmid, $cmd, $param) = @_,
use warnings;
use Data::Dumper;
-use PVE::JSONSchema qw(get_standard_option);
+use PVE::APIClient::JSONSchema qw(get_standard_option);
use PVE::APIClient::Tools qw(extract_param);
use PVE::APIClient::Config;
-use PVE::CLIHandler;
+use PVE::APIClient::CLIHandler;
-use base qw(PVE::CLIHandler);
+use base qw(PVE::APIClient::CLIHandler);
__PACKAGE__->register_method ({
name => 'list',
use warnings;
use JSON;
-use PVE::JSONSchema qw(get_standard_option);
+use PVE::APIClient::JSONSchema qw(get_standard_option);
-use base qw(PVE::CLIHandler);
+use base qw(PVE::APIClient::CLIHandler);
__PACKAGE__->register_method ({
name => 'list',
use Digest::SHA;
use HTTP::Response;
-use PVE::JSONSchema qw(get_standard_option);
-use PVE::CLIHandler;
-use PVE::PTY;
+use PVE::APIClient::JSONSchema qw(get_standard_option);
+use PVE::APIClient::CLIHandler;
+use PVE::APIClient::PTY;
-use base qw(PVE::CLIHandler);
+use base qw(PVE::APIClient::CLIHandler);
use PVE::APIClient::Config;
my $CRLF = "\x0D\x0A";
use strict;
use warnings;
-use PVE::JSONSchema qw(get_standard_option);
+use PVE::APIClient::JSONSchema qw(get_standard_option);
use PVE::APIClient::Tools qw(extract_param);
use PVE::APIClient::Config;
-use PVE::CLIHandler;
+use PVE::APIClient::CLIHandler;
use PVE::APIClient::LWP;
-use PVE::PTY ();
+use PVE::APIClient::PTY;
-use base qw(PVE::CLIHandler);
+use base qw(PVE::APIClient::CLIHandler);
sub read_password {
return PVE::PTY::read_password("Remote password: ")
use warnings;
use JSON;
-use PVE::JSONSchema;
-use PVE::SectionConfig;
+use PVE::APIClient::JSONSchema;
+use PVE::APIClient::SectionConfig;
use PVE::APIClient::Tools qw(file_get_contents file_set_contents);
-use base qw(PVE::SectionConfig);
+use base qw(PVE::APIClient::SectionConfig);
my $remote_namne_regex = qw(\w+);
return $list;
};
-PVE::JSONSchema::register_standard_option('pveclient-remote-name', {
+PVE::APIClient::JSONSchema::register_standard_option('pveclient-remote-name', {
description => "The name of the remote.",
type => 'string',
pattern => $remote_namne_regex,
use strict;
use warnings;
-use PVE::JSONSchema qw(register_standard_option get_standard_option);
-use PVE::SectionConfig;
+use PVE::APIClient::JSONSchema qw(register_standard_option get_standard_option);
+use PVE::APIClient::SectionConfig;
use base qw( PVE::APIClient::Config);
use strict;
use warnings;
-use PVE::JSONSchema qw(register_standard_option get_standard_option);
+use PVE::APIClient::JSONSchema qw(register_standard_option get_standard_option);
use base qw( PVE::APIClient::Config);
use Cwd 'abs_path';
use Data::Dumper;
-use PVE::JSONSchema qw(register_standard_option get_standard_option);
-use PVE::CLIHandler;
+use PVE::APIClient::JSONSchema qw(register_standard_option get_standard_option);
+use PVE::APIClient::CLIHandler;
use PVE::APIClient::LWP;
use PVE::APIClient::Helpers;
die "implement me";
}
-use base qw(PVE::CLIHandler);
+use base qw(PVE::APIClient::CLIHandler);
my $cmd = $ARGV[0];