Thread Installierte Module ermitteln... (9 answers)
Opened by perli at 2003-09-12 18:24

Strat
 2003-09-12 21:41
#3181 #3181
User since
2003-08-04
5246 articles
ModeratorIn
[Homepage] [default_avatar]
oder:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
use File::Find ();

foreach my $root (@INC) {
&File::Find::find(
sub {
return unless /\.pm/;
my $module = $File::Find::name;
$module =~ s/^\Q$root\E\/(.+)\.pm/$1/
and $module =~ s/[\/\\]/::/g
and print $module. "\n";
},
$root
);
} # foreach
perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/

View full thread Installierte Module ermitteln...