perl - 如何为封面脚本提供 @INC 作为 Devel::Cover 的一部分

Question

如何从外部提供作为模块@INC一部分的封面脚本。Devel::Cover我希望通过搜索与触发位置相关的库来运行封面脚本。

想法是将封面作为源的一部分，无论谁得到它，都应该能够直接运行而无需考虑库，这将与它所在的位置有关。

我试图更改脚本并BEGIN在其中有一个块，它将路径推送到INC. 它工作正常，但更改脚本并不是那么好。我想INC在调用它时拥有我的相对路径。

Answer 1

我会说有两种方法：

1-st 在实际脚本中使用：

use lib '/home/foobar/code';

2-nd 当你在命令行上调用脚本时执行 -I （这是一个大写的 i）

最后的解决方案是最临时的解决方案。运行脚本时向 perl 添加 -I /home/foobar/code 标志。

perl -I /home/foobar/code script.pl

这会将 /home/foobar/code 添加到 @INC 的开头以执行此特定脚本。