linux - 在 perl 脚本中混合 vboxmanage 和 bash 命令

Question

我在 Ubuntu 12.04 上使用 VirtualBox 来运行虚拟机。我正在尝试使用 VBoxManage 通过 CLI 执行 VirtualBox 命令。我想在文本文件中捕获它的输出，所以我写了以下内容:

use warnings;
use strict;
use File::Slurp;

my $vmname = <STDIN>;

system("vboxmanage showvminfo $vmname | > vminfo.txt");
my @vminfo = read_file('vminfo.txt');
print @vminfo;

然而，没有任何反应。当我打开 vminfo.txt 时，它是空的。它应该包含很多关于 VM 的信息。

甚至可以提交这样的命令吗？我知道将 vboxmanage 作为前缀可能会出现问题。有没有办法可以转义该命令并在同一行上提交 bash 命令？

谢谢。

Answer 1

你不需要重定向到一个文件:

chomp( my @vminfo = `vboxmanage showvminfo $vmname` );