如何从perl脚本本身打印出运行的perl版本？

Question

我是Perl的新手。我安装了多个perl版本。

我已指定要使用的版本。但要验证，我想输出perl frm the.pl脚本本身的版本。

这可能吗？ ＆＃34; perl的＆＃34; --version在perl脚本编写中是错误的。

Answer 1

Perl 版本存储在几个不同的 Perl special variables 中：

#!/usr/bin/perl
print "$^V\n";                   # "v5.32.0"
print "$]\n";                    # "5.032000"

如果您使用 use English，则这些变量还有其他别名：

use English;
print "$PERL_VERSION\n";         # "v5.32.0"
print "$OLD_PERL_VERSION\n";     # "5.032000"

Answer 2

在perl脚本中使用预定义的Perl变量$]或更新的$^V：

print "Perl version: $]\n";

示例输出：

Perl version: 5.018002

（Perl 5.18.2）

有关更多特殊变量，请参阅perlvar或http://www.kichwa.com/quik_ref/spec_variables.html。

Answer 3

显示自己的文件或输出其代码：

#!/usr/bin/perl
use strict;
use warnings FATAL => 'all';
open(F,"$0");
while(<F>)
{
   print $_ ;
}
close(F)