Re: Perl modules lister


Clear questions and runnable code get the best and fastest answer
	PerlMonks

Re: Perl modules lister

by revdiablo (Prior)

on Apr 20, 2005 at 19:01 UTC ( [id://449726]=note: print w/replies, xml )

Need Help??

in reply to Perl modules lister

perl -MFile::Find -le 'for (@INC) {
    find(sub { print $File::Find::name if /pm$/ }, $_)
}'
[download]

Update: here's one that cleans up the output to resemble the module names, rather than the .pm filenames:

perl -MFile::Find -le '
for $inc (@INC) {
  find(sub {
             return unless /pm$/;

             ($module = $File::Find::name) =~ s!^$inc/!!;
             $module =~ s!/!::!g;
             $module =~ s/.pm$//;

             print $module
           },
       $inc)
}'
[download]