On Mon, 2003-10-27 at 10:35, SN wrote: 
> How about showing us the diff?

Attached is a diff of the good and bad Config.pm files.  I have narrowed
the issue down to the perl statement "keys %Config"  I have created the
following test program which has the same issue with allocating memory
and never prints anything.

BEGIN {
    @INC = './lib';
}

use Config;

foreach $key (keys %Config) {
    print "Key: $key\n";
}


Regards,
Paul
--- Config.pm.bad       2003-10-28 20:18:01.000000000 -0600
+++ Config.pm.good      2003-10-28 20:18:09.000000000 -0600
@@ -34,9 +34,9 @@
 #
 ## Package name      : perl5
 ## Source directory  : .
-## Configuration time: Tue Oct 28 19:57:10 CST 2003
+## Configuration time: Sun Aug 31 09:12:50 Local time zone must be set--see zic 
manual page 2003
 ## Configured by     : root
-## Target system     : linux garath 2.4.20-gentoo-r7 #2 thu oct 16 22:07:55 cdt 2003 
i686 intel(r) pentium(r) 4 cpu 1.80ghz genuineintel gnulinux 
+## Target system     : linux cdimage 2.4.21-gss #1 mon jul 21 00:38:59 local time 
zone must be set--see zic manu i686 intel(r) pentium(r) 4 cpu 1.80ghz genuineintel 
gnulinux 
 #
 ## Configure command line arguments.
 #PERL_PATCHLEVEL=
@@ -45,17 +45,17 @@
 archlibexp='/usr/lib/perl5/5.8.0/i686-linux'
 archname='i686-linux'
 cc='gcc'
-ccflags='-fno-strict-aliasing -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64'
-cppflags='-fno-strict-aliasing'
+ccflags='-DPERL5 -fno-strict-aliasing -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64'
+cppflags='-DPERL5 -fno-strict-aliasing'
 dlsrc='dl_dlopen.xs'
 dynamic_ext='B ByteLoader Cwd DB_File Data/Dumper Devel/DProf Devel/PPPort Devel/Peek 
Digest/MD5 Encode Fcntl File/Glob Filter/Util/Call GDBM_File I18N/Langinfo IO IPC/SysV 
List/Util MIME/Base64 NDBM_File Opcode POSIX PerlIO/encoding PerlIO/scalar PerlIO/via 
SDBM_File Socket Storable Sys/Hostname Sys/Syslog Time/HiRes Unicode/Normalize 
XS/APItest XS/Typemap attrs re threads threads/shared'
 extensions='B ByteLoader Cwd DB_File Data/Dumper Devel/DProf Devel/PPPort Devel/Peek 
Digest/MD5 Encode Fcntl File/Glob Filter/Util/Call GDBM_File I18N/Langinfo IO IPC/SysV 
List/Util MIME/Base64 NDBM_File Opcode POSIX PerlIO/encoding PerlIO/scalar PerlIO/via 
SDBM_File Socket Storable Sys/Hostname Sys/Syslog Time/HiRes Unicode/Normalize 
XS/APItest XS/Typemap attrs re threads threads/shared Errno'
-installarchlib='/var/tmp/portage/perl-5.8.0-r12/image//usr/lib/perl5/5.8.0/i686-linux'
-installprivlib='/var/tmp/portage/perl-5.8.0-r12/image//usr/lib/perl5/5.8.0'
+installarchlib='/usr/lib/perl5/5.8.0/i686-linux'
+installprivlib='/usr/lib/perl5/5.8.0'
 libpth='/usr/local/lib /lib /usr/lib'
 libs='-lpthread -lnsl -lndbm -lgdbm -ldb -ldl -lm -lc -lcrypt -lutil'
 osname='linux'
-osvers='2.4.20-gentoo-r7'
+osvers='2.4.21-gss'
 prefix='/usr'
 privlibexp='/usr/lib/perl5/5.8.0'
 sharpbang='#!'
