如何检测程序是否正在 PAR 存档中运行？

Question

我正在开发一个大型 Perl 应用程序，它与 PAR 捆绑在一起，以及一堆支持文件。

当应用程序在 PAR 中运行时，我可以使用 PAR::read_file 来获取存档内的这些不同文件。然而，在开发过程中，我不想每次调整一些代码时都必须重新 PAR 整个应用程序。

有没有办法可以判断脚本是否在运行时在 PAR 中运行，以便我可以选择从 PAR 存档或常规文件系统加载文件？

Answer 1

PAR::Environment 可能可以提供一些线索：

PAR 在可执行文件或 PAR 存档的构建过程以及它们的使用过程中使用各种环境变量。

...

PAR_0

如果正在运行的程序是从 PAR 存档或 pp 生成的可执行文件中运行的，则此变量包含提取的程序的名称（即 .pl 文件）。