my @command = split / +/, $command;
    warn sprintf "Spawning >>%s<<", join "*", @command;
    if ( my $pid = open3( undef, $stdout_handle, undef, @command ) ) {