--查询目前系统中都安装了哪些perl模块

查询目前系统中都安装了哪些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;
=========================

 

posted @ 2009-04-06 12:02  mop  阅读(726)  评论(0编辑  收藏  举报