Re: Get a list of all pragmas
- From: "tuser" <tuser3@xxxxxxxxx>
- Date: 30 Aug 2006 07:40:20 -0700
anno4000@xxxxxxxxxxxxxxxxxxxxxx wrote:
tuser <tuser3@xxxxxxxxx> wrote in comp.lang.perl.misc:
I am running perl 5.8.7 under Ubuntu Linux 6.06 LTS.
Looking at "perldoc perltoc", I can see the list of pragmas in my
version of perl.
Then I tried to get the list of all pragmas from a perl program:
=================
use ExtUtils::Installed;
$, = "\n";
print ExtUtils::Installed->new()->modules(), "";
=================
but that did only give me the manually installed modules from CPAN, not
even the pre-installed standard modules, let alone the pragmas !
How can I get this list of pragmas programmatically from within a perl
program (other than scanning the "perldoc perltoc" output) ?
This may get you started. It finds all all-lower-case module names
in @INC. Some are probably not meant for public consumption.
use File::Find;
my @prag;
find sub { /^([[:lower:]]+).pl$/ and push @prag, $1 }, @INC;
print join "\n", @prag, '';
Anno
Cool ! - that works brilliantly.
I did not think of pragmas being all-lowercase modules, but yes, they
are ! -- perl has been (and probably will be) surprising me again and
again.
Thanks.
.
- References:
- Get a list of all pragmas
- From: tuser
- Re: Get a list of all pragmas
- From: anno4000
- Get a list of all pragmas
- Prev by Date: Re: integrate()
- Next by Date: Re: Get a list of all pragmas
- Previous by thread: Re: Get a list of all pragmas
- Next by thread: Re: Get a list of all pragmas
- Index(es):
Relevant Pages
|
