blocks|key|1741744|text|大多数模块(尤其是来自CPAN的模块)都有一个$VERSION变量：|type|unstyled|depth|inlineStyleRanges|entityRanges|data|1741745|perl+-MSome::Module+-le+'print+$Some::Module::VERSION'|code-block|syntax|javascript|1741746|entityMap^0|0|0^^$0|@$1|2|3|4|5|6|7|I|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|J|8|@]|9|@]|A|$E|F]]|$1|G|3|-4|5|6|7|K|8|@]|9|@]|A|$]]]|H|$]]

Most modules (especially ones from The CPAN) have a $VERSION variable:

<pre><code>perl -MSome::Module -le 'print $Some::Module::VERSION'
</code></pre>

blocks|key|1526738|text|此外，对于使用Exporter.pm的模块，您可以使用以下技巧获取以下信息：|type|unstyled|depth|inlineStyleRanges|entityRanges|data|1526739|perl+-MSome::Module=99999+-ex
Some::Module+version+99999+required--this+is+only+version+1.9205+at+...|code-block|syntax|javascript|1526740|对于不使用Exporter.pm的模块，一个稍微长一点的技巧会报告相同的信息：|1526741|perl+-e'use+Some::Module+99999'
Some::Module+version+99999+required--this+is+only+version+1.9205+at+...|1526742|entityMap^0|0|0|0|0^^$0|@$1|2|3|4|5|6|7|M|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|N|8|@]|9|@]|A|$E|F]]|$1|G|3|H|5|6|7|O|8|@]|9|@]|A|$]]|$1|I|3|J|5|D|7|P|8|@]|9|@]|A|$E|F]]|$1|K|3|-4|5|6|7|Q|8|@]|9|@]|A|$]]]|L|$]]

In addition, for modules that use Exporter.pm, you can get this information with this trick:

<pre><code>perl -MSome::Module=99999 -ex
Some::Module version 99999 required--this is only version 1.9205 at ...
</code></pre>

For modules that don't use Exporter.pm, a slightly longer trick reports the same information:

<pre><code>perl -e'use Some::Module 99999'
Some::Module version 99999 required--this is only version 1.9205 at ...
</code></pre>

blocks|key|1741811|text|有一个少键入的技巧，只要你的模块没有像Unix时间戳这样疯狂的东西作为版本号，它就有效。|type|unstyled|depth|inlineStyleRanges|entityRanges|data|1741812|perl+-MFoo::Bar\+9999|code-block|syntax|javascript|1741813|这之所以有效，是因为它转换为|1741814|use+Foo::Bar+9999;|1741815|例如，Foo::Bar的版本至少为9999或更高版本。你得到的是|1741816|Foo::Bar+version+9999+required--this+is+only+version+1.1.
BEGIN+failed--compilation+aborted.|1741817|(我从Matt+Trout那里学到的小把戏)|1741818|entityMap^0|0|0|0|0|0|0|0^^$0|@$1|2|3|4|5|6|7|S|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|T|8|@]|9|@]|A|$E|F]]|$1|G|3|H|5|6|7|U|8|@]|9|@]|A|$]]|$1|I|3|J|5|D|7|V|8|@]|9|@]|A|$E|F]]|$1|K|3|L|5|6|7|W|8|@]|9|@]|A|$]]|$1|M|3|N|5|D|7|X|8|@]|9|@]|A|$E|F]]|$1|O|3|P|5|6|7|Y|8|@]|9|@]|A|$]]|$1|Q|3|-4|5|6|7|Z|8|@]|9|@]|A|$]]]|R|$]]

There is a less-typing trick, that works provided your module doesn't have something insane like a Unix timestamp as a version number.

<pre><code>perl -MFoo::Bar\ 9999
</code></pre>

This works because what it translates to is

<pre><code>use Foo::Bar 9999;
</code></pre>

i.e. a version of Foo::Bar that's at least version 9999 or newer.
And what you get is

<pre><code>Foo::Bar version 9999 required--this is only version 1.1.
BEGIN failed--compilation aborted.
</code></pre>

(Neat trick I learned from Matt Trout.)

blocks|key|1526801|text|VERSION是所有Perl类的UNIVERSAL方法。您可以使用它来获取模块版本(如果已经设置，通常是这样设置的)。|type|unstyled|depth|inlineStyleRanges|entityRanges|offset|length|data|1526802|下面是一个单行代码，您只需添加一次模块名称：|1526803|perl+-le+'eval+"require+$ARGV[0]"+and+print+$ARGV[0]->VERSION'+Some::Module|code-block|syntax|javascript|1526804|entityMap|0|LINK|mutability|MUTABLE|url|http://perldoc.perl.org/UNIVERSAL.html^0|G|9|0|0|0|0^^$0|@$1|2|3|4|5|6|7|S|8|@]|9|@$A|T|B|U|1|V]]|C|$]]|$1|D|3|E|5|6|7|W|8|@]|9|@]|C|$]]|$1|F|3|G|5|H|7|X|8|@]|9|@]|C|$I|J]]|$1|K|3|-4|5|6|7|Y|8|@]|9|@]|C|$]]]|L|$M|$5|N|O|P|C|$Q|R]]]]

VERSION is a <a href="http://perldoc.perl.org/UNIVERSAL.html" rel="noreferrer">UNIVERSAL</a> method of all Perl classes. You can use it to get the module version (if it has been set which it usually has). 

Here is a one liner where you only have to add the module name once:

<pre><code>perl -le 'eval "require $ARGV[0]" and print $ARGV[0]-&gt;VERSION' Some::Module
</code></pre>

