diff --git a/PVE/CLI/qm.pm b/PVE/CLI/qm.pm index ea74ad5a..2c363735 100755 --- a/PVE/CLI/qm.pm +++ b/PVE/CLI/qm.pm @@ -8,31 +8,31 @@ use Getopt::Long qw(:config no_getopt_compat); use Fcntl ':flock'; use File::Path; -use IO::Socket::UNIX; use IO::Select; -use URI::Escape; +use IO::Socket::UNIX; +use JSON; use POSIX qw(strftime); +use Term::ReadLine; +use URI::Escape; -use PVE::Tools qw(extract_param); use PVE::Cluster; -use PVE::SafeSyslog; -use PVE::INotify; -use PVE::RPCEnvironment; use PVE::Exception qw(raise_param_exc); -use PVE::Network; use PVE::GuestHelpers; -use PVE::QemuServer; +use PVE::INotify; +use PVE::JSONSchema qw(get_standard_option); +use PVE::Network; +use PVE::RPCEnvironment; +use PVE::SafeSyslog; +use PVE::Tools qw(extract_param); + +use PVE::API2::Qemu::Agent; +use PVE::API2::Qemu; +use PVE::QemuServer::Agent qw(agent_available); use PVE::QemuServer::ImportDisk; use PVE::QemuServer::OVF; -use PVE::QemuServer::Agent qw(agent_available); -use PVE::API2::Qemu; -use PVE::API2::Qemu::Agent; -use JSON; -use PVE::JSONSchema qw(get_standard_option); -use Term::ReadLine; +use PVE::QemuServer; use PVE::CLIHandler; - use base qw(PVE::CLIHandler); my $upid_exit = sub { diff --git a/PVE/QMPClient.pm b/PVE/QMPClient.pm index 570dba24..7d756635 100644 --- a/PVE/QMPClient.pm +++ b/PVE/QMPClient.pm @@ -2,15 +2,15 @@ package PVE::QMPClient; use strict; use warnings; -use PVE::QemuServer; -use IO::Multiplex; -use POSIX qw(EINTR EAGAIN); -use JSON; -use Time::HiRes qw(usleep gettimeofday tv_interval); -use Scalar::Util qw(weaken); -use PVE::IPCC; -use Data::Dumper; +use IO::Multiplex; +use JSON; +use POSIX qw(EINTR EAGAIN); +use Scalar::Util qw(weaken); +use Time::HiRes qw(usleep gettimeofday tv_interval); + +use PVE::IPCC; +use PVE::QemuServer; # Qemu Monitor Protocol (QMP) client. #