Tue Nov 01 01:21:49 2011: Request 72082 was acted upon.
Transaction: Ticket created by mdengf...@gmail.com
Queue: Module-ScanDeps
Subject: $FindBin::Bin issue on Moudel::ScanDeps 1.04
Broken in: (no value)
Severity: (no value)
Owner: Nobody
Requestors: mdengf...@gmail.com
Status: new
Ticket <URL: https://rt.cpan.org/Ticket/Display.html?id=72082 >
Hi, Experts
I got some issue on Module::ScanDeps 1.04. But not on Module::ScanDeps
1.02.
There is a simple test.pl file. You can get the its content in below
'cat' command. On the host hostA, the version of Module::ScanDeps is 1.02.
The 'scandeps.pl' can output the correct result.
For the same test.pl file. On the hostBm the version of
Module::ScanDeps is 1.04, The 'scandeps.pl' command get some issue.
It seems the '$FindBin::Bin' was redirected to '/tmp' instead of the
correct folder. So it caused some modules can't be used correctly.
Thanks in advance.
Dengfeng
=======================================================
hostA
=======================================================
hostA [216]: ls
lib test.pl
hostA [217]: cat test.pl
use FindBin;
use lib "$FindBin::Bin/lib";
use MYMODULE;
print "Hello World!\n"
hostA [218]: perl -V
Summary of my perl5 (revision 5 version 12 subversion 3) configuration:
Platform:
osname=linux, osvers=2.6.18-164.el5, archname=x86_64-linux-thread-multi
uname='linux hostA 2.6.18-164.el5 #1 smp tue aug 18 15:51:48 edt 2009
x86_64 x86_64 x86_64 gnulinux '
config_args='-Dcc=gcc -Dusethreads -Duse64bitall
-Dprefix=/home/dfmao/perl-5.12.3/linuxR_x86 -de'
hint=recommended, useposix=true, d_sigaction=define
useithreads=define, usemultiplicity=define
useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
use64bitint=define, use64bitall=define, uselongdouble=undef
usemymalloc=n, bincompat5005=undef
Compiler:
cc='gcc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -fno-strict-aliasing
-pipe -fstack-protector -I/usr/local/include -D_LARGEFILE_SOURCE
-D_FILE_OFFSET_BITS=64',
optimize='-O2',
cppflags='-D_REENTRANT -D_GNU_SOURCE -fno-strict-aliasing -pipe
-fstack-protector -I/usr/local/include'
ccversion='', gccversion='4.1.2 20080704 (Red Hat 4.1.2-46)',
gccosandvers=''
intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
ivtype='long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t',
lseeksize=8
alignbytes=8, prototype=define
Linker and Libraries:
ld='gcc', ldflags =' -fstack-protector -L/usr/local/lib'
libpth=/usr/local/lib /lib /usr/lib /lib64 /usr/lib64 /usr/local/lib64
libs=-lnsl -lgdbm -ldb -ldl -lm -lcrypt -lutil -lpthread -lc
perllibs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
libc=/lib/libc-2.5.so, so=so, useshrplib=false, libperl=libperl.a
gnulibc_version='2.5'
Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
cccdlflags='-fPIC', lddlflags='-shared -O2 -L/usr/local/lib
-fstack-protector'
Characteristics of this binary (from libperl):
Compile-time options: MULTIPLICITY PERL_DONT_CREATE_GVSV
PERL_IMPLICIT_CONTEXT PERL_MALLOC_WRAP
USE_64_BIT_ALL
USE_64_BIT_INT USE_ITHREADS USE_LARGE_FILES
USE_PERLIO USE_PERL_ATOF USE_REENTRANT_API
Built under linux
Compiled at Jul 7 2011 10:01:50
@INC:
/home/dfmao/perl-5.12.3/linuxR_x86/lib/site_perl/5.12.3/x86_64-linux-thread-multi
/home/dfmao/perl-5.12.3/linuxR_x86/lib/site_perl/5.12.3
/home/dfmao/perl-5.12.3/linuxR_x86/lib/5.12.3/x86_64-linux-thread-multi
/home/dfmao/perl-5.12.3/linuxR_x86/lib/5.12.3
.
hostA [219]: perl -MModule::ScanDeps -e 'print $Module::ScanDeps::VERSION'
1.02
hostA [220]: scandeps.pl -c test.pl
'MYMODULE' => 'undef',
'Archive::Zip::Archive' => '1.30',
'Archive::Zip::DirectoryMember' => '1.30',
'Archive::Zip::FileMember' => '1.30',
'Archive::Zip::Member' => '1.30',
'Archive::Zip::NewFileMember' => '1.30',
'Archive::Zip::StringMember' => '1.30',
'Archive::Zip::ZipFileMember' => '1.30',
'URI::URL' => '5.03',
'Expect' => '1.21',
'HTTP::Request' => '5.827',
'HTTP::Date' => '5.831',
'URI::http' => 'undef',
'LWP::UserAgent' => '5.835',
'LWP::Authen::Digest' => 'undef',
'LWP::Authen::Ntlm' => '5.835',
'LWP::Protocol::GHTTP' => 'undef',
'LWP::Protocol::cpan' => 'undef',
'LWP::Protocol::data' => 'undef',
'LWP::Protocol::file' => 'undef',
'LWP::Protocol::ftp' => 'undef',
'LWP::Protocol::gopher' => 'undef',
'LWP::Protocol::https' => 'undef',
'LWP::Protocol::https10' => 'undef',
'LWP::Protocol::loopback' => 'undef',
'LWP::Protocol::mailto' => 'undef',
'LWP::Protocol::nntp' => 'undef',
'LWP::Protocol::nogo' => 'undef',
'LWP::Authen::Basic' => 'undef',
'LWP::Protocol::http' => 'undef',
'LWP::Protocol::http10' => 'undef',
'HTML::LinkExtor' => '3.60',
'Archive::Zip' => '1.30',
'Crypt::SSLeay::X509' => 'undef',
'Crypt::SSLeay::CTX' => 'undef',
'IO::Pty' => '1.10',
'IO::Tty' => '1.10',
'HTML::Tagset' => '3.20',
'HTML::Parser' => '3.68',
'URI' => '1.58',
'URI::data' => 'undef',
'URI::_query' => 'undef',
'URI::_punycode' => '0.03',
'URI::_userpass' => 'undef',
'URI::mailto' => 'undef',
'URI::IRI' => 'undef',
'URI::QueryParam' => 'undef',
'URI::Split' => 'undef',
'URI::_foreign' => 'undef',
'URI::_segment' => 'undef',
'URI::file::FAT' => 'undef',
'URI::file::Mac' => 'undef',
'URI::file::OS2' => 'undef',
'URI::file::QNX' => 'undef',
'URI::ftp' => 'undef',
'URI::gopher' => 'undef',
'URI::https' => 'undef',
'URI::ldapi' => 'undef',
'URI::ldaps' => 'undef',
'URI::mms' => 'undef',
'URI::nntp' => 'undef',
'URI::pop' => 'undef',
'URI::rlogin' => 'undef',
'URI::rsync' => 'undef',
'URI::rtspu' => 'undef',
'URI::sips' => 'undef',
'URI::snews' => 'undef',
'URI::ssh' => 'undef',
'URI::telnet' => 'undef',
'URI::tn3270' => 'undef',
'URI::Heuristic' => '4.19',
'URI::_idna' => 'undef',
'URI::file::Unix' => 'undef',
'URI::ldap' => '1.11',
'URI::rtsp' => 'undef',
'URI::_login' => 'undef',
'URI::file::Win32' => 'undef',
'URI::file::Base' => 'undef',
'URI::_ldap' => '1.11',
'URI::news' => 'undef',
'URI::sip' => '0.10',
'URI::_generic' => 'undef',
'URI::_server' => 'undef',
'HTTP::Cookies::Netscape' => '5.832',
'HTTP::Message' => '5.837',
'IO::Tty::Constant' => 'undef',
'HTML::Entities' => '3.68',
'File::Listing' => '5.837',
'HTTP::Negotiate' => '5.835',
'LWP::MediaTypes' => '5.835',
'Net::HTTP' => '5.834',
'HTTP::Status' => '5.817',
'Net::HTTPS' => '5.819',
'Net::SSL' => '2.85',
'HTML::HeadParser' => '3.66',
'HTTP::Config' => '5.835',
'HTTP::Request::Common' => '5.824',
'LWP::ConnCache' => '5.810',
'HTTP::Cookies' => '5.837',
'HTTP::Headers' => '5.835',
'HTTP::Headers::Util' => '5.817',
'LWP::MemberMixin' => 'undef',
'LWP' => '5.837',
'LWP::Protocol' => '5.829',
'HTTP::Response' => '5.836',
'PAR::Dist' => '0.47',
'YAML::Tiny' => '1.50',
'Net::HTTP::Methods' => '5.834',
'Crypt::SSLeay::Conn' => 'undef',
'Crypt::SSLeay::Err' => 'undef',
'Crypt::SSLeay::MainContext' => 'undef',
'Crypt::SSLeay' => '0.58',
'LWP::Simple' => '5.835',
'URI::WithBase' => '2.19',
'URI::file' => '4.20',
'URI::Escape' => '3.30',
==================================================
===============================================
hostB
===============================================
hostB [210]: ls
lib test.pl
hostB [211]: cat test.pl
use FindBin;
use lib "$FindBin::Bin/lib";
use MYMODULE;
print "Hello World!\n"
hostB [212]: perl -V
Summary of my perl5 (revision 5 version 12 subversion 3) configuration:
Platform:
osname=linux, osvers=2.6.9-34.el, archname=ppc64-linux-thread-multi
uname='linux hostB 2.6.9-34.el #1 smp fri feb 24 16:46:57 est 2006
ppc64 ppc64 ppc64 gnulinux '
config_args='-Dcc=gcc -Dusethreads
-Dprefix=/home/dfmao/perl-5.12.3/plinuxR -de'
hint=recommended, useposix=true, d_sigaction=define
useithreads=define, usemultiplicity=define
useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
use64bitint=undef, use64bitall=undef, uselongdouble=undef
usemymalloc=n, bincompat5005=undef
Compiler:
cc='gcc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -fno-strict-aliasing
-pipe -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
optimize='-O1',
cppflags='-D_REENTRANT -D_GNU_SOURCE -fno-strict-aliasing -pipe
-I/usr/local/include'
ccversion='', gccversion='3.4.5 20051201 (Red Hat 3.4.5-2)',
gccosandvers=''
intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=4321
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=8
ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t',
lseeksize=8
alignbytes=8, prototype=define
Linker and Libraries:
ld='gcc', ldflags =' -L/usr/local/lib'
libpth=/usr/local/lib /lib /usr/lib /lib64 /usr/lib64
libs=-lnsl -lgdbm -ldb -ldl -lm -lcrypt -lutil -lpthread -lc
perllibs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
libc=/lib/libc-2.3.4.so, so=so, useshrplib=false, libperl=libperl.a
gnulibc_version='2.3.4'
Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
cccdlflags='-fPIC', lddlflags='-shared -O1 -L/usr/local/lib'
Characteristics of this binary (from libperl):
Compile-time options: MULTIPLICITY PERL_DONT_CREATE_GVSV
PERL_IMPLICIT_CONTEXT PERL_MALLOC_WRAP USE_ITHREADS
USE_LARGE_FILES USE_PERLIO USE_PERL_ATOF
USE_REENTRANT_API
Built under linux
Compiled at Oct 26 2011 23:07:19
@INC:
/home/dfmao/perl-5.12.3/plinuxR/lib/site_perl/5.12.3/ppc64-linux-thread-multi
/home/dfmao/perl-5.12.3/plinuxR/lib/site_perl/5.12.3
/home/dfmao/perl-5.12.3/plinuxR/lib/5.12.3/ppc64-linux-thread-multi
/home/dfmao/perl-5.12.3/plinuxR/lib/5.12.3
.
hostB [215]: perl -MModule::ScanDeps -e 'print $Module::ScanDeps::VERSION'
1.04
hostB [216]: scandeps.pl -c test.pl
Can't locate MYMODULE.pm in @INC (@INC contains: /tmp/lib
/home/dfmao/perl-5.12.3/plinuxR/lib/site_perl/5.12.3/ppc64-linux-thread-multi
/home/dfmao/perl-5.12.3/plinuxR/lib/site_perl/5.12.3
/home/dfmao/perl-5.12.3/plinuxR/lib/5.12.3/ppc64-linux-thread-multi
/home/dfmao/perl-5.12.3/plinuxR/lib/5.12.3 .) at test.pl line 5.
BEGIN failed--compilation aborted at test.pl line 5.
SYSTEM ERROR in compiling test.pl: 512 at
/home/dfmao/perl-5.12.3/plinuxR/lib/site_perl/5.12.3/Module/ScanDeps.pm
line 1265.
--
---------------------------------------------------------
Market is wrong, But I am right!
