#!/sw/bin/perl

use strict;
use warnings;
use ExtUtils::Installed;
use Data::Dumper;

my ($inst) = ExtUtils::Installed->new();
print Dumper my (@modules) = $inst->modules( "all" );