@@ -121,9 +121,8 @@
 ccsymbols='__GNUC_MINOR__=2 __GNUC_PATCHLEVEL__=3 __GXX_ABI_VERSION=102 
__NO_INLINE__=1 __STDC_HOSTED__=1 __gnu_linux__=1 __i386=1 __i386__=1 __linux=1 
__linux__=1 __tune_i686__=1 __tune_pentiumpro__=1 __unix=1 __unix__=1 cpu=i386 
machine=i386 system=posix'
 ccversion=''
 cf_by='root'
[EMAIL PROTECTED]
-homelinux.org'
-cf_time='Tue Oct 28 19:57:10 CST 2003'
+cf_email='[EMAIL PROTECTED]'
+cf_time='Sun Aug 31 09:12:50 Local time zone must be set--see zic manual page 2003'
 charsize='1'
 chgrp=''
 chmod='chmod'
@@ -148,10 +147,10 @@
 config_arg5='-Dvendorprefix=/usr'
 config_arg6='-Dsiteprefix=/usr'
 config_arg7='-Dlocincpth= '
-config_arg8='-Doptimize=-march=pentium4 -O2 -pipe'
+config_arg8='-Doptimize=-O3 -march=pentium4 -funroll-loops -pipe'
 config_arg9='-Duselargefiles'
 config_argc='18'
-config_args='-des -Darchname=i686-linux -Dcc=gcc -Dprefix=/usr -Dvendorprefix=/usr 
-Dsiteprefix=/usr -Dlocincpth=  -Doptimize=-march=pentium4 -O2 -pipe -Duselargefiles 
-Dd_dosuid -Dd_semctl_semun -Dscriptdir=/usr/bin -Dman3ext=3pm -Dcf_by=Gentoo -Ud_csh 
-Di_gdbm -Di_db -Di_ndbm'
+config_args='-des -Darchname=i686-linux -Dcc=gcc -Dprefix=/usr -Dvendorprefix=/usr 
-Dsiteprefix=/usr -Dlocincpth=  -Doptimize=-O3 -march=pentium4 -funroll-loops -pipe 
-Duselargefiles -Dd_dosuid -Dd_semctl_semun -Dscriptdir=/usr/bin -Dman3ext=3pm 
-Dcf_by=Gentoo -Ud_csh -Di_gdbm -Di_db -Di_ndbm'
 contains='grep'
 cp='cp'
 cpio=''
@@ -563,9 +562,9 @@
 date='date'
 db_hashtype='u_int32_t'
 db_prefixtype='size_t'
-db_version_major='4'
-db_version_minor='0'
-db_version_patch='14'
+db_version_major='3'
+db_version_minor='2'
+db_version_patch='9'
 defvoidused='15'
 direntrytype='struct dirent'
 dlext='so'
@@ -597,10 +596,10 @@
 freetype='void'
 from=':'
 full_ar='/usr/bin/ar'
-full_csh='/bin/csh'
+full_csh='csh'
 full_sed='/bin/sed'
 gccosandvers=''
-gccversion='3.2.3 20030422 (Gentoo Linux 1.4 3.2.3-r2, propolice)'
+gccversion='3.2.3 20030422 (Gentoo Linux 1.4 3.2.3-r1, propolice)'
 getgrent_r_proto='0'
 getgrgid_r_proto='0'
 getgrnam_r_proto='0'
@@ -732,22 +731,22 @@
 inc_version_list_init='0'
 incpath=''
 inews=''
-installbin='/var/tmp/portage/perl-5.8.0-r12/image//usr/bin'
-installman1dir='/var/tmp/portage/perl-5.8.0-r12/image//usr/share/man/man1'
-installman3dir='/var/tmp/portage/perl-5.8.0-r12/image//usr/share/man/man3'
-installprefix='/var/tmp/portage/perl-5.8.0-r12/image//usr'
+installbin='/usr/bin'
+installman1dir='/usr/share/man/man1'
+installman3dir='/usr/share/man/man3'
+installprefix='/usr'
 installprefixexp='/usr'
