kvm_user_version: update code to use our framework

Replace backticks with run_command and also do not use
`kvm -help` which produces a lot of unecessary output, lets use
`kvm -version` instead.
This commit is contained in:
Thomas Lamprecht 2016-02-25 14:47:17 +01:00 committed by Dietmar Maurer
parent 74cc511fda
commit 09b1142906

View File

@ -883,11 +883,15 @@ sub kvm_user_version {
$kvm_user_version = 'unknown';
my $tmp = `kvm -help 2>/dev/null`;
my $code = sub {
my $line = shift;
if ($line =~ m/^QEMU( PC)? emulator version (\d+\.\d+(\.\d+)?)(\.\d+)?[,\s]/) {
$kvm_user_version = $2;
}
};
if ($tmp =~ m/^QEMU( PC)? emulator version (\d+\.\d+(\.\d+)?)(\.\d+)?[,\s]/) {
$kvm_user_version = $2;
}
eval { run_command("kvm -version", outfunc => $code); };
warn $@ if $@;
return $kvm_user_version;