On Dec 18, 2003, at 10:40 AM, david wrote: [..]
[..]#!/usr/bin/perl -w use strict;
use ExtUtils::Installed;
print join("\n",grep /\.pm$/, ExtUtils::Installed->new->files('Perl')),"\n";
clearly a step in the right direction.
But there is this minor nit that I find a bit worrisome.
vladimir: 67:] ./tra* | grep -i Sol Module: Sun::Solaris::BSM::_BSMparse Module: Sun::Solaris::Kstat Module: Sun::Solaris::Project Module: Sun::Solaris::Utils vladimir: 68:]
the version of perl at /usr/bin/perl tells me that it aware of the @INC
Compiled at Aug 25 2002 12:19:33 @INC: /usr/local/lib/perl5/5.6.1/sun4-solaris-64int /usr/local/lib/perl5/5.6.1 /usr/local/lib/perl5/site_perl/5.6.1/sun4-solaris-64int /usr/local/lib/perl5/site_perl/5.6.1 /usr/local/lib/perl5/site_perl /usr/local/lib/perl5/vendor_perl/5.6.1/sun4-solaris-64int /usr/local/lib/perl5/vendor_perl/5.6.1 /usr/local/lib/perl5/vendor_perl /usr/perl5/5.6.1/lib/sun4-solaris-64int /usr/perl5/5.6.1/lib /usr/perl5/site_perl/5.6.1/sun4-solaris-64int /usr/perl5/site_perl/5.6.1 /usr/perl5/site_perl /usr/perl5/vendor_perl/5.6.1/sun4-solaris-64int /usr/perl5/vendor_perl/5.6.1 /usr/perl5/vendor_perl .
yet I would need to have fore-knowledge that it was there to even try say:
my $files;
eval {
$files = ExtUtils::Installed->new->files('Sun',"all", '/usr/perl5/5.6.1');
} ;
die "took weirdnesff: $@" if $@;
which still dies on me Unable to find the Sun...
Which will also fail if I try for say Sun::Solaris::Kstat
Don't get me wrong, I think that in the Main
ExtUtils::Installed
is moving in the right general direction. I think that it too still needs to be improved.
ciao drieux
---
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>