perl - 将 eval 的 STDERR 重定向到 perl 中的/dev/null

Question

eval {require $testRequirePath};

在运行上述代码时，如果 $testRequirePath 文件中存在语法错误，则会将其打印到 STDOUT。我想将它重定向到 /dev/null。我该怎么做？

Answer 1

您看到的是警告，而不是错误；错误将被 eval 捕获并放置在 $@.要同时抑制警告，您可以这样做:

eval { local $SIG{__WARN__} = sub {}; require $testRequirePath }