Try:

use strict;
use ExtUtils::Installed;
my $inst = ExtUtils::Installed->new();
print map "$_\n", @ARGV
       ? map $inst->files($_), @ARGV
       : $inst->modules();
[download]

Update: This looks potentially very useful too: Search @INC And Display Modules.