-installscript='/var/tmp/portage/perl-5.8.0-r12/image//usr/bin'
-installsitearch='/var/tmp/portage/perl-5.8.0-r12/image//usr/lib/perl5/site_perl/5.8.0/i686-linux'
+installscript='/usr/bin'
+installsitearch='/usr/lib/perl5/site_perl/5.8.0/i686-linux'
 installsitebin='/usr/bin'
-installsitelib='/var/tmp/portage/perl-5.8.0-r12/image//usr/lib/perl5/site_perl/5.8.0'
+installsitelib='/usr/lib/perl5/site_perl/5.8.0'
 installstyle='lib/perl5'
 installusrbinperl='undef'
 installvendorarch='/usr/lib/perl5/vendor_perl/5.8.0/i686-linux'
 installvendorbin='/usr/bin'
 installvendorlib='/usr/lib/perl5/vendor_perl/5.8.0'
 intsize='4'
-issymlink='/bin/test -h'
+issymlink='/usr/bin/test -h'
 ivdformat='"ld"'
 ivsize='4'
 ivtype='long'
@@ -805,10 +804,9 @@
 multiarch='undef'
 mv=''
 myarchname='i686-linux'
-mydomain=.dsl-verizon.net
-homelinux.org'
-myhostname='garath'
-myuname='linux garath 2.4.20-gentoo-r7 #2 thu oct 16 22:07:55 cdt 2003 i686 intel(r) 
pentium(r) 4 cpu 1.80ghz genuineintel gnulinux '
+mydomain='.dsl-verizon.net'
+myhostname='cdimage'
+myuname='linux cdimage 2.4.21-gss #1 mon jul 21 00:38:59 local time zone must be 
set--see zic manu i686 intel(r) pentium(r) 4 cpu 1.80ghz genuineintel gnulinux '
 n='-n'
 need_va_copy='undef'
 netdb_hlen_type='size_t'
@@ -832,7 +830,7 @@
 o_nonblock='O_NONBLOCK'
 obj_ext='.o'
 old_pthread_create_joinable=''
-optimize='-march=pentium4 -O2 -pipe'
+optimize='-O3 -march=pentium4 -funroll-loops -pipe'
 orderlib='false'
 otherlibdirs=' '
 package='perl5'
@@ -840,11 +838,10 @@
 passcat='cat /etc/passwd'
 patchlevel='8'
 path_sep=':'
-perl5='/usr/bin/perl'
+perl5=''
 perl=''
 perl_patchlevel=''
[EMAIL PROTECTED]
-homelinux.org'
+perladmin='[EMAIL PROTECTED]'
 perllibs='-lpthread -lnsl -ldl -lm -lc -lcrypt -lutil'
 perlpath='/usr/bin/perl'
 pg='pg'
@@ -1025,7 +1022,7 @@
 xlibpth='/usr/lib/386 /lib/386'
 xs_apiversion='5.8.0'
 yacc='yacc'
-yaccflags=''
+yaccflags='-DPERL5 '
 zcat=''
 zip='zip'
 !END!
@@ -1044,7 +1041,7 @@
   Compiler:
     cc='$cc', ccflags ='$ccflags',
     optimize='$optimize',
-    cppflags='$cppflags'
+    cppflags='-DPERL5 $cppflags'
     ccversion='$ccversion', gccversion='$gccversion', gccosandvers='$gccosandvers'
     intsize=$intsize, longsize=$longsize, ptrsize=$ptrsize, doublesize=$doublesize, 
byteorder=$byteorder
     d_longlong=$d_longlong, longlongsize=$longlongsize, d_longdbl=$d_longdbl, 
longdblsize=$longdblsize
--
[EMAIL PROTECTED] mailing list

Reply via email to