From: Nicolas Boisselier <nicolas.boisselier@gmail.com>
Date: Tue, 13 Dec 2022 20:36:46 +0000 (+0100)
Subject: Use ticks inseat of open because open run child process
X-Git-Url: https://git.nbdom.net/?a=commitdiff_plain;h=887d77482ff0de5b78c972699dc19147068fd966;p=nb.git

Use ticks inseat of open because open run child process
---

diff --git a/bin/shell-replace b/bin/shell-replace
index 437538be..6077808e 100755
--- a/bin/shell-replace
+++ b/bin/shell-replace
@@ -194,7 +194,9 @@ sub cmd {
 	my $cmd = join(' ',@_);
 	my $hcmd;
 #die $_;
-	$cmd =~ s/"/\\"/g;
+	my @cmd = `$cmd`;
+	return wantarray ? @cmd : join('',@cmd);
+	# NB 13.12.22 $cmd =~ s/"/\\"/g;
 	# NB 13.12.22 open reurn pid if command failed, so die never called: open($hcmd,qq/bash -lc "$cmd" |/) or die $!;
 	open($hcmd,"$cmd |") or die $!;
 	my @cmd = <$hcmd>;