如果有人问过这个,我很抱歉,但我发现很难搜索。
我在本地使用 Perl 5.12,但我们的一些机器使用 Perl 5.8.8,它们暂时不会更新。
对于审计,我在平台 5.12 上使用“say”。
我写了一个简单的函数来在 5.8.8 上实现 say,但我不想在 5.12 上使用它。
有没有办法只在旧版本的 Perl 上使用我的 say 函数并在 5.12 上使用 say 的“内置”版本?
最佳答案
您可以使用 $^V
special variable确定 Perl 解释器的版本:
BEGIN {
if ($^V ge v5.10.1) { # "say" first appeared in 5.10
require feature;
feature->import('say');
}
else {
*say = sub { print @_, "\n" }
}
}
关于perl - 如何添加基于 perl 版本的函数?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/5394435/