#!/usr/bin/perl use ExtUtils::Installed; my $i = ExtUtils::Installed->new(); my (@modules) = $i->modules(); for $m (sort @modules) { print "$m ", $i->version($m), $/; }