my $cmd = $ENV{GRUNTMASTER_VM};
$cmd .= ' ' . $arg if $arg;
get_logger->trace("Starting VM $name ($cmd)");
- $vm{$name} = Expect->spawn($cmd);
+ $vm{$name} = Expect->new;
$vm{$name}->raw_pty(1);
+ $vm{$name}->log_stdout(0);
+ $vm{$name}->spawn($cmd);
$vm{$name}->expect(5, '# ') or get_logger->logdie("Error while starting VM $name: ". $vm{$name}->error);
}
if ($vm{$vm}) {
my $cmd = ">$er " . shell_quote 'gruntmaster-exec', @args;
get_logger->trace("Running in VM $vm: $cmd");
- $vm{$vm}->send($cmd);
+ $vm{$vm}->send($cmd, "\n");
} else {
$pid{$vm} = fork // die "Cannot fork\n";
unless ($pid{$vm}) {