perl查看已经安装的模块
use ExtUtils::Installed;my $inst = ExtUtils::Installed->new();
my @modules = $inst->modules();
foreach (@modules)
{
my $ver = $inst->version($_) || "???";
printf( "%-12s --%s\n", $_, $ver );
}
原文：http://blog.sina.com.cn/s/blog_4af3f0d20100faph.html
页:
[1]