blocks|key|1526832|text|谢谢你的回答！我在我的.bashrc中创建了一个函数来方便地查找Perl模块的版本：|type|unstyled|depth|inlineStyleRanges|entityRanges|data|1526833|function+perlmodver+{
++++perl+-M$1+-e+'print+$ARGV[0]->VERSION+.+"\n"'+$1
}+|code-block|syntax|javascript|1526834|entityMap^0|0|0^^$0|@$1|2|3|4|5|6|7|I|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|J|8|@]|9|@]|A|$E|F]]|$1|G|3|-4|5|6|7|K|8|@]|9|@]|A|$]]]|H|$]]

Thanks for the answers! I've created a function in my .bashrc to easily find the version of a Perl module:

<pre><code>function perlmodver {
 perl -M$1 -e 'print $ARGV[0]-&gt;VERSION . "\n"' $1
} 
</code></pre>

blocks|key|1526866|text|我们在Solaris10中有系统perl+(/usr/bin/perl)，上面的解决方案没有用。其中一些报告"module.pm未安装“，而另一些则没有输出。|type|unstyled|depth|inlineStyleRanges|entityRanges|data|1526867|下面是有用的代码，它可以列出所有模块及其版本。|1526868|#!/usr/bin/perl

use+strict;
use+ExtUtils::Installed;

my+@modules;
my+$installed+=+ExtUtils::Installed->new();

if+(scalar(@ARGV)+>+0)+{

++++@modules+=+@ARGV;

}+else+{

++++@modules+=+$installed->modules();

}

print+"Module\tVersion\n";

foreach+(@modules)+{

++++print+$_+.+"\t"+.+$installed->version($_)+.+"\n";

}|code-block|syntax|javascript|1526869|entityMap^0|0|0|0^^$0|@$1|2|3|4|5|6|7|K|8|@]|9|@]|A|$]]|$1|B|3|C|5|6|7|L|8|@]|9|@]|A|$]]|$1|D|3|E|5|F|7|M|8|@]|9|@]|A|$G|H]]|$1|I|3|-4|5|6|7|N|8|@]|9|@]|A|$]]]|J|$]]

We have the system perl (/usr/bin/perl) in Solaris 10, and above solutions are useless. Some of them report "module.pm is not installed", some of them have no output.

Here is the code which is helpful, which can list all modules and their version.

<pre><code>#!/usr/bin/perl

use strict;
use ExtUtils::Installed;

my @modules;
my $installed = ExtUtils::Installed-&gt;new();

if (scalar(@ARGV) &gt; 0) {

 @modules = @ARGV;

} else {

 @modules = $installed-&gt;modules();

}

print "Module\tVersion\n";

foreach (@modules) {

 print $_ . "\t" . $installed-&gt;version($_) . "\n";

}
</code></pre>

blocks|key|1526879|text|您还可以查看App::module::version|type|unstyled|depth|inlineStyleRanges|entityRanges|offset|length|data|1526880|$+module-version

The+version+of+App::module::version+in+/home/yourself/perl5/lib/perl5+is+1.004|code-block|syntax|javascript|1526881|entityMap|0|LINK|mutability|MUTABLE|url|https://metacpan.org/pod/module-version^0|6|K|0|0|0^^$0|@$1|2|3|4|5|6|7|Q|8|@]|9|@$A|R|B|S|1|T]]|C|$]]|$1|D|3|E|5|F|7|U|8|@]|9|@]|C|$G|H]]|$1|I|3|-4|5|6|7|V|8|@]|9|@]|C|$]]]|J|$K|$5|L|M|N|C|$O|P]]]]

You can also take a look at <a href="https://metacpan.org/pod/module-version" rel="nofollow">App::module::version</a>

<pre><code>$ module-version

The version of App::module::version in /home/yourself/perl5/lib/perl5 is 1.004
</code></pre>

blocks|key|1741905|text|对我来说，最容易记住也是最健壮的版本：|type|unstyled|depth|inlineStyleRanges|entityRanges|data|1741906|perl+-e+'use+Search::Elasticsearch;+print+$Search::Elasticsearch::VERSION;'|code-block|syntax|javascript|1741907|entityMap^0|0|0^^$0|@$1|2|3|4|5|6|7|I|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|J|8|@]|9|@]|A|$E|F]]|$1|G|3|-4|5|6|7|K|8|@]|9|@]|A|$]]]|H|$]]

Easiest to remember and most robust version for me:

<pre><code>perl -e 'use Search::Elasticsearch; print $Search::Elasticsearch::VERSION;'
</code></pre>

How do you find the version of an installed Perl module?

This is in an answer down at the bottom, but I figure it important enough to live up here. With these suggestions, I create a function in my <code>.bashrc</code>

<pre><code>function perlmodver {
 perl -M$1 -e 'print "Version " . $ARGV[0]-&gt;VERSION . " of " . $ARGV[0] . \
 " is installed.\n"' $1
}
</code></pre>

How can I find the version of an installed Perl module?

Unix

Perl

如何查找已安装的Perl模块的版本？这是在下面的答案中，但我认为它足够重要，住在这里。根据这些建议，我在.bashrc中创建了一个函数function perlmodver {    perl -M$1 -e 'print "Version " . $ARGV[0]->VERSION . " of " . $ARGV[...

问如何找到已安装的Perl模块的版本？
EN

社区

活动

资源

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问如何找到已安装的Perl模块的版本？EN

社区

活动

资源

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问如何找到已安装的Perl模块的版本？
EN