ExtUtils::Installed, new(), modules(), version()

最新推荐文章于 2025-04-01 13:38:41 发布

转载最新推荐文章于 2025-04-01 13:38:41 发布 · 445 阅读

Perl 专栏收录该内容

35 篇文章

订阅专栏

本文提供了一个使用Perl语言编写的脚本，该脚本利用ExtUtils::Installed模块来列出系统中已安装的所有Perl模块及其版本信息。通过遍历获取到的模块列表，脚本能够输出每个模块的名称和对应的版本号。

查看已经安装的模块的相应信息。

#!/usr/bin/perl 
use strict; 
use ExtUtils::Installed; 

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

foreach(@modules) 
{ 
        my $ver = $inst->version($_) || "???"; 
        printf("%-12s --  %s\n", $_, $ver);    
} 
exit 0;