perl - 我应该如何使用 Perl 模块分发数据文件？

Question

我已经开始了module-starter (与 --builder=Module::Build )。我想使用 SQL::Library将我的 SQL 收集到一个 .ini 文件中......但为了在运行时找到该文件，我需要知道它的确切路径。如何在运行时获取模块“数据目录”的路径？

到目前为止，我一直在使用 FindBin(如 "$FindBin::Bin/../../path/to/module/datafiles/foo.ini" ，但我发现这不是很健壮(例如，当 PATH 中的两个不同目录中有两个同名的程序时，它似乎会中断)。

Answer 1

这就是 File::ShareDir是为了。由于您使用的是 Module::Build，因此您需要设置 share_dir参数(并且需要 Module::Build 0.36)，以便将数据文件与模块一起安装。然后，在您的代码中，您将使用 File::ShareDir 来计算 foo.ini 的路径。 (例如 dist_file('My-Dist', 'foo.ini') )