bash - 将带有空格的参数值传递给从 Shell 脚本构建的 Perl 脚本

Question

我有一个调用 perl 脚本的 shell 脚本。shell 脚本是一个包装器，它构建要传递给 perl 脚本的参数。perl 脚本使用给定的参数执行一些代码。

shell脚本是这样的。

#!/bin/bash    
value=1
opt2value="someValue"
params="-opt3 someOption"
if [ $value = 1 ] 
then
  params=${params}" -opt4 Y -opt5 \"This is 1\""
elif [ $value = 2 ]
then
  params=${params}" -opt4 Y -opt5 \"This is 2\""
else
  params=${params}" -opt4 N" 
fi
perl -E'say for 0+@ARGV, @ARGV;' -- -opt1 optValue -opt2 ${opt2value} ${params} 

Perl 脚本检索所有其他传递的参数，但它只检索opt5 参数的“This”，而不是传递的整个值。

perlScript 用于检索值

use Getopt::Long;
$result = GetOptions(
"opt1=s"  => \$opt1,
"opt2=s"  => \$opt2,
"opt3=s"  => \$opt3,
"opt4=s"  => \$opt4,
"opt5=s"  => \$opt5
}

我怎样才能做到这一点。谢谢。

Answer 1

选项 1 eval：。

更灵活。（类似于 Perl 的system($SHELL_COMMAND).）

#!/bin/bash
value=1
opt2value="someValue"
params="-opt3 someOption"
if [ "$value" = 1 ]
then
  params="$params -opt4 Y -opt5 \"This is 1\""
elif [ "$value" = 2 ]
then
  params="$params -opt4 Y -opt5 \"This is 2\""
else
  params="$params -opt4 N"
fi
eval "perl -E'say for 0+@ARGV, @ARGV;' -- "\
  "-opt1 optValue -opt2 $opt2value $params"

选项 2：数组。

更简单。（类似于 Perl 的system($PROG, @ARGS).）

#!/bin/bash
value=1
opt2value="someValue"
params=(-opt3 someOption)
if [ "$value" = 1 ]
then
  params=("${params[@]}" -opt4 Y -opt5 "This is 1")
elif [ "$value" = 2 ]
then
  params=("${params[@]}" -opt4 Y -opt5 "This is 2")
else
  params=("${params[@]}" -opt4 N)
fi
perl -E'say for 0+@ARGV, @ARGV;' -- \
  -opt1 optValue -opt2 "$opt2value" "${params[@]}"

输出：

10
-opt1
optValue
-opt2
someValue
-opt3
someOption
-opt4
Y
-opt5
This is 1