[MTHURN - Mon Jan 17 09:53:22 2005]:
Show quoted text> I'm using CPANPLUS 0.050_04 on Solaris 8 with perl 5.9.1. I'm trying
> to use CPANPLUS to install CPANPLUS 0.051. It asks me to Manually
> configure CPANPLUS based on previous settings. BUT I CAN NOT SEE
> THE PREVIOUS SETTINGS! Only the prompts appear in the terminal:
>
> [MSG] Extracted 'CPANPLUS' to
> '/disk1/src/PERL/.cpanplus/5.9.1/5.9.1/build/CPANPLUS-0.051'
> Running [/usr/local/bin/perl5.9.1 Makefile.PL ]...
> Manually configure CPANPLUS based on previous settings? [Y/n]:
> ### PLEASE NOTE ###################################################
> ...[this is the only text that appears other than the questions]
> ###################################################################
> Location of the Configuration file [1]:
> Are you ready for manual configuration? [Y/n]:
> Please pick one [1]:
> ...
I can reproduce the problem with term::readline::perl, but not without it... it seems to be an
issue with term::readline::perl... consider this test script:
[kane@coke ~...tmp/term-in-term]$ cat master.pl
use strict;
use Term::ReadLine;
my $tr = Term::ReadLine->new('master');
print $0;
do 'slave.pl';
print $0;
$tr->readline('in master');
[kane@coke ~...tmp/term-in-term]$ cat slave.pl
use strict;
use Term::ReadLine;
my $tr = Term::ReadLine->new('slave');
print $0;
$tr->readline('in slave');
[kane@coke ~...tmp/term-in-term]$
And here is it's output:
[kane@coke ~...tmp/term-in-term]$ perlc -l master.pl
master.pl
Cannot create second readline interface, falling back to dumb.
master.pl
in slave
master.pl
in master
[kane@coke ~...tmp/term-in-term]$
Note how it does not print 'slave.pl'. in fact, it doesn't print anything anymore to stdout in
slave.pl, except what you feed it via readline()
I'm not sure what's going on here -- understanding the innards of of T::R is a bit scary, but
i'm failry convinced it has something to do with the falling back to dumb mode.
I'm moving this ticket over to the Term::ReadLine::Perl queue, in the hope that ilyaz can take
a look at this and propose a fix.
For completion sake, I've dumped %ENV and %INC in slave.pl, and also attached my uname -a
and perl -V:
VAR1 = {
'SSH_CLIENT' => '80.127.35.68 33235 22',
'HOST' => 'coke.xs4all.nl',
'CVS_RSH' => 'ssh',
'LC_ALL' => 'C',
'XS4ALL_MMDB_DSN' => 'DBI:Pg:host=god-dev.xs4all.nl;dbname=mmdb',
'REMOTEHOST' => '80.127.35.68',
'OSTYPE' => 'darwin',
'SGML_CATALOG_FILES' => '/sw/etc/sgml/catalog',
'PWD' => '/Users/kane/sources/p4/other/term-ui/tmp/term-in-term',
'P4PORT' => 'codebase1.xs4all.nl:1666',
'USER' => 'kane',
'GROUP' => 'kane',
'LOGNAME' => 'kane',
'SHLVL' => '1',
'PERL5LIB' => '/sw/lib/perl5:/sw/lib/perl5/darwin:/Users/kane/sources/p4/other/
archive-extract/lib:/Users/kane/sources/p4/other/file-fetch/lib:/Users/kane/sources/p4/
other/archive-tar-new/lib:/Users/kane/sources/p4/other/carp-trace/lib:/Users/kane/
sources/p4/other/log-message/lib:/Users/kane/sources/p4/other/module-load/lib:/Users/
kane/sources/p4/other/params-check/lib:/Users/kane/sources/p4/other/qmail-
checkpassword/lib:/Users/kane/sources/p4/other/module-load-conditional/lib:/Users/
kane/sources/p4/other/term-ui/lib:/Users/kane/sources/p4/other/ipc-cmd/lib:/Users/
kane/sources/p4/other/config-auto/lib:/Users/kane/sources/NSA/misc:/Users/kane/
sources/NSA:/Users/kane/sources/NSA/tools:/Users/kane/sources/GOD/MMDB/lib:/Users/
kane/sources/GOD/GOD/lib:/Users/kane/sources/NSA/Apache/Frontier-RPC-0.06/lib/:/
Users/kane/sources/p4/other/object-accessor/lib/',
'PATH' => '/sw/bin:/sw/sbin:/bin:/sbin:/usr/bin:/usr/sbin:/usr/local/bin:/opt/bin:/
Users/kane/.bin:/usr/X11R6/bin',
'HOSTTYPE' => 'powermac',
'TERM' => 'xterm',
'SSH_TTY' => '/dev/ttyq9',
'HOME' => '/Users/kane',
'NSA_USE_PERL' => 'perlc',
'SSH_CONNECTION' => '80.127.35.68 33235 194.109.0.185 22',
'MANPATH' => '/sw/share/man:/usr/share/man:/opt/man:/usr/X11R6/man',
'DISPLAY' => ':0',
'MAIL' => '/var/mail/kane',
'EDITOR' => 'vi',
'VENDOR' => 'apple',
'INFOPATH' => '/sw/share/info:/sw/info:/usr/share/info',
'CVSROOT' => 'kane@cvs.xs4all.nl:/usr/local/cvs',
'P4HOST' => 'coke.xs4all.nl',
'XML_CATALOG_FILES' => '/sw/etc/xml/catalog',
'MACHTYPE' => 'powerpc',
'SHELL' => '/bin/tcsh',
'P4CLIENT' => 'coke',
'KDEWM' => 'quartz-wm'
};
$VAR2 = {
'XSLoader.pm' => '/opt/lib/perl5/5.8.3/darwin-2level/XSLoader.pm',
'warnings/register.pm' => '/opt/lib/perl5/5.8.3/warnings/register.pm',
'Term/Cap.pm' => '/opt/lib/perl5/5.8.3/Term/Cap.pm',
'Term/ReadLine/Perl.pm' => '/opt/lib/perl5/site_perl/5.8.3/Term/ReadLine/Perl.pm',
'warnings.pm' => '/opt/lib/perl5/5.8.3/warnings.pm',
'Config.pm' => '/opt/lib/perl5/5.8.3/darwin-2level/Config.pm',
'bytes.pm' => '/opt/lib/perl5/5.8.3/bytes.pm',
'Carp.pm' => '/opt/lib/perl5/5.8.3/Carp.pm',
'Term/ReadLine.pm' => '/opt/lib/perl5/5.8.3/Term/ReadLine.pm',
'strict.pm' => '/opt/lib/perl5/5.8.3/strict.pm',
'Exporter.pm' => '/opt/lib/perl5/5.8.3/Exporter.pm',
'vars.pm' => '/opt/lib/perl5/5.8.3/vars.pm',
'Term/ReadLine/readline.pm' => '/opt/lib/perl5/site_perl/5.8.3/Term/ReadLine/
readline.pm',
'Term/ReadKey.pm' => '/opt/lib/perl5/site_perl/5.8.3/darwin-2level/Term/
ReadKey.pm',
'overload.pm' => '/opt/lib/perl5/5.8.3/overload.pm',
'AutoLoader.pm' => '/opt/lib/perl5/5.8.3/AutoLoader.pm',
'DynaLoader.pm' => '/opt/lib/perl5/5.8.3/darwin-2level/DynaLoader.pm',
'SelfLoader.pm' => '/opt/lib/perl5/5.8.3/SelfLoader.pm',
'Data/Dumper.pm' => '/opt/lib/perl5/5.8.3/darwin-2level/Data/Dumper.pm',
'slave.pl' => 'slave.pl'
};
[kane@myriad ~]$ uname -a
Darwin myriad.local 7.7.0 Darwin Kernel Version 7.7.0: Sun Nov 7 16:06:51 PST 2004; root:
xnu/xnu-517.9.5.obj~1/RELEASE_PPC Power Macintosh powerpc
[kane@myriad ~]$ perlc -V
Summary of my perl5 (revision 5.0 version 8 subversion 3) configuration:
Platform:
osname=darwin, osvers=7.2.0, archname=darwin-2level
uname='darwin myriad.local 7.2.0 darwin kernel version 7.2.0: thu dec 11 16:20:23 pst
2003; root:xnuxnu-517.3.7.obj~1release_ppc power macintosh powerpc '
config_args='-Dprefix=/opt -des'
hint=recommended, useposix=true, d_sigaction=define
usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef
useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
use64bitint=undef use64bitall=undef uselongdouble=undef
usemymalloc=n, bincompat5005=undef
Compiler:
cc='cc', ccflags ='-pipe -fno-common -DPERL_DARWIN -no-cpp-precomp -fno-strict-
aliasing',
optimize='-Os',
cppflags='-no-cpp-precomp -pipe -fno-common -DPERL_DARWIN -no-cpp-precomp
-fno-strict-aliasing'
ccversion='', gccversion='3.3 20030304 (Apple Computer, Inc. build 1495)',
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='env MACOSX_DEPLOYMENT_TARGET=10.3 cc', ldflags =''
libpth=/usr/lib
libs=-ldbm -ldl -lm -lc
perllibs=-ldl -lm -lc
libc=/usr/lib/libc.dylib, so=dylib, useshrplib=false, libperl=libperl.a
gnulibc_version=''
Dynamic Linking:
dlsrc=dl_dyld.xs, dlext=bundle, d_dlsymun=undef, ccdlflags=' '
cccdlflags=' ', lddlflags=' -bundle -undefined dynamic_lookup'
Characteristics of this binary (from libperl):
Compile-time options: USE_LARGE_FILES
Built under darwin
Compiled at Feb 26 2004 09:39:22
%ENV:
PERL5LIB="/sw/lib/perl5:/sw/lib/perl5/darwin:/Users/kane/sources/p4/other/archive-
extract/lib:/Users/kane/sources/p4/other/file-fetch/lib:/Users/kane/sources/p4/other/
archive-tar-new/lib:/Users/kane/sources/p4/other/carp-trace/lib:/Users/kane/sources/p4/
other/log-message/lib:/Users/kane/sources/p4/other/module-load/lib:/Users/kane/
sources/p4/other/params-check/lib:/Users/kane/sources/p4/other/qmail-checkpassword/
lib:/Users/kane/sources/p4/other/module-load-conditional/lib:/Users/kane/sources/p4/
other/term-ui/lib:/Users/kane/sources/p4/other/ipc-cmd/lib:/Users/kane/sources/p4/
other/config-auto/lib:/Users/kane/sources/p4/other/object-accessor/lib:/Users/kane/
sources/NSA:/Users/kane/sources/NSA/misc:/Users/kane/sources/NSA/test:/Users/kane/
sources/beheer/perl:/Users/kane/sources/p4/cpanplus/devel/lib"
@INC:
/sw/lib/perl5
/sw/lib/perl5/darwin
/Users/kane/sources/p4/other/archive-extract/lib
/Users/kane/sources/p4/other/file-fetch/lib
/Users/kane/sources/p4/other/archive-tar-new/lib
/Users/kane/sources/p4/other/carp-trace/lib
/Users/kane/sources/p4/other/log-message/lib
/Users/kane/sources/p4/other/module-load/lib
/Users/kane/sources/p4/other/params-check/lib
/Users/kane/sources/p4/other/qmail-checkpassword/lib
/Users/kane/sources/p4/other/module-load-conditional/lib
/Users/kane/sources/p4/other/term-ui/lib
/Users/kane/sources/p4/other/ipc-cmd/lib
/Users/kane/sources/p4/other/config-auto/lib
/Users/kane/sources/p4/other/object-accessor/lib
/Users/kane/sources/NSA
/Users/kane/sources/NSA/misc
/Users/kane/sources/NSA/test
/Users/kane/sources/beheer/perl
/Users/kane/sources/p4/cpanplus/devel/lib
/opt/lib/perl5/5.8.3/darwin-2level
/opt/lib/perl5/5.8.3
/opt/lib/perl5/site_perl/5.8.3/darwin-2level
/opt/lib/perl5/site_perl/5.8.3
/opt/lib/perl5/site_perl
.
[kane@myriad ~]$
