| Subject: | qw(use ...) did not work |
all examples with "use" need to be "use=1", because only qw(use) set the
argz{use} = '' and later only if( $argz{use} && @libz ) is checked.
another hint:
$VERSION ist wrong :-/
perl -MFindBin::libs\ 9999
FindBin::libs version 9999 required--this is only version 1.40.
cpan[1]> install FindBin::libs
Database was generated on Thu, 24 Sep 2009 08:27:56 GMT
FindBin::libs is up to date (1.40).
here are some exampled with use:
perl -MData::Dumper -e 'use FindBin::libs qw(print); print Dumper(\@INC);'
Found */lib:
/home/ostmann/overmind/lib
$VAR1 = [
'/home/ostmann/overmind/lib',
'/home/ostmann/perl5lib/lib/5.10.1/i686-linux',
'/home/ostmann/perl5lib/lib/5.10.1',
'/home/ostmann/perl5lib/lib/site_perl/5.10.1/i686-linux',
'/home/ostmann/perl5lib/lib/site_perl/5.10.1',
'.'
];
ostmann@sadraksaemp:~/overmind$ perl -MData::Dumper -e 'use
FindBin::libs qw(print use); print Dumper(\@INC);'
Found */lib:
/home/ostmann/overmind/lib
$VAR1 = [
'/home/ostmann/perl5lib/lib/5.10.1/i686-linux',
'/home/ostmann/perl5lib/lib/5.10.1',
'/home/ostmann/perl5lib/lib/site_perl/5.10.1/i686-linux',
'/home/ostmann/perl5lib/lib/site_perl/5.10.1',
'.'
];
ostmann@sadraksaemp:~/overmind$ perl -MData::Dumper -e 'use
FindBin::libs qw(print use=1); print Dumper(\@INC);'
Found */lib:
/home/ostmann/overmind/lib
$VAR1 = [
'/home/ostmann/overmind/lib',
'/home/ostmann/perl5lib/lib/5.10.1/i686-linux',
'/home/ostmann/perl5lib/lib/5.10.1',
'/home/ostmann/perl5lib/lib/site_perl/5.10.1/i686-linux',
'/home/ostmann/perl5lib/lib/site_perl/5.10.1',
'.'
];