9 unless ($ENV{PERL_CORE
}) {
10 require Test
::NoWarnings
;
11 Test
::NoWarnings
->import ();
20 ok
(my $conf = Config
::Perl
::V
::plv2hash
(<DATA
>), "Read perl -v block");
21 ok
(exists $conf->{$_}, "Has $_ entry") for qw( build environment config inc );
23 is
($conf->{build
}{osname
}, $conf->{config
}{osname
}, "osname");
24 is
($conf->{build
}{stamp
}, "Jun 30 2014 15:37:09", "Build time");
25 is
($conf->{config
}{version
}, "5.20.0", "reconstructed \$Config{version}");
27 is
($conf->{build
}{options
}{$_}, 0, "Runtime option $_ unset") for qw(
28 DEBUGGING DEBUG_LEAKING_SCALARS DEBUG_LEAKING_SCALARS_FORK_DUMP
29 DECCRTL_SOCKETS FAKE_THREADS FCRYPT HAVE_INTERP_INTERN MYMALLOC NO_HASH_SEED
30 NO_MATHOMS NO_TAINT_SUPPORT PERL_BOOL_AS_CHAR PERL_DEBUG_READONLY_COW
31 PERL_DEBUG_READONLY_OPS PERL_DISABLE_PMC PERL_DONT_CREATE_GVSV
32 PERL_EXTERNAL_GLOB PERL_GLOBAL_STRUCT PERL_GLOBAL_STRUCT_PRIVATE
33 PERL_HASH_FUNC_DJB2 PERL_HASH_FUNC_MURMUR3 PERL_HASH_FUNC_ONE_AT_A_TIME
34 PERL_HASH_FUNC_ONE_AT_A_TIME_HARD PERL_HASH_FUNC_ONE_AT_A_TIME_OLD
35 PERL_HASH_FUNC_SDBM PERL_HASH_FUNC_SIPHASH PERL_HASH_FUNC_SUPERFAST
36 PERL_IMPLICIT_CONTEXT PERL_IMPLICIT_SYS PERL_IS_MINIPERL PERL_MAD
37 PERL_MALLOC_WRAP PERL_MEM_LOG PERL_MEM_LOG_ENV PERL_MEM_LOG_ENV_FD
38 PERL_MEM_LOG_NOIMPL PERL_MEM_LOG_STDERR PERL_MEM_LOG_TIMESTAMP PERL_MICRO
39 PERL_NEED_APPCTX PERL_NEED_TIMESBASE PERL_NEW_COPY_ON_WRITE
40 PERL_OLD_COPY_ON_WRITE PERL_PERTURB_KEYS_DETERMINISTIC
41 PERL_PERTURB_KEYS_DISABLED PERL_PERTURB_KEYS_RANDOM PERL_POISON
42 PERL_PRESERVE_IVUV PERL_RELOCATABLE_INCPUSH PERL_SAWAMPERSAND
43 PERL_TRACK_MEMPOOL PERL_USES_PL_PIDSTATUS PERL_USE_DEVEL
44 PERL_USE_SAFE_PUTENV PL_OP_SLAB_ALLOC THREADS_HAVE_PIDS UNLINK_ALL_VERSIONS
45 USE_64_BIT_ALL USE_64_BIT_INT USE_ATTRIBUTES_FOR_PERLIO USE_FAST_STDIO
46 USE_HASH_SEED_EXPLICIT USE_IEEE USE_ITHREADS USE_LARGE_FILES USE_LOCALE
47 USE_LOCALE_COLLATE USE_LOCALE_CTYPE USE_LOCALE_NUMERIC USE_LOCALE_TIME
48 USE_LONG_DOUBLE USE_PERLIO USE_PERL_ATOF USE_REENTRANT_API USE_SFIO
49 USE_SITECUSTOMIZE USE_SOCKS VMS_DO_SOCKETS VMS_SHORTEN_LONG_SYMBOLS
52 is
($conf->{build
}{options
}{$_}, 1, "Runtime option $_ set") for qw(
53 HAS_TIMES MULTIPLICITY PERLIO_LAYERS
59 bincompat5005
=> "undef",
60 byteorder
=> 12345678,
62 cccdlflags
=> "-fPIC",
63 ccdlflags
=> "-Wl,-E",
64 config_args
=> "-Dusedevel -Uversiononly -Dinc_version_list=none -Duse64bitint -Dusethreads -Duseithreads -Duselongdouble -des",
65 gccversion
=> "4.8.1 20130909 [gcc-4_8-branch revision 202388]",
66 gnulibc_version
=> "2.18",
68 ivtype
=> "long long",
70 lddlflags
=> "-shared -O2 -L/pro/local/lib -fstack-protector",
71 ldflags
=> "-L/pro/local/lib -fstack-protector",
72 libc
=> "libc-2.18.so",
74 osvers
=> "3.11.10-17-desktop",
75 use64bitint
=> "define",
77 is
($conf->{config
}{$_}, $check{$_}, "reconstructed \$Config{$_}") for sort keys %check;
80 Summary of
my perl5
(revision
5 version
20 subversion
0) configuration
:
83 osname
=linux
, osvers
=3.11.10-17-desktop
, archname
=i686
-linux
-thread
-multi
-64int-ld
84 uname
='linux lx09 3.11.10-17-desktop #1 smp preempt mon jun 16 15:28:13 utc 2014 (fba7c1f) i686 i686 i386 gnulinux '
85 config_args
='-Dusedevel -Uversiononly -Dinc_version_list=none -Duse64bitint -Dusethreads -Duseithreads -Duselongdouble -des'
86 hint
=recommended
, useposix
=true
, d_sigaction
=define
87 useithreads
=define
, usemultiplicity
=define
88 use64bitint
=define
, use64bitall
=undef, uselongdouble
=define
89 usemymalloc
=n
, bincompat5005
=undef
91 cc
='cc', ccflags
='-D_REENTRANT -D_GNU_SOURCE -fwrapv -fno-strict-aliasing -pipe -fstack-protector -I/pro/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
93 cppflags
='-D_REENTRANT -D_GNU_SOURCE -fwrapv -fno-strict-aliasing -pipe -fstack-protector -I/pro/local/include'
94 ccversion
='', gccversion
='4.8.1 20130909 [gcc-4_8-branch revision 202388]', gccosandvers
=''
95 intsize
=4, longsize
=4, ptrsize
=4, doublesize
=8, byteorder
=12345678
96 d_longlong
=define
, longlongsize
=8, d_longdbl
=define
, longdblsize
=12
97 ivtype
='long long', ivsize
=8, nvtype
='long double', nvsize
=12, Off_t
='off_t', lseeksize
=8
98 alignbytes
=4, prototype=define
100 ld
='cc', ldflags
='-L/pro/local/lib -fstack-protector'
101 libpth
=/usr/local/lib /usr
/lib/gcc/i586-suse-linux/4.8/include-fixed /usr
/lib/gcc/i586-suse-linux/4.8/../../../../i586-suse-linux/lib
/usr/lib
/pro/local/lib /lib
102 libs
=-lnsl
-lgdbm
-ldb
-ldl
-lm
-lcrypt
-lutil
-lpthread
-lc -lgdbm_compat
103 perllibs
=-lnsl
-ldl
-lm
-lcrypt
-lutil
-lpthread
-lc
104 libc
=libc
-2.18.so
, so
=so
, useshrplib
=false
, libperl
=libperl
.a
105 gnulibc_version
='2.18'
107 dlsrc
=dl_dlopen
.xs
, dlext
=so
, d_dlsymun
=undef, ccdlflags
='-Wl,-E'
108 cccdlflags
='-fPIC', lddlflags
='-shared -O2 -L/pro/local/lib -fstack-protector'
111 Characteristics of this binary
(from libperl
):
112 Compile
-time options
: HAS_TIMES MULTIPLICITY PERLIO_LAYERS
113 PERL_DONT_CREATE_GVSV
114 PERL_HASH_FUNC_ONE_AT_A_TIME_HARD
115 PERL_IMPLICIT_CONTEXT PERL_MALLOC_WRAP
116 PERL_NEW_COPY_ON_WRITE PERL_PRESERVE_IVUV
117 PERL_USE_DEVEL USE_64_BIT_INT USE_ITHREADS
118 USE_LARGE_FILES USE_LOCALE USE_LOCALE_COLLATE
119 USE_LOCALE_CTYPE USE_LOCALE_NUMERIC USE_LONG_DOUBLE
120 USE_PERLIO USE_PERL_ATOF USE_REENTRANT_API
122 Compiled at Jun
30 2014 15:37:09
124 /pro/lib
/perl5/site_perl
/5.20.0/i686-linux
-thread
-multi
-64int-ld
125 /pro/lib
/perl5/site_perl
/5.20.0
126 /pro/lib
/perl5/5.20.0/i686
-linux
-thread
-multi
-64int-ld
127 /pro/lib
/perl5/5.20.0