如何获取未修改的命令行参数以“换行”另一个命令行工具？

Question

我想编写一个脚本foo这只是调用bar与它被调用，使用bash或Perl完全相同的参数。

现在，在perl中执行此操作的简单方法是

#!/bin/perl

my $args=join(' ', @ARGV);
`bar $args`;

但是，ARGV中的值已经由shell处理，因此如果我打电话

 foo "I wonder, \"does this work\""

酒吧会被这样打电话

 bar I wonder "does this work"

如何获取原始命令行，以便我可以简单地逐字传递它？

Answer 1

在shell处理perl可执行文件之前，您无法获取它们的参数。 但是，您可以确保shell不会再次处理它们：

system('bar', @ARGV);

与

system("bar @ARGV");

见perldoc -f系统 ：

如果只有一个标量参数，则检查参数是否为shell元字符，如果有，则将整个参数传递给系统的命令shell进行解析（在Unix平台上这是“/ bin / sh -c”，但是在其他平台上有所不同）。 如果参数中没有shell元字符，则将其拆分为单词并直接传递给“execvp”，这样效率更高。

如果需要读取程序的输出，请使用进程句柄并以相同的方式传递参数（无插值）：

open my $barhandle, '-|', 'bar', @ARGV or die "Can't call bar: $!";
while (my $line = <$barhandle>)
{
    # do something with $line...
}
close $barhandle;

你可以通过很多方式调用Perl中的程序; 看看Perl的反引号，系统和exec有什么区别？ 有关主要选项的概述。

Answer 2

这非常简单。 查看系统调用的系统（LIST）变体。

system('bar', @ARGV);

perldoc -f系统

Answer 3

在bash中：

exec bar "$@"

这样可以保留参数中的间距。 但是，I / O重定向不是术语含义内的参数（但是对于原始调用执行的I / O重定向将持续到调用的'bar'命令，除非您更改它）。