home *** CD-ROM | disk | FTP | other *** search
/ PC World 2004 November / PCWorld_2004-11_cd.bin / software / topware / activeperl / ActivePerl-5.8.4.810-MSWin32-x86.exe / ActivePerl-5.8.4.810 / Perl / lib / Config.pm < prev    next >
Text File  |  2004-06-01  |  35KB  |  1,230 lines
  1. # This file was created by configpm when Perl was built. Any changes
  2. # made to this file will be lost the next time perl is built.
  3.  
  4. package Config;
  5. @EXPORT = qw(%Config);
  6. @EXPORT_OK = qw(myconfig config_sh config_vars config_re);
  7.  
  8. my %Export_Cache = map {($_ => 1)} (@EXPORT, @EXPORT_OK);
  9.  
  10. # Define our own import method to avoid pulling in the full Exporter:
  11. sub import {
  12.     my $pkg = shift;
  13.     @_ = @EXPORT unless @_;
  14.  
  15.     my @funcs = grep $_ ne '%Config', @_;
  16.     my $export_Config = @funcs < @_ ? 1 : 0;
  17.  
  18.     my $callpkg = caller(0);
  19.     foreach my $func (@funcs) {
  20.     die sprintf qq{"%s" is not exported by the %s module\n},
  21.         $func, __PACKAGE__ unless $Export_Cache{$func};
  22.     *{$callpkg.'::'.$func} = \&{$func};
  23.     }
  24.  
  25.     *{"$callpkg\::Config"} = \%Config if $export_Config;
  26.     return;
  27. }
  28.  
  29. die "Perl lib version (v5.8.4) doesn't match executable version ($])"
  30.     unless $^V;
  31.  
  32. $^V eq v5.8.4
  33.     or die "Perl lib version (v5.8.4) doesn't match executable version (" .
  34.     sprintf("v%vd",$^V) . ")";
  35.  
  36. ## Configured by: support@ActiveState.com
  37. ### Target system: WIN32 
  38.  
  39. our $summary : unique = <<'!END!';
  40. Summary of my $package (revision $revision $version_patchlevel_string) configuration:
  41.   Platform:
  42.     osname=$osname, osvers=$osvers, archname=$archname
  43.     uname='$myuname'
  44.     config_args='$config_args'
  45.     hint=$hint, useposix=$useposix, d_sigaction=$d_sigaction
  46.     usethreads=$usethreads use5005threads=$use5005threads useithreads=$useithreads usemultiplicity=$usemultiplicity
  47.     useperlio=$useperlio d_sfio=$d_sfio uselargefiles=$uselargefiles usesocks=$usesocks
  48.     use64bitint=$use64bitint use64bitall=$use64bitall uselongdouble=$uselongdouble
  49.     usemymalloc=$usemymalloc, bincompat5005=undef
  50.   Compiler:
  51.     cc='$cc', ccflags ='$ccflags',
  52.     optimize='$optimize',
  53.     cppflags='$cppflags'
  54.     ccversion='$ccversion', gccversion='$gccversion', gccosandvers='$gccosandvers'
  55.     intsize=$intsize, longsize=$longsize, ptrsize=$ptrsize, doublesize=$doublesize, byteorder=$byteorder
  56.     d_longlong=$d_longlong, longlongsize=$longlongsize, d_longdbl=$d_longdbl, longdblsize=$longdblsize
  57.     ivtype='$ivtype', ivsize=$ivsize, nvtype='$nvtype', nvsize=$nvsize, Off_t='$lseektype', lseeksize=$lseeksize
  58.     alignbytes=$alignbytes, prototype=$prototype
  59.   Linker and Libraries:
  60.     ld='$ld', ldflags ='$ldflags'
  61.     libpth=$libpth
  62.     libs=$libs
  63.     perllibs=$perllibs
  64.     libc=$libc, so=$so, useshrplib=$useshrplib, libperl=$libperl
  65.     gnulibc_version='$gnulibc_version'
  66.   Dynamic Linking:
  67.     dlsrc=$dlsrc, dlext=$dlext, d_dlsymun=$d_dlsymun, ccdlflags='$ccdlflags'
  68.     cccdlflags='$cccdlflags', lddlflags='$lddlflags'
  69.  
  70. !END!
  71. my $summary_expanded;
  72.  
  73. sub myconfig {
  74.     return $summary_expanded if $summary_expanded;
  75.     ($summary_expanded = $summary) =~ s{\$(\w+)}
  76.          { my $c = $Config{$1}; defined($c) ? $c : 'undef' }ge;
  77.     $summary_expanded;
  78. }
  79.  
  80. our $Config_SH : unique = <<'!END!';
  81. archlibexp='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\lib'
  82. archname='MSWin32-x86-multi-thread'
  83. cc='cl'
  84. ccflags='-nologo -Gf -W3 -MD -Zi -DNDEBUG -O1 -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT  -DNO_HASH_SEED -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -DPERL_MSVCRT_READFIX'
  85. cppflags='-DWIN32'
  86. dlsrc='dl_win32.xs'
  87. dynamic_ext='Storable Encode XS/Typemap MIME/Base64 IO B/C Devel/Peek Time/HiRes Opcode attrs PerlIO/scalar ByteLoader Unicode/Normalize re B XS/APItest Encode/Unicode SDBM_File PerlIO/via PerlIO/encoding Fcntl Sys/Hostname Digest/MD5 Devel/PPPort POSIX Filter/Util/Call Socket threads/shared Data/Dumper threads List/Util File/Glob Devel/DProf Cwd'
  88. installarchlib='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\lib'
  89. installprivlib='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\lib'
  90. libpth='C:\PROGRA~1\MICROS~3\VC98\lib'
  91. libs='  oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib  comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib  netapi32.lib uuid.lib wsock32.lib mpr.lib winmm.lib  version.lib odbc32.lib odbccp32.lib msvcrt.lib'
  92. osname='MSWin32'
  93. osvers='4.0'
  94. prefix='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------'
  95. privlibexp='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\lib'
  96. sharpbang='#!'
  97. shsharp='true'
  98. so='dll'
  99. startsh='#!/bin/sh'
  100. static_ext=' '
  101. Author=''
  102. CONFIG='true'
  103. Date='$Date'
  104. Header=''
  105. Id='$Id'
  106. Locker=''
  107. Log='$Log'
  108. PATCHLEVEL='8'
  109. PERL_API_REVISION='5'
  110. PERL_API_SUBVERSION='0'
  111. PERL_API_VERSION='8'
  112. PERL_CONFIG_SH='true'
  113. PERL_PATCHLEVEL='8'
  114. PERL_REVISION='5'
  115. PERL_SUBVERSION='4'
  116. PERL_VERSION='8'
  117. RCSfile='$RCSfile'
  118. Revision='$Revision'
  119. SUBVERSION='4'
  120. Source=''
  121. State=''
  122. _a='.lib'
  123. _exe='.exe'
  124. _o='.obj'
  125. afs='false'
  126. afsroot='/afs'
  127. alignbytes='8'
  128. ansi2knr=''
  129. aphostname=''
  130. api_revision='5'
  131. api_subversion='0'
  132. api_version='8'
  133. api_versionstring='5.8.0'
  134. ar='lib'
  135. archlib='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\lib'
  136. archname64=''
  137. archobjs=''
  138. asctime_r_proto='0'
  139. awk='awk'
  140. baserev='5'
  141. bash=''
  142. bin='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\bin'
  143. binexp='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\bin'
  144. bison=''
  145. byacc='byacc'
  146. byteorder='1234'
  147. c=''
  148. castflags='0'
  149. cat='type'
  150. cccdlflags=' '
  151. ccdlflags=' '
  152. ccflags_uselargefiles=''
  153. ccname=''
  154. ccsymbols=''
  155. ccversion=''
  156. cf_by='jand'
  157. cf_email='support@ActiveState.com'
  158. cf_time='Tue Jun  1 11:52:09 2004'
  159. charsize='1'
  160. chgrp=''
  161. chmod=''
  162. chown=''
  163. clocktype='clock_t'
  164. comm=''
  165. compress=''
  166. contains='grep'
  167. cp='copy'
  168. cpio=''
  169. cpp='cl -nologo -E'
  170. cpp_stuff='42'
  171. cppccsymbols=''
  172. cpplast=''
  173. cppminus=''
  174. cpprun='cl -nologo -E'
  175. cppstdin='cppstdin'
  176. cppsymbols=''
  177. crypt_r_proto='0'
  178. cryptlib=''
  179. csh='undef'
  180. ctermid_r_proto='0'
  181. ctime_r_proto='0'
  182. d_Gconvert='sprintf((b),"%.*g",(n),(x))'
  183. d_PRIEUldbl='undef'
  184. d_PRIFUldbl='undef'
  185. d_PRIGUldbl='undef'
  186. d_PRIXU64='undef'
  187. d_PRId64='undef'
  188. d_PRIeldbl='undef'
  189. d_PRIfldbl='undef'
  190. d_PRIgldbl='undef'
  191. d_PRIi64='undef'
  192. d_PRIo64='undef'
  193. d_PRIu64='undef'
  194. d_PRIx64='undef'
  195. d_SCNfldbl='undef'
  196. d__fwalk='undef'
  197. d_access='define'
  198. d_accessx='undef'
  199. d_aintl='undef'
  200. d_alarm='define'
  201. d_archlib='define'
  202. d_asctime_r='undef'
  203. d_atolf='undef'
  204. d_atoll='undef'
  205. d_attribut='undef'
  206. d_bcmp='undef'
  207. d_bcopy='undef'
  208. d_bsd='define'
  209. d_bsdgetpgrp='undef'
  210. d_bsdsetpgrp='undef'
  211. d_bzero='undef'
  212. d_casti32='undef'
  213. d_castneg='define'
  214. d_charvspr='undef'
  215. d_chown='undef'
  216. d_chroot='undef'
  217. d_chsize='define'
  218. d_class='undef'
  219. d_closedir='define'
  220. d_cmsghdr_s='undef'
  221. d_const='define'
  222. d_copysignl='undef'
  223. d_crypt='define'
  224. d_crypt_r='undef'
  225. d_csh='undef'
  226. d_ctermid_r='undef'
  227. d_ctime_r='undef'
  228. d_cuserid='undef'
  229. d_dbl_dig='define'
  230. d_dbminitproto='undef'
  231. d_difftime='define'
  232. d_dirfd='undef'
  233. d_dirnamlen='define'
  234. d_dlerror='define'
  235. d_dlopen='define'
  236. d_dlsymun='undef'
  237. d_dosuid='undef'
  238. d_drand48_r='undef'
  239. d_drand48proto='undef'
  240. d_dup2='define'
  241. d_eaccess='undef'
  242. d_endgrent='undef'
  243. d_endgrent_r='undef'
  244. d_endhent='undef'
  245. d_endhostent_r='undef'
  246. d_endnent='undef'
  247. d_endnetent_r='undef'
  248. d_endpent='undef'
  249. d_endprotoent_r='undef'
  250. d_endpwent='undef'
  251. d_endpwent_r='undef'
  252. d_endsent='undef'
  253. d_endservent_r='undef'
  254. d_eofnblk='define'
  255. d_eunice='undef'
  256. d_faststdio='define'
  257. d_fchdir='undef'
  258. d_fchmod='undef'
  259. d_fchown='undef'
  260. d_fcntl='undef'
  261. d_fcntl_can_lock='undef'
  262. d_fd_macros='define'
  263. d_fd_set='define'
  264. d_fds_bits='define'
  265. d_fgetpos='define'
  266. d_finite='undef'
  267. d_finitel='undef'
  268. d_flexfnam='define'
  269. d_flock='define'
  270. d_flockproto='define'
  271. d_fork='undef'
  272. d_fp_class='undef'
  273. d_fpathconf='undef'
  274. d_fpclass='undef'
  275. d_fpclassify='undef'
  276. d_fpclassl='undef'
  277. d_fpos64_t='undef'
  278. d_frexpl='undef'
  279. d_fs_data_s='undef'
  280. d_fseeko='undef'
  281. d_fsetpos='define'
  282. d_fstatfs='undef'
  283. d_fstatvfs='undef'
  284. d_fsync='undef'
  285. d_ftello='undef'
  286. d_ftime='define'
  287. d_getcwd='define'
  288. d_getespwnam='undef'
  289. d_getfsstat='undef'
  290. d_getgrent='undef'
  291. d_getgrent_r='undef'
  292. d_getgrgid_r='undef'
  293. d_getgrnam_r='undef'
  294. d_getgrps='undef'
  295. d_gethbyaddr='define'
  296. d_gethbyname='define'
  297. d_gethent='undef'
  298. d_gethname='define'
  299. d_gethostbyaddr_r='undef'
  300. d_gethostbyname_r='undef'
  301. d_gethostent_r='undef'
  302. d_gethostprotos='define'
  303. d_getitimer='undef'
  304. d_getlogin='define'
  305. d_getlogin_r='undef'
  306. d_getmnt='undef'
  307. d_getmntent='undef'
  308. d_getnbyaddr='undef'
  309. d_getnbyname='undef'
  310. d_getnent='undef'
  311. d_getnetbyaddr_r='undef'
  312. d_getnetbyname_r='undef'
  313. d_getnetent_r='undef'
  314. d_getnetprotos='undef'
  315. d_getpagsz='undef'
  316. d_getpbyname='define'
  317. d_getpbynumber='define'
  318. d_getpent='undef'
  319. d_getpgid='undef'
  320. d_getpgrp2='undef'
  321. d_getpgrp='undef'
  322. d_getppid='undef'
  323. d_getprior='undef'
  324. d_getprotobyname_r='undef'
  325. d_getprotobynumber_r='undef'
  326. d_getprotoent_r='undef'
  327. d_getprotoprotos='define'
  328. d_getprpwnam='undef'
  329. d_getpwent='undef'
  330. d_getpwent_r='undef'
  331. d_getpwnam_r='undef'
  332. d_getpwuid_r='undef'
  333. d_getsbyname='define'
  334. d_getsbyport='define'
  335. d_getsent='undef'
  336. d_getservbyname_r='undef'
  337. d_getservbyport_r='undef'
  338. d_getservent_r='undef'
  339. d_getservprotos='define'
  340. d_getspnam='undef'
  341. d_getspnam_r='undef'
  342. d_gettimeod='define'
  343. d_gmtime_r='undef'
  344. d_gnulibc='undef'
  345. d_grpasswd='undef'
  346. d_hasmntopt='undef'
  347. d_htonl='define'
  348. d_ilogbl='undef'
  349. d_index='undef'
  350. d_inetaton='undef'
  351. d_int64_t='undef'
  352. d_isascii='define'
  353. d_isfinite='undef'
  354. d_isinf='undef'
  355. d_isnan='define'
  356. d_isnanl='undef'
  357. d_killpg='undef'
  358. d_lchown='undef'
  359. d_ldbl_dig='define'
  360. d_link='define'
  361. d_localtime_r='undef'
  362. d_locconv='define'
  363. d_lockf='undef'
  364. d_longdbl='define'
  365. d_longlong='undef'
  366. d_lseekproto='define'
  367. d_lstat='undef'
  368. d_madvise='undef'
  369. d_mblen='define'
  370. d_mbstowcs='define'
  371. d_mbtowc='define'
  372. d_memchr='define'
  373. d_memcmp='define'
  374. d_memcpy='define'
  375. d_memmove='define'
  376. d_memset='define'
  377. d_mkdir='define'
  378. d_mkdtemp='undef'
  379. d_mkfifo='undef'
  380. d_mkstemp='undef'
  381. d_mkstemps='undef'
  382. d_mktime='define'
  383. d_mmap='undef'
  384. d_modfl='undef'
  385. d_modfl_pow32_bug='undef'
  386. d_mprotect='undef'
  387. d_msg='undef'
  388. d_msg_ctrunc='undef'
  389. d_msg_dontroute='undef'
  390. d_msg_oob='undef'
  391. d_msg_peek='undef'
  392. d_msg_proxy='undef'
  393. d_msgctl='undef'
  394. d_msgget='undef'
  395. d_msghdr_s='undef'
  396. d_msgrcv='undef'
  397. d_msgsnd='undef'
  398. d_msync='undef'
  399. d_munmap='undef'
  400. d_mymalloc='undef'
  401. d_nice='undef'
  402. d_nl_langinfo='undef'
  403. d_nv_preserves_uv='define'
  404. d_off64_t='undef'
  405. d_old_pthread_create_joinable='undef'
  406. d_oldpthreads='undef'
  407. d_oldsock='undef'
  408. d_open3='undef'
  409. d_pathconf='undef'
  410. d_pause='define'
  411. d_perl_otherlibdirs='undef'
  412. d_phostname='undef'
  413. d_pipe='define'
  414. d_poll='undef'
  415. d_portable='define'
  416. d_procselfexe='undef'
  417. d_pthread_atfork='undef'
  418. d_pthread_attr_setscope='undef'
  419. d_pthread_yield='undef'
  420. d_pwage='undef'
  421. d_pwchange='undef'
  422. d_pwclass='undef'
  423. d_pwcomment='undef'
  424. d_pwexpire='undef'
  425. d_pwgecos='undef'
  426. d_pwpasswd='undef'
  427. d_pwquota='undef'
  428. d_qgcvt='undef'
  429. d_quad='undef'
  430. d_random_r='undef'
  431. d_readdir64_r='undef'
  432. d_readdir='define'
  433. d_readdir_r='undef'
  434. d_readlink='undef'
  435. d_readv='undef'
  436. d_recvmsg='undef'
  437. d_rename='define'
  438. d_rewinddir='define'
  439. d_rmdir='define'
  440. d_safebcpy='undef'
  441. d_safemcpy='undef'
  442. d_sanemcmp='define'
  443. d_sbrkproto='undef'
  444. d_scalbnl='undef'
  445. d_sched_yield='undef'
  446. d_scm_rights='undef'
  447. d_seekdir='define'
  448. d_select='define'
  449. d_sem='undef'
  450. d_semctl='undef'
  451. d_semctl_semid_ds='undef'
  452. d_semctl_semun='undef'
  453. d_semget='undef'
  454. d_semop='undef'
  455. d_sendmsg='undef'
  456. d_setegid='undef'
  457. d_seteuid='undef'
  458. d_setgrent='undef'
  459. d_setgrent_r='undef'
  460. d_setgrps='undef'
  461. d_sethent='undef'
  462. d_sethostent_r='undef'
  463. d_setitimer='undef'
  464. d_setlinebuf='undef'
  465. d_setlocale='define'
  466. d_setlocale_r='undef'
  467. d_setnent='undef'
  468. d_setnetent_r='undef'
  469. d_setpent='undef'
  470. d_setpgid='undef'
  471. d_setpgrp2='undef'
  472. d_setpgrp='undef'
  473. d_setprior='undef'
  474. d_setproctitle='undef'
  475. d_setprotoent_r='undef'
  476. d_setpwent='undef'
  477. d_setpwent_r='undef'
  478. d_setregid='undef'
  479. d_setresgid='undef'
  480. d_setresuid='undef'
  481. d_setreuid='undef'
  482. d_setrgid='undef'
  483. d_setruid='undef'
  484. d_setsent='undef'
  485. d_setservent_r='undef'
  486. d_setsid='undef'
  487. d_setvbuf='define'
  488. d_sfio='undef'
  489. d_shm='undef'
  490. d_shmat='undef'
  491. d_shmatprototype='undef'
  492. d_shmctl='undef'
  493. d_shmdt='undef'
  494. d_shmget='undef'
  495. d_sigaction='undef'
  496. d_sigprocmask='undef'
  497. d_sigsetjmp='undef'
  498. d_sockatmark='undef'
  499. d_sockatmarkproto='undef'
  500. d_socket='define'
  501. d_socklen_t='undef'
  502. d_sockpair='undef'
  503. d_socks5_init='undef'
  504. d_sqrtl='undef'
  505. d_srand48_r='undef'
  506. d_srandom_r='undef'
  507. d_sresgproto='undef'
  508. d_sresuproto='undef'
  509. d_statblks='undef'
  510. d_statfs_f_flags='undef'
  511. d_statfs_s='undef'
  512. d_statvfs='undef'
  513. d_stdio_cnt_lval='define'
  514. d_stdio_ptr_lval='define'
  515. d_stdio_ptr_lval_nochange_cnt='define'
  516. d_stdio_ptr_lval_sets_cnt='undef'
  517. d_stdio_stream_array='undef'
  518. d_stdiobase='define'
  519. d_stdstdio='define'
  520. d_strchr='define'
  521. d_strcoll='define'
  522. d_strctcpy='define'
  523. d_strerrm='strerror(e)'
  524. d_strerror='define'
  525. d_strerror_r='undef'
  526. d_strftime='define'
  527. d_strtod='define'
  528. d_strtol='define'
  529. d_strtold='undef'
  530. d_strtoll='undef'
  531. d_strtoq='undef'
  532. d_strtoul='define'
  533. d_strtoull='undef'
  534. d_strtouq='undef'
  535. d_strxfrm='define'
  536. d_suidsafe='undef'
  537. d_symlink='undef'
  538. d_syscall='undef'
  539. d_syscallproto='undef'
  540. d_sysconf='undef'
  541. d_sysernlst=''
  542. d_syserrlst='define'
  543. d_system='define'
  544. d_tcgetpgrp='undef'
  545. d_tcsetpgrp='undef'
  546. d_telldir='define'
  547. d_telldirproto='define'
  548. d_time='define'
  549. d_times='define'
  550. d_tm_tm_gmtoff='undef'
  551. d_tm_tm_zone='undef'
  552. d_tmpnam_r='undef'
  553. d_truncate='undef'
  554. d_ttyname_r='undef'
  555. d_tzname='define'
  556. d_u32align='undef'
  557. d_ualarm='undef'
  558. d_umask='define'
  559. d_uname='define'
  560. d_union_semun='define'
  561. d_unordered='undef'
  562. d_usleep='undef'
  563. d_usleepproto='undef'
  564. d_ustat='undef'
  565. d_vendorarch='undef'
  566. d_vendorbin='undef'
  567. d_vendorlib='undef'
  568. d_vfork='undef'
  569. d_void_closedir='undef'
  570. d_voidsig='define'
  571. d_voidtty=''
  572. d_volatile='define'
  573. d_vprintf='define'
  574. d_wait4='undef'
  575. d_waitpid='define'
  576. d_wcstombs='define'
  577. d_wctomb='define'
  578. d_writev='undef'
  579. d_xenix='undef'
  580. date='date'
  581. db_hashtype='int'
  582. db_prefixtype='int'
  583. db_version_major='0'
  584. db_version_minor='0'
  585. db_version_patch='0'
  586. defvoidused='15'
  587. direntrytype='struct direct'
  588. dlext='dll'
  589. doublesize='8'
  590. drand01='(rand()/(double)((unsigned)1<<RANDBITS))'
  591. drand48_r_proto='0'
  592. eagain='EAGAIN'
  593. ebcdic='undef'
  594. echo='echo'
  595. egrep='egrep'
  596. emacs=''
  597. endgrent_r_proto='0'
  598. endhostent_r_proto='0'
  599. endnetent_r_proto='0'
  600. endprotoent_r_proto='0'
  601. endpwent_r_proto='0'
  602. endservent_r_proto='0'
  603. eunicefix=':'
  604. exe_ext='.exe'
  605. expr='expr'
  606. extensions='Storable Encode XS/Typemap MIME/Base64 IO B/C Devel/Peek Time/HiRes Opcode attrs PerlIO/scalar ByteLoader Unicode/Normalize re B XS/APItest Encode/Unicode SDBM_File PerlIO/via PerlIO/encoding Fcntl Sys/Hostname Digest/MD5 Devel/PPPort POSIX Filter/Util/Call Socket threads/shared Data/Dumper threads List/Util File/Glob Devel/DProf Cwd'
  607. extras=''
  608. fflushNULL='define'
  609. fflushall='undef'
  610. find='find'
  611. firstmakefile='makefile'
  612. flex=''
  613. fpossize='8'
  614. fpostype='fpos_t'
  615. freetype='void'
  616. full_ar=''
  617. full_csh=''
  618. full_sed=''
  619. gccosandvers=''
  620. gccversion=''
  621. getgrent_r_proto='0'
  622. getgrgid_r_proto='0'
  623. getgrnam_r_proto='0'
  624. gethostbyaddr_r_proto='0'
  625. gethostbyname_r_proto='0'
  626. gethostent_r_proto='0'
  627. getlogin_r_proto='0'
  628. getnetbyaddr_r_proto='0'
  629. getnetbyname_r_proto='0'
  630. getnetent_r_proto='0'
  631. getprotobyname_r_proto='0'
  632. getprotobynumber_r_proto='0'
  633. getprotoent_r_proto='0'
  634. getpwent_r_proto='0'
  635. getpwnam_r_proto='0'
  636. getpwuid_r_proto='0'
  637. getservbyname_r_proto='0'
  638. getservbyport_r_proto='0'
  639. getservent_r_proto='0'
  640. getspnam_r_proto='0'
  641. gidformat='"ld"'
  642. gidsign='-1'
  643. gidsize='4'
  644. gidtype='gid_t'
  645. glibpth='/usr/shlib  /lib/pa1.1 /usr/lib/large /lib /usr/lib /usr/lib/386 /lib/386 /lib/large /usr/lib/small /lib/small /usr/ccs/lib /usr/ucblib /usr/shlib '
  646. gmake='gmake'
  647. gmtime_r_proto='0'
  648. grep='grep'
  649. groupcat=''
  650. groupstype='gid_t'
  651. gzip='gzip'
  652. h_fcntl='false'
  653. h_sysfile='true'
  654. hint='recommended'
  655. hostcat='ypcat hosts'
  656. i16size='2'
  657. i16type='short'
  658. i32size='4'
  659. i32type='long'
  660. i64size='8'
  661. i64type='__int64'
  662. i8size='1'
  663. i8type='char'
  664. i_arpainet='define'
  665. i_bsdioctl=''
  666. i_crypt='undef'
  667. i_db='undef'
  668. i_dbm='undef'
  669. i_dirent='define'
  670. i_dld='undef'
  671. i_dlfcn='define'
  672. i_fcntl='define'
  673. i_float='define'
  674. i_fp='undef'
  675. i_fp_class='undef'
  676. i_gdbm='undef'
  677. i_grp='undef'
  678. i_ieeefp='undef'
  679. i_inttypes='undef'
  680. i_langinfo='undef'
  681. i_libutil='undef'
  682. i_limits='define'
  683. i_locale='define'
  684. i_machcthr='undef'
  685. i_malloc='define'
  686. i_math='define'
  687. i_memory='undef'
  688. i_mntent='undef'
  689. i_ndbm='undef'
  690. i_netdb='undef'
  691. i_neterrno='undef'
  692. i_netinettcp='undef'
  693. i_niin='undef'
  694. i_poll='undef'
  695. i_prot='undef'
  696. i_pthread='undef'
  697. i_pwd='undef'
  698. i_rpcsvcdbm='define'
  699. i_sfio='undef'
  700. i_sgtty='undef'
  701. i_shadow='undef'
  702. i_socks='undef'
  703. i_stdarg='define'
  704. i_stddef='define'
  705. i_stdlib='define'
  706. i_string='define'
  707. i_sunmath='undef'
  708. i_sysaccess='undef'
  709. i_sysdir='undef'
  710. i_sysfile='undef'
  711. i_sysfilio='define'
  712. i_sysin='undef'
  713. i_sysioctl='undef'
  714. i_syslog='undef'
  715. i_sysmman='undef'
  716. i_sysmode='undef'
  717. i_sysmount='undef'
  718. i_sysndir='undef'
  719. i_sysparam='undef'
  720. i_sysresrc='undef'
  721. i_syssecrt='undef'
  722. i_sysselct='undef'
  723. i_syssockio='undef'
  724. i_sysstat='define'
  725. i_sysstatfs='undef'
  726. i_sysstatvfs='undef'
  727. i_systime='undef'
  728. i_systimek='undef'
  729. i_systimes='undef'
  730. i_systypes='define'
  731. i_sysuio='undef'
  732. i_sysun='undef'
  733. i_sysutsname='undef'
  734. i_sysvfs='undef'
  735. i_syswait='undef'
  736. i_termio='undef'
  737. i_termios='undef'
  738. i_time='define'
  739. i_unistd='undef'
  740. i_ustat='undef'
  741. i_utime='define'
  742. i_values='undef'
  743. i_varargs='undef'
  744. i_varhdr='varargs.h'
  745. i_vfork='undef'
  746. ignore_versioned_solibs=''
  747. inc_version_list=''
  748. inc_version_list_init='0'
  749. incpath='C:\PROGRA~1\MICROS~3\VC98\include'
  750. inews=''
  751. installbin='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\bin'
  752. installhtmldir='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\html'
  753. installhtmlhelpdir='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\htmlhelp'
  754. installman1dir='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\man\man1'
  755. installman3dir='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\man\man3'
  756. installprefix='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------'
  757. installprefixexp='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------'
  758. installscript='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\bin'
  759. installsitearch='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\site\lib'
  760. installsitebin='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\bin'
  761. installsitelib='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\site\lib'
  762. installstyle='lib'
  763. installusrbinperl='undef'
  764. installvendorarch=''
  765. installvendorbin=''
  766. installvendorlib=''
  767. intsize='4'
  768. issymlink=''
  769. ivdformat='"ld"'
  770. ivsize='4'
  771. ivtype='long'
  772. known_extensions='B B/C ByteLoader Cwd Data/Dumper Devel/DProf Devel/PPPort Devel/Peek Digest/MD5 Encode Encode/Byte Encode/CN Encode/EBCDIC Encode/JP Encode/KR Encode/Symbol Encode/TW Encode/Unicode Errno Fcntl File/Glob Filter/Util/Call IO List/Util MIME/Base64 Opcode POSIX PerlIO/encoding PerlIO/scalar PerlIO/via SDBM_File Socket Storable Sys/Hostname Thread Time/HiRes Unicode/Normalize XS/APItest XS/Typemap attrs re threads threads/shared'
  773. ksh=''
  774. ld='link'
  775. lddlflags='-dll -nologo -nodefaultlib -debug -opt:ref,icf  -libpath:"C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\lib\CORE"  -machine:x86'
  776. ldflags='-nologo -nodefaultlib -debug -opt:ref,icf  -libpath:"C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\lib\CORE"  -machine:x86'
  777. ldflags_uselargefiles=''
  778. ldlibpthname=''
  779. less='less'
  780. lib_ext='.lib'
  781. libc='msvcrt.lib'
  782. libperl='perl58.lib'
  783. libsdirs=''
  784. libsfiles=''
  785. libsfound=''
  786. libspath=''
  787. libswanted='net socket inet nsl nm ndbm gdbm dbm db malloc dl dld ld sun m c cposix posix ndir dir crypt ucb bsd BSD PW x'
  788. line='line'
  789. lint=''
  790. lkflags=''
  791. ln=''
  792. lns='copy'
  793. localtime_r_proto='0'
  794. locincpth='/usr/local/include /opt/local/include /usr/gnu/include /opt/gnu/include /usr/GNU/include /opt/GNU/include'
  795. loclibpth='/usr/local/lib /opt/local/lib /usr/gnu/lib /opt/gnu/lib /usr/GNU/lib /opt/GNU/lib'
  796. longdblsize='10'
  797. longlongsize='8'
  798. longsize='4'
  799. lp=''
  800. lpr=''
  801. ls='dir'
  802. lseeksize='8'
  803. lseektype='__int64'
  804. mail=''
  805. mailx=''
  806. make='nmake'
  807. make_set_make='#'
  808. mallocobj='malloc.o'
  809. mallocsrc='malloc.c'
  810. malloctype='void *'
  811. man1dir='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\man\man1'
  812. man1direxp='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\man\man1'
  813. man1ext='1'
  814. man3dir='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\man\man3'
  815. man3direxp='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\man\man3'
  816. man3ext='3'
  817. mips_type=''
  818. mkdir='mkdir'
  819. mmaptype='void *'
  820. modetype='mode_t'
  821. more='more /e'
  822. multiarch='undef'
  823. mv=''
  824. myarchname='MSWin32'
  825. mydomain=''
  826. myhostname=''
  827. myuname=''
  828. n='-n'
  829. need_va_copy='undef'
  830. netdb_hlen_type='int'
  831. netdb_host_type='char *'
  832. netdb_name_type='char *'
  833. netdb_net_type='long'
  834. nm=''
  835. nm_opt=''
  836. nm_so_opt=''
  837. nonxs_ext='Encode/TW Encode/Byte Errno Encode/KR Encode/EBCDIC Encode/JP Encode/Symbol Encode/CN'
  838. nroff=''
  839. nvEUformat='"E"'
  840. nvFUformat='"F"'
  841. nvGUformat='"G"'
  842. nv_preserves_uv_bits='32'
  843. nveformat='"e"'
  844. nvfformat='"f"'
  845. nvgformat='"g"'
  846. nvsize='8'
  847. nvtype='double'
  848. o_nonblock='O_NONBLOCK'
  849. obj_ext='.obj'
  850. old_pthread_create_joinable=''
  851. optimize='-MD -Zi -DNDEBUG -O1'
  852. orderlib='false'
  853. otherlibdirs=''
  854. package='perl5'
  855. pager='more /e'
  856. passcat=''
  857. patchlevel=''
  858. path_sep=';'
  859. perl5=''
  860. perl='perl'
  861. perladmin=''
  862. perllibs='  oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib  comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib  netapi32.lib uuid.lib wsock32.lib mpr.lib winmm.lib  version.lib odbc32.lib odbccp32.lib msvcrt.lib'
  863. perlpath='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\bin\perl.exe'
  864. pg=''
  865. phostname='hostname'
  866. pidtype='int'
  867. plibpth=''
  868. pmake=''
  869. pr=''
  870. prefixexp='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------'
  871. privlib='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\lib'
  872. procselfexe=''
  873. prototype='define'
  874. ptrsize='4'
  875. quadkind='5'
  876. quadtype='__int64'
  877. randbits='15'
  878. randfunc='rand'
  879. random_r_proto='0'
  880. randseedtype='unsigned'
  881. ranlib='rem'
  882. rd_nodata='-1'
  883. readdir64_r_proto='0'
  884. readdir_r_proto='0'
  885. revision='5'
  886. rm='del'
  887. rmail=''
  888. runnm='true'
  889. sPRIEUldbl='"E"'
  890. sPRIFUldbl='"F"'
  891. sPRIGUldbl='"G"'
  892. sPRIXU64='"lX"'
  893. sPRId64='"ld"'
  894. sPRIeldbl='"e"'
  895. sPRIfldbl='"f"'
  896. sPRIgldbl='"g"'
  897. sPRIi64='"li"'
  898. sPRIo64='"lo"'
  899. sPRIu64='"lu"'
  900. sPRIx64='"lx"'
  901. sSCNfldbl='"f"'
  902. sched_yield=''
  903. scriptdir='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\bin'
  904. scriptdirexp='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\bin'
  905. sed='sed'
  906. seedfunc='srand'
  907. selectminbits='32'
  908. selecttype='Perl_fd_set *'
  909. sendmail='blat'
  910. setgrent_r_proto='0'
  911. sethostent_r_proto='0'
  912. setlocale_r_proto='0'
  913. setnetent_r_proto='0'
  914. setprotoent_r_proto='0'
  915. setpwent_r_proto='0'
  916. setservent_r_proto='0'
  917. sh='cmd /x /c'
  918. shar=''
  919. shmattype='void *'
  920. shortsize='2'
  921. shrpenv=''
  922. sig_count='26'
  923. sig_name='ZERO HUP INT QUIT ILL NUM05 NUM06 NUM07 FPE KILL NUM10 SEGV NUM12 PIPE ALRM TERM NUM16 NUM17 NUM18 NUM19 CHLD BREAK ABRT STOP NUM24 CONT CLD'
  924. sig_name_init='"ZERO", "HUP", "INT", "QUIT", "ILL", "NUM05", "NUM06", "NUM07", "FPE", "KILL", "NUM10", "SEGV", "NUM12", "PIPE", "ALRM", "TERM", "NUM16", "NUM17", "NUM18", "NUM19", "CHLD", "BREAK", "ABRT", "STOP", "NUM24", "CONT", "CLD", 0'
  925. sig_num='0 1 2 21 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 20'
  926. sig_num_init='0, 1, 2, 21, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 20, 0'
  927. sig_size='27'
  928. signal_t='void'
  929. sitearch='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\site\lib'
  930. sitearchexp='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\site\lib'
  931. sitebin='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\site\bin'
  932. sitebinexp='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\site\bin'
  933. sitelib='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\site\lib'
  934. sitelib_stem=''
  935. sitelibexp='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\site\lib'
  936. siteprefix='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\site'
  937. siteprefixexp='C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\site'
  938. sizesize='4'
  939. sizetype='size_t'
  940. sleep=''
  941. smail=''
  942. sockethdr=''
  943. socketlib=''
  944. socksizetype='int'
  945. sort='sort'
  946. spackage='Perl5'
  947. spitshell=''
  948. srand48_r_proto='0'
  949. srandom_r_proto='0'
  950. src=''
  951. ssizetype='int'
  952. startperl='#!perl'
  953. stdchar='char'
  954. stdio_base='((fp)->_base)'
  955. stdio_bufsiz='((fp)->_cnt + (fp)->_ptr - (fp)->_base)'
  956. stdio_cnt='((fp)->_cnt)'
  957. stdio_filbuf=''
  958. stdio_ptr='((fp)->_ptr)'
  959. stdio_stream_array=''
  960. strerror_r_proto='0'
  961. strings='/usr/include/string.h'
  962. submit=''
  963. subversion=''
  964. sysman='/usr/man/man1'
  965. tail=''
  966. tar=''
  967. targetarch=''
  968. tbl=''
  969. tee=''
  970. test=''
  971. timeincl='/usr/include/sys/time.h '
  972. timetype='time_t'
  973. tmpnam_r_proto='0'
  974. touch='touch'
  975. tr=''
  976. trnl='\012'
  977. troff=''
  978. ttyname_r_proto='0'
  979. u16size='2'
  980. u16type='unsigned short'
  981. u32size='4'
  982. u32type='unsigned long'
  983. u64size='8'
  984. u64type='unsigned __int64'
  985. u8size='1'
  986. u8type='unsigned char'
  987. uidformat='"ld"'
  988. uidsign='-1'
  989. uidsize='4'
  990. uidtype='uid_t'
  991. uname='uname'
  992. uniq='uniq'
  993. uquadtype='unsigned __int64'
  994. use5005threads='undef'
  995. use64bitall='undef'
  996. use64bitint='undef'
  997. usecrosscompile='undef'
  998. usedl='define'
  999. usefaststdio='define'
  1000. useithreads='define'
  1001. uselargefiles='define'
  1002. uselongdouble='undef'
  1003. usemorebits='undef'
  1004. usemultiplicity='define'
  1005. usemymalloc='n'
  1006. usenm='false'
  1007. useopcode='true'
  1008. useperlio='define'
  1009. useposix='true'
  1010. usereentrant='undef'
  1011. usesfio='false'
  1012. useshrplib='yes'
  1013. usesocks='undef'
  1014. usethreads='undef'
  1015. usevendorprefix='undef'
  1016. usevfork='false'
  1017. usrinc='/usr/include'
  1018. uuname=''
  1019. uvXUformat='"lX"'
  1020. uvoformat='"lo"'
  1021. uvsize='4'
  1022. uvtype='unsigned long'
  1023. uvuformat='"lu"'
  1024. uvxformat='"lx"'
  1025. vendorarch=''
  1026. vendorarchexp=''
  1027. vendorbin=''
  1028. vendorbinexp=''
  1029. vendorlib=''
  1030. vendorlib_stem=''
  1031. vendorlibexp=''
  1032. vendorprefix=''
  1033. vendorprefixexp=''
  1034. version='5.8.4'
  1035. version_patchlevel_string='version 8 subversion 4'
  1036. versiononly='undef'
  1037. vi=''
  1038. voidflags='15'
  1039. xlibpth='/usr/lib/386 /lib/386'
  1040. zcat=''
  1041. zip='zip'
  1042. !END!
  1043.  
  1044. # Search for it in the big string 
  1045. sub fetch_string {
  1046.     my($self, $key) = @_;
  1047.  
  1048.     my $quote_type = "'";
  1049.     my $marker = "$key=";
  1050.  
  1051.     # Check for the common case, ' delimited
  1052.     my $start = index($Config_SH, "\n$marker$quote_type");
  1053.     # If that failed, check for " delimited
  1054.     if ($start == -1) {
  1055.         $quote_type = '"';
  1056.         $start = index($Config_SH, "\n$marker$quote_type");
  1057.     }
  1058.     return undef if ( ($start == -1) &&  # in case it's first 
  1059.                       (substr($Config_SH, 0, length($marker)) ne $marker) );
  1060.     if ($start == -1) { 
  1061.         # It's the very first thing we found. Skip $start forward
  1062.         # and figure out the quote mark after the =.
  1063.         $start = length($marker) + 1;
  1064.         $quote_type = substr($Config_SH, $start - 1, 1);
  1065.     } 
  1066.     else { 
  1067.         $start += length($marker) + 2;
  1068.     }
  1069.  
  1070.     my $value = substr($Config_SH, $start, 
  1071.                        index($Config_SH, "$quote_type\n", $start) - $start);
  1072.  
  1073.     # If we had a double-quote, we'd better eval it so escape
  1074.     # sequences and such can be interpolated. Since the incoming
  1075.     # value is supposed to follow shell rules and not perl rules,
  1076.     # we escape any perl variable markers
  1077.     if ($quote_type eq '"') {
  1078.     $value =~ s/\$/\\\$/g;
  1079.     $value =~ s/\@/\\\@/g;
  1080.     eval "\$value = \"$value\"";
  1081.     }
  1082.  
  1083.     # So we can say "if $Config{'foo'}".
  1084.     $value = undef if $value eq 'undef';
  1085.     $self->{$key} = $value; # cache it
  1086. }
  1087.  
  1088. sub fetch_virtual {
  1089.     my($self, $key) = @_;
  1090.  
  1091.     my $value;
  1092.  
  1093.     if ($key =~ /^((?:cc|ld)flags|libs(?:wanted)?)_nolargefiles/) {
  1094.     # These are purely virtual, they do not exist, but need to
  1095.     # be computed on demand for largefile-incapable extensions.
  1096.     my $new_key = "${1}_uselargefiles";
  1097.     $value = $Config{$1};
  1098.     my $withlargefiles = $Config{$new_key};
  1099.     if ($new_key =~ /^(?:cc|ld)flags_/) {
  1100.         $value =~ s/\Q$withlargefiles\E\b//;
  1101.     } elsif ($new_key =~ /^libs/) {
  1102.         my @lflibswanted = split(' ', $Config{libswanted_uselargefiles});
  1103.         if (@lflibswanted) {
  1104.         my %lflibswanted;
  1105.         @lflibswanted{@lflibswanted} = ();
  1106.         if ($new_key =~ /^libs_/) {
  1107.             my @libs = grep { /^-l(.+)/ &&
  1108.                                       not exists $lflibswanted{$1} }
  1109.                             split(' ', $Config{libs});
  1110.             $Config{libs} = join(' ', @libs);
  1111.         } elsif ($new_key =~ /^libswanted_/) {
  1112.             my @libswanted = grep { not exists $lflibswanted{$_} }
  1113.                                   split(' ', $Config{libswanted});
  1114.             $Config{libswanted} = join(' ', @libswanted);
  1115.         }
  1116.         }
  1117.     }
  1118.     }
  1119.  
  1120.     $self->{$key} = $value;
  1121. }
  1122.  
  1123. sub FETCH { 
  1124.     my($self, $key) = @_;
  1125.  
  1126.     # check for cached value (which may be undef so we use exists not defined)
  1127.     return $self->{$key} if exists $self->{$key};
  1128.  
  1129.     $self->fetch_string($key);
  1130.     return $self->{$key} if exists $self->{$key};
  1131.     $self->fetch_virtual($key);
  1132.  
  1133.     # Might not exist, in which undef is correct.
  1134.     return $self->{$key};
  1135. }
  1136.  
  1137. my $prevpos = 0;
  1138.  
  1139. sub FIRSTKEY {
  1140.     $prevpos = 0;
  1141.     substr($Config_SH, 0, index($Config_SH, '=') );
  1142. }
  1143.  
  1144. sub NEXTKEY {
  1145.     # Find out how the current key's quoted so we can skip to its end.
  1146.     my $quote = substr($Config_SH, index($Config_SH, "=", $prevpos)+1, 1);
  1147.     my $pos = index($Config_SH, qq($quote\n), $prevpos) + 2;
  1148.     my $len = index($Config_SH, "=", $pos) - $pos;
  1149.     $prevpos = $pos;
  1150.     $len > 0 ? substr($Config_SH, $pos, $len) : undef;
  1151. }
  1152.  
  1153. sub EXISTS { 
  1154.     return 1 if exists($_[0]->{$_[1]});
  1155.  
  1156.     return(index($Config_SH, "\n$_[1]='") != -1 or
  1157.            substr($Config_SH, 0, length($_[1])+2) eq "$_[1]='" or
  1158.            index($Config_SH, "\n$_[1]=\"") != -1 or
  1159.            substr($Config_SH, 0, length($_[1])+2) eq "$_[1]=\"" or
  1160.            $_[1] =~ /^(?:(?:cc|ld)flags|libs(?:wanted)?)_nolargefiles$/
  1161.           );
  1162. }
  1163.  
  1164. sub STORE  { die "\%Config::Config is read-only\n" }
  1165. *DELETE = \&STORE;
  1166. *CLEAR  = \&STORE;
  1167.  
  1168.  
  1169. sub config_sh {
  1170.     $Config_SH
  1171. }
  1172.  
  1173. sub config_re {
  1174.     my $re = shift;
  1175.     return map { chomp; $_ } grep /^$re=/, split /^/, $Config_SH;
  1176. }
  1177.  
  1178. sub config_vars {
  1179.     foreach (@_) {
  1180.     if (/\W/) {
  1181.         my @matches = config_re($_);
  1182.         print map "$_\n", @matches ? @matches : "$_: not found";
  1183.     } else {
  1184.         my $v = (exists $Config{$_}) ? $Config{$_} : 'UNKNOWN';
  1185.         $v = 'undef' unless defined $v;
  1186.         print "$_='$v';\n";
  1187.     }
  1188.     }
  1189. }
  1190.  
  1191. sub TIEHASH {
  1192.     bless $_[1], $_[0];
  1193. }
  1194.  
  1195. # avoid Config..Exporter..UNIVERSAL search for DESTROY then AUTOLOAD
  1196. sub DESTROY { }
  1197.  
  1198. my $i = 0;
  1199. foreach my $c (4,3,2) { $i |= ord($c); $i <<= 8 }
  1200. $i |= ord(1);
  1201. my $value = join('', unpack('aaaa', pack('L!', $i)));
  1202.  
  1203.  
  1204. tie %Config, 'Config', {
  1205.     'archlibexp' => 'C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\lib',
  1206.     'archname' => 'MSWin32-x86-multi-thread',
  1207.     'cc' => 'cl',
  1208.     'ccflags' => '-nologo -Gf -W3 -MD -Zi -DNDEBUG -O1 -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT  -DNO_HASH_SEED -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -DPERL_MSVCRT_READFIX',
  1209.     'cppflags' => '-DWIN32',
  1210.     'dlsrc' => 'dl_win32.xs',
  1211.     'dynamic_ext' => 'Storable Encode XS/Typemap MIME/Base64 IO B/C Devel/Peek Time/HiRes Opcode attrs PerlIO/scalar ByteLoader Unicode/Normalize re B XS/APItest Encode/Unicode SDBM_File PerlIO/via PerlIO/encoding Fcntl Sys/Hostname Digest/MD5 Devel/PPPort POSIX Filter/Util/Call Socket threads/shared Data/Dumper threads List/Util File/Glob Devel/DProf Cwd',
  1212.     'installarchlib' => 'C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\lib',
  1213.     'installprivlib' => 'C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\lib',
  1214.     'libpth' => 'C:\PROGRA~1\MICROS~3\VC98\lib',
  1215.     'libs' => '  oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib  comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib  netapi32.lib uuid.lib wsock32.lib mpr.lib winmm.lib  version.lib odbc32.lib odbccp32.lib msvcrt.lib',
  1216.     'osname' => 'MSWin32',
  1217.     'osvers' => '4.0',
  1218.     'prefix' => 'C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------',
  1219.     'privlibexp' => 'C:\TEMP\perl--------------------------------please-run-the-install-script--------------------------------\lib',
  1220.     'sharpbang' => '#!',
  1221.     'shsharp' => 'true',
  1222.     'so' => 'dll',
  1223.     'startsh' => '#!/bin/sh',
  1224.     'static_ext' => ' ',
  1225.     byteorder => $value,
  1226.  
  1227. };
  1228.  
  1229. 1;
  1230.