查看已经安装的模块的相应信息。
#!/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;
本文提供了一个使用Perl语言编写的脚本,该脚本利用ExtUtils::Installed模块来列出系统中已安装的所有Perl模块及其版本信息。通过遍历获取到的模块列表,脚本能够输出每个模块的名称和对应的版本号。
1997

被折叠的 条评论
为什么被折叠?



