Perl - 从主脚本中的其他目录获取模块的abs路径

时间:2016-12-02 15:47:51

标签: perl module getcwd

我创建了一个简单的perl脚本,该脚本分为2个文件 - main.plcontent.pm 主脚本放在Project目录中,content.pm(模块)放在Project/utils目录中。现在我想在content.pm中使用main.pl我做了这样的事情来使用这个模块:

use Cwd;
use lib Cwd::abs_path(getcwd()."/utils");
use utils::content;

但如果我这样做,我会收到错误:

Cant locate utils/content.pm in 
@INC (you may need to install the utils::content module) 
@INC contains: /Perl/utils /etc/perl /usr/local/lib/x86_64-linux-gnu/perl/5.24.1 ...) 
at ./main.pl line 10.

是否可以使用content.pm运行此main.pl脚本而没有错误?也许我不应该使用getcwd()(我认为它使用工作目录而不是abs_path,但我不确定)?

1 个答案:

答案 0 :(得分:4)

我认为您正在寻找的是pureEq :: (Eq a, Applicative b) => a -> a -> b Bool pureEq x y = pure (x == y)

具体做法是:

FindBin