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

Vit*_*Pom 3 perl

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

我怎么能这么容易做到?

mob*_*mob 5

{
    local @ARGV = ("-whiteflag");
    do "peacefullscript.pl";
}
Run Code Online (Sandbox Code Playgroud)

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