如何调用带有标志的脚本并获取它的全局变量?

时间:2013-03-06 17:37:01

标签: perl

我正在寻找类似这样的问题require "peacefullscript.pl -whiteflag";这个问题不起作用。我想要的是调用带有一些标志的脚本并将它创建的全局变量放到当前脚本中。

我怎样才能轻松

2 个答案:

答案 0 :(得分:5)

{
    local @ARGV = ("-whiteflag");
    do "peacefullscript.pl";
}

local关键字创建@ARGV的临时副本,不会覆盖原始命令行参数。

答案 1 :(得分:4)

@ARGV = ("-whiteflag");
require "peacefullscript.pl";