home *** CD-ROM | disk | FTP | other *** search
/ Inter.Net 55-2 / Inter.Net 55-2.iso / Mandrake / mdkinst / usr / lib / perl5 / 5.00503 / i386-linux / Config.pm < prev    next >
Encoding:
Perl POD Document  |  2000-01-12  |  18.9 KB  |  761 lines

  1. package Config;
  2. use Exporter ();
  3. @ISA = (Exporter);
  4. @EXPORT = qw(%Config);
  5. @EXPORT_OK = qw(myconfig config_sh config_vars);
  6.  
  7. $] == 5.00503
  8.   or die "Perl lib version (5.00503) doesn't match executable version ($])";
  9.  
  10. # This file was created by configpm when Perl was built. Any changes
  11. # made to this file will be lost the next time perl is built.
  12.  
  13. ##
  14. ## This file was produced by running the Configure script. It holds all the
  15. ## definitions figured out by Configure. Should you modify one of these values,
  16. ## do not forget to propagate your changes by running "Configure -der". You may
  17. ## instead choose to run each of the .SH files by yourself, or "Configure -S".
  18. ##
  19. #
  20. ## Package name      : perl5
  21. ## Source directory  : .
  22. ## Configuration time: Fri Dec 17 17:15:45 CET 1999
  23. ## Configured by     : root
  24. ## Target system     : linux jedi.mandrakesoft.com 2.2.14-1mdksmp #1 smp thu dec 2 01:02:03 cet 1999 i686 unknown 
  25. #
  26. ## Configure command line arguments.
  27.  
  28. my $config_sh = <<'!END!';
  29. archlibexp='/usr/lib/perl5/5.00503/i386-linux'
  30. archname='i386-linux'
  31. cc='cc'
  32. ccflags='-Dbool=char -DHAS_BOOL -I/usr/local/include'
  33. cppflags='-Dbool=char -DHAS_BOOL -I/usr/local/include'
  34. dlsrc='dl_dlopen.xs'
  35. dynamic_ext='B DB_File Data/Dumper Fcntl GDBM_File IO IPC/SysV NDBM_File Opcode POSIX SDBM_File Socket attrs re'
  36. extensions='B DB_File Data/Dumper Fcntl GDBM_File IO IPC/SysV NDBM_File Opcode POSIX SDBM_File Socket attrs re Errno'
  37. installarchlib='/usr/lib/perl5/5.00503/i386-linux'
  38. installprivlib='/usr/lib/perl5/5.00503'
  39. libpth='/usr/local/lib /lib /usr/lib'
  40. libs='-lnsl -ldl -lm -lc -lposix -lcrypt'
  41. osname='linux'
  42. osvers='2.2.14-1mdksmp'
  43. prefix='/usr'
  44. privlibexp='/usr/lib/perl5/5.00503'
  45. sharpbang='#!'
  46. shsharp='true'
  47. sig_name='ZERO HUP INT QUIT ILL TRAP ABRT BUS FPE KILL USR1 SEGV USR2 PIPE ALRM TERM STKFLT CHLD CONT STOP TSTP TTIN TTOU URG XCPU XFSZ VTALRM PROF WINCH IO PWR UNUSED RTMIN NUM33 NUM34 NUM35 NUM36 NUM37 NUM38 NUM39 NUM40 NUM41 NUM42 NUM43 NUM44 NUM45 NUM46 NUM47 NUM48 NUM49 NUM50 NUM51 NUM52 NUM53 NUM54 NUM55 NUM56 NUM57 NUM58 NUM59 NUM60 NUM61 NUM62 RTMAX IOT CLD POLL '
  48. sig_num='0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 6 17 29 '
  49. so='so'
  50. startsh='#!/bin/sh'
  51. static_ext=' '
  52. Author=''
  53. CONFIG='true'
  54. Date='$Date'
  55. Header=''
  56. Id='$Id'
  57. Locker=''
  58. Log='$Log'
  59. Mcc='Mcc'
  60. PATCHLEVEL='5'
  61. RCSfile='$RCSfile'
  62. Revision='$Revision'
  63. SUBVERSION='3'
  64. Source=''
  65. State=''
  66. _a='.a'
  67. _exe=''
  68. _o='.o'
  69. afs='false'
  70. alignbytes='4'
  71. ansi2knr=''
  72. aphostname=''
  73. apiversion='5.005'
  74. ar='ar'
  75. archlib='/usr/lib/perl5/5.00503/i386-linux'
  76. archobjs=''
  77. awk='awk'
  78. baserev='5.0'
  79. bash=''
  80. bin='/usr/bin'
  81. binexp='/usr/bin'
  82. bison=''
  83. byacc='byacc'
  84. byteorder='1234'
  85. c=''
  86. castflags='0'
  87. cat='cat'
  88. cccdlflags='-fpic'
  89. ccdlflags='-rdynamic'
  90. ccsymbols='__ELF__=1 __GNUC_MINOR__=95 __GNUC__=2 __i586=1 __i586__=1 __linux=1 __pentium=1 __pentium__=1 cpu=i386 i586=1 machine=i386 pentium=1 system=posix'
  91. cf_by='root'
  92. cf_email='root@jedi.mandrakesoft.com'
  93. cf_time='Fri Dec 17 17:15:45 CET 1999'
  94. chgrp=''
  95. chmod=''
  96. chown=''
  97. clocktype='clock_t'
  98. comm='comm'
  99. compress=''
  100. config_arg0='Configure'
  101. config_arg10='-Ud_csh'
  102. config_arg11='-Dman3dir=/usr/lib/perl5/man/man3'
  103. config_arg12='-Doptimize=-O3 -fomit-frame-pointer -fno-exceptions -fno-rtti -pipe -s -mpentium -mcpu=pentium -march=pentium -ffast-math -fexpensive-optimizations'
  104. config_arg1='-des'
  105. config_arg2='-Dprefix=/usr'
  106. config_arg3='-Dinstallprefix=/usr'
  107. config_arg4='-Darchname=i386-linux'
  108. config_arg5='-Dd_dosuid'
  109. config_arg6='-Dd_semctl_semun'
  110. config_arg7='-Di_db'
  111. config_arg8='-Di_ndbm'
  112. config_arg9='-Di_gdbm'
  113. config_argc='12'
  114. config_args='-des -Dprefix=/usr -Dinstallprefix=/usr -Darchname=i386-linux -Dd_dosuid -Dd_semctl_semun -Di_db -Di_ndbm -Di_gdbm -Ud_csh -Dman3dir=/usr/lib/perl5/man/man3 -Doptimize=-O3 -fomit-frame-pointer -fno-exceptions -fno-rtti -pipe -s -mpentium -mcpu=pentium -march=pentium -ffast-math -fexpensive-optimizations'
  115. contains='grep'
  116. cp='cp'
  117. cpio=''
  118. cpp='cpp'
  119. cpp_stuff='42'
  120. cppccsymbols='__i386=1 __i386__=1 __linux__=1 __unix=1 __unix__=1 i386=1 linux=1 unix=1'
  121. cpplast='-'
  122. cppminus='-'
  123. cpprun='cc -E'
  124. cppstdin='cc -E'
  125. cppsymbols='__STDC__=1'
  126. cryptlib=''
  127. csh='csh'
  128. d_Gconvert='gcvt((x),(n),(b))'
  129. d_access='define'
  130. d_alarm='define'
  131. d_archlib='define'
  132. d_attribut='define'
  133. d_bcmp='define'
  134. d_bcopy='define'
  135. d_bsd='undef'
  136. d_bsdgetpgrp='undef'
  137. d_bsdsetpgrp='undef'
  138. d_bzero='define'
  139. d_casti32='undef'
  140. d_castneg='define'
  141. d_charvspr='undef'
  142. d_chown='define'
  143. d_chroot='define'
  144. d_chsize='undef'
  145. d_closedir='define'
  146. d_const='define'
  147. d_crypt='define'
  148. d_csh='undef'
  149. d_cuserid='define'
  150. d_dbl_dig='define'
  151. d_difftime='define'
  152. d_dirnamlen='undef'
  153. d_dlerror='define'
  154. d_dlopen='define'
  155. d_dlsymun='undef'
  156. d_dosuid='define'
  157. d_dup2='define'
  158. d_endgrent='define'
  159. d_endhent='define'
  160. d_endnent='define'
  161. d_endpent='define'
  162. d_endpwent='define'
  163. d_endsent='define'
  164. d_eofnblk='define'
  165. d_eunice='undef'
  166. d_fchmod='define'
  167. d_fchown='define'
  168. d_fcntl='define'
  169. d_fd_macros='define'
  170. d_fd_set='define'
  171. d_fds_bits='undef'
  172. d_fgetpos='define'
  173. d_flexfnam='define'
  174. d_flock='define'
  175. d_fork='define'
  176. d_fpathconf='define'
  177. d_fsetpos='define'
  178. d_fstatfs='define'
  179. d_fstatvfs='define'
  180. d_ftime='undef'
  181. d_getgrent='define'
  182. d_getgrps='define'
  183. d_gethbyaddr='define'
  184. d_gethbyname='define'
  185. d_gethent='define'
  186. d_gethname='undef'
  187. d_gethostprotos='define'
  188. d_getlogin='define'
  189. d_getmntent='define'
  190. d_getnbyaddr='define'
  191. d_getnbyname='define'
  192. d_getnent='define'
  193. d_getnetprotos='define'
  194. d_getpbyname='define'
  195. d_getpbynumber='define'
  196. d_getpent='define'
  197. d_getpgid='define'
  198. d_getpgrp2='undef'
  199. d_getpgrp='define'
  200. d_getppid='define'
  201. d_getprior='define'
  202. d_getprotoprotos='define'
  203. d_getpwent='define'
  204. d_getsbyname='define'
  205. d_getsbyport='define'
  206. d_getsent='define'
  207. d_getservprotos='define'
  208. d_gettimeod='define'
  209. d_gnulibc='define'
  210. d_grpasswd='define'
  211. d_hasmntopt='define'
  212. d_htonl='define'
  213. d_index='undef'
  214. d_inetaton='define'
  215. d_isascii='define'
  216. d_killpg='define'
  217. d_lchown='define'
  218. d_link='define'
  219. d_locconv='define'
  220. d_lockf='define'
  221. d_longdbl='define'
  222. d_longlong='define'
  223. d_lstat='define'
  224. d_mblen='define'
  225. d_mbstowcs='define'
  226. d_mbtowc='define'
  227. d_memcmp='define'
  228. d_memcpy='define'
  229. d_memmove='define'
  230. d_memset='define'
  231. d_mkdir='define'
  232. d_mkfifo='define'
  233. d_mktime='define'
  234. d_msg='define'
  235. d_msgctl='define'
  236. d_msgget='define'
  237. d_msgrcv='define'
  238. d_msgsnd='define'
  239. d_mymalloc='undef'
  240. d_nice='define'
  241. d_oldpthreads='undef'
  242. d_oldsock='undef'
  243. d_open3='define'
  244. d_pathconf='define'
  245. d_pause='define'
  246. d_phostname='undef'
  247. d_pipe='define'
  248. d_poll='define'
  249. d_portable='define'
  250. d_pthread_yield='undef'
  251. d_pthreads_created_joinable='undef'
  252. d_pwage='undef'
  253. d_pwchange='undef'
  254. d_pwclass='undef'
  255. d_pwcomment='undef'
  256. d_pwexpire='undef'
  257. d_pwgecos='define'
  258. d_pwpasswd='define'
  259. d_pwquota='undef'
  260. d_readdir='define'
  261. d_readlink='define'
  262. d_rename='define'
  263. d_rewinddir='define'
  264. d_rmdir='define'
  265. d_safebcpy='define'
  266. d_safemcpy='undef'
  267. d_sanemcmp='define'
  268. d_sched_yield='define'
  269. d_seekdir='define'
  270. d_select='define'
  271. d_sem='define'
  272. d_semctl='define'
  273. d_semctl_semid_ds='define'
  274. d_semctl_semun='define'
  275. d_semget='define'
  276. d_semop='define'
  277. d_setegid='define'
  278. d_seteuid='define'
  279. d_setgrent='define'
  280. d_setgrps='define'
  281. d_sethent='define'
  282. d_setlinebuf='define'
  283. d_setlocale='define'
  284. d_setnent='define'
  285. d_setpent='define'
  286. d_setpgid='define'
  287. d_setpgrp2='undef'
  288. d_setpgrp='define'
  289. d_setprior='define'
  290. d_setpwent='define'
  291. d_setregid='define'
  292. d_setresgid='define'
  293. d_setresuid='define'
  294. d_setreuid='define'
  295. d_setrgid='undef'
  296. d_setruid='undef'
  297. d_setsent='define'
  298. d_setsid='define'
  299. d_setvbuf='define'
  300. d_sfio='undef'
  301. d_shm='define'
  302. d_shmat='define'
  303. d_shmatprototype='define'
  304. d_shmctl='define'
  305. d_shmdt='define'
  306. d_shmget='define'
  307. d_sigaction='define'
  308. d_sigsetjmp='define'
  309. d_socket='define'
  310. d_sockpair='define'
  311. d_statblks='define'
  312. d_statfsflags='undef'
  313. d_stdio_cnt_lval='undef'
  314. d_stdio_ptr_lval='undef'
  315. d_stdiobase='undef'
  316. d_stdstdio='undef'
  317. d_strchr='define'
  318. d_strcoll='define'
  319. d_strctcpy='define'
  320. d_strerrm='strerror(e)'
  321. d_strerror='define'
  322. d_strtod='define'
  323. d_strtol='define'
  324. d_strtoul='define'
  325. d_strxfrm='define'
  326. d_suidsafe='undef'
  327. d_symlink='define'
  328. d_syscall='define'
  329. d_sysconf='define'
  330. d_sysernlst=''
  331. d_syserrlst='define'
  332. d_system='define'
  333. d_tcgetpgrp='define'
  334. d_tcsetpgrp='define'
  335. d_telldir='define'
  336. d_time='define'
  337. d_times='define'
  338. d_truncate='define'
  339. d_tzname='define'
  340. d_umask='define'
  341. d_uname='define'
  342. d_union_semun='undef'
  343. d_vfork='undef'
  344. d_void_closedir='undef'
  345. d_voidsig='define'
  346. d_voidtty=''
  347. d_volatile='define'
  348. d_vprintf='define'
  349. d_wait4='define'
  350. d_waitpid='define'
  351. d_wcstombs='define'
  352. d_wctomb='define'
  353. d_xenix='undef'
  354. date='date'
  355. db_hashtype='u_int32_t'
  356. db_prefixtype='size_t'
  357. defvoidused='15'
  358. direntrytype='struct dirent'
  359. dlext='so'
  360. doublesize='8'
  361. eagain='EAGAIN'
  362. ebcdic='undef'
  363. echo='echo'
  364. egrep='egrep'
  365. emacs=''
  366. eunicefix=':'
  367. exe_ext=''
  368. expr='expr'
  369. find='find'
  370. firstmakefile='makefile'
  371. flex=''
  372. fpostype='fpos_t'
  373. freetype='void'
  374. full_ar='/usr/bin/ar'
  375. full_csh='/bin/csh'
  376. full_sed='/bin/sed'
  377. gccversion='2.95.2 19991024 (release)'
  378. gidtype='gid_t'
  379. glibpth='/usr/shlib  /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/local/lib '
  380. grep='grep'
  381. groupcat='cat /etc/group'
  382. groupstype='gid_t'
  383. gzip='gzip'
  384. h_fcntl='false'
  385. h_sysfile='true'
  386. hint='recommended'
  387. hostcat='cat /etc/hosts'
  388. huge=''
  389. i_arpainet='define'
  390. i_bsdioctl=''
  391. i_db='define'
  392. i_dbm='undef'
  393. i_dirent='define'
  394. i_dld='undef'
  395. i_dlfcn='define'
  396. i_fcntl='undef'
  397. i_float='define'
  398. i_gdbm='define'
  399. i_grp='define'
  400. i_limits='define'
  401. i_locale='define'
  402. i_machcthreads='undef'
  403. i_malloc='define'
  404. i_math='define'
  405. i_memory='undef'
  406. i_mntent='define'
  407. i_ndbm='define'
  408. i_netdb='define'
  409. i_neterrno='undef'
  410. i_niin='define'
  411. i_pthread='define'
  412. i_pwd='define'
  413. i_rpcsvcdbm='undef'
  414. i_sfio='undef'
  415. i_sgtty='undef'
  416. i_stdarg='define'
  417. i_stddef='define'
  418. i_stdlib='define'
  419. i_string='define'
  420. i_sysdir='define'
  421. i_sysfile='define'
  422. i_sysfilio='undef'
  423. i_sysin='undef'
  424. i_sysioctl='define'
  425. i_sysmount='define'
  426. i_sysndir='undef'
  427. i_sysparam='define'
  428. i_sysresrc='define'
  429. i_sysselct='define'
  430. i_syssockio=''
  431. i_sysstat='define'
  432. i_sysstatvfs='define'
  433. i_systime='define'
  434. i_systimek='undef'
  435. i_systimes='define'
  436. i_systypes='define'
  437. i_sysun='define'
  438. i_syswait='define'
  439. i_termio='undef'
  440. i_termios='define'
  441. i_time='undef'
  442. i_unistd='define'
  443. i_utime='define'
  444. i_values='define'
  445. i_varargs='undef'
  446. i_varhdr='stdarg.h'
  447. i_vfork='undef'
  448. ignore_versioned_solibs='y'
  449. incpath=''
  450. inews=''
  451. installbin='/usr/bin'
  452. installman1dir='/usr/man/man1'
  453. installman3dir='/usr/lib/perl5/man/man3'
  454. installscript='/usr/bin'
  455. installsitearch='/usr/lib/perl5/site_perl/5.005/i386-linux'
  456. installsitelib='/usr/lib/perl5/site_perl/5.005'
  457. installusrbinperl='undef'
  458. intsize='4'
  459. known_extensions='B DB_File Data/Dumper Fcntl GDBM_File IO IPC/SysV NDBM_File ODBM_File Opcode POSIX SDBM_File Socket Thread attrs re'
  460. ksh=''
  461. large=''
  462. ld='cc'
  463. lddlflags='-shared -L/usr/local/lib'
  464. ldflags=' -L/usr/local/lib'
  465. less='less'
  466. lib_ext='.a'
  467. libc=''
  468. libperl='libperl.a'
  469. libswanted='sfio socket inet nsl nm dbm malloc dl dld ld sun m c cposix posix ndir dir crypt ucb BSD PW x'
  470. line='line'
  471. lint=''
  472. lkflags=''
  473. ln='ln'
  474. lns='/bin/ln -s'
  475. locincpth='/usr/local/include /opt/local/include /usr/gnu/include /opt/gnu/include /usr/GNU/include /opt/GNU/include'
  476. loclibpth='/usr/local/lib /opt/local/lib /usr/gnu/lib /opt/gnu/lib /usr/GNU/lib /opt/GNU/lib'
  477. longdblsize='12'
  478. longlongsize='8'
  479. longsize='4'
  480. lp=''
  481. lpr=''
  482. ls='ls'
  483. lseektype='off_t'
  484. mail=''
  485. mailx=''
  486. make='make'
  487. make_set_make='#'
  488. mallocobj=''
  489. mallocsrc=''
  490. malloctype='void *'
  491. man1dir='/usr/man/man1'
  492. man1direxp='/usr/man/man1'
  493. man1ext='1'
  494. man3dir='/usr/lib/perl5/man/man3'
  495. man3direxp='/usr/lib/perl5/man/man3'
  496. man3ext='3'
  497. medium=''
  498. mips=''
  499. mips_type=''
  500. mkdir='mkdir'
  501. models='none'
  502. modetype='mode_t'
  503. more='more'
  504. mv=''
  505. myarchname='i686-linux'
  506. mydomain='.mandrakesoft.com'
  507. myhostname='jedi'
  508. myuname='linux jedi.mandrakesoft.com 2.2.14-1mdksmp #1 smp thu dec 2 01:02:03 cet 1999 i686 unknown '
  509. n='-n'
  510. netdb_hlen_type='size_t'
  511. netdb_host_type='const char *'
  512. netdb_name_type='const char *'
  513. netdb_net_type='unsigned long'
  514. nm='nm'
  515. nm_opt=''
  516. nm_so_opt='--dynamic'
  517. nonxs_ext='Errno'
  518. nroff='nroff'
  519. o_nonblock='O_NONBLOCK'
  520. obj_ext='.o'
  521. optimize='-O3 -fomit-frame-pointer -fno-exceptions -fno-rtti -pipe -s -mpentium -mcpu=pentium -march=pentium -ffast-math -fexpensive-optimizations'
  522. orderlib='false'
  523. package='perl5'
  524. pager='/usr/bin/less'
  525. passcat='cat /etc/passwd'
  526. patchlevel='5'
  527. path_sep=':'
  528. perl='perl'
  529. perladmin='root@jedi.mandrakesoft.com'
  530. perlpath='/usr/bin/perl'
  531. pg='pg'
  532. phostname='hostname'
  533. pidtype='pid_t'
  534. plibpth=''
  535. pmake=''
  536. pr=''
  537. prefixexp='/usr'
  538. privlib='/usr/lib/perl5/5.00503'
  539. prototype='define'
  540. ptrsize='4'
  541. randbits='31'
  542. ranlib=':'
  543. rd_nodata='-1'
  544. rm='rm'
  545. rmail=''
  546. runnm='false'
  547. scriptdir='/usr/bin'
  548. scriptdirexp='/usr/bin'
  549. sed='sed'
  550. selectminbits='32'
  551. selecttype='fd_set *'
  552. sendmail='sendmail'
  553. sh='/bin/sh'
  554. shar=''
  555. shmattype='void *'
  556. shortsize='2'
  557. shrpenv=''
  558. sig_name_init='"ZERO", "HUP", "INT", "QUIT", "ILL", "TRAP", "ABRT", "BUS", "FPE", "KILL", "USR1", "SEGV", "USR2", "PIPE", "ALRM", "TERM", "STKFLT", "CHLD", "CONT", "STOP", "TSTP", "TTIN", "TTOU", "URG", "XCPU", "XFSZ", "VTALRM", "PROF", "WINCH", "IO", "PWR", "UNUSED", "RTMIN", "NUM33", "NUM34", "NUM35", "NUM36", "NUM37", "NUM38", "NUM39", "NUM40", "NUM41", "NUM42", "NUM43", "NUM44", "NUM45", "NUM46", "NUM47", "NUM48", "NUM49", "NUM50", "NUM51", "NUM52", "NUM53", "NUM54", "NUM55", "NUM56", "NUM57", "NUM58", "NUM59", "NUM60", "NUM61", "NUM62", "RTMAX", "IOT", "CLD", "POLL", 0'
  559. sig_num_init='0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 6, 17, 29, 0'
  560. signal_t='void'
  561. sitearch='/usr/lib/perl5/site_perl/5.005/i386-linux'
  562. sitearchexp='/usr/lib/perl5/site_perl/5.005/i386-linux'
  563. sitelib='/usr/lib/perl5/site_perl/5.005'
  564. sitelibexp='/usr/lib/perl5/site_perl/5.005'
  565. sizetype='size_t'
  566. sleep=''
  567. smail=''
  568. small=''
  569. sockethdr=''
  570. socketlib=''
  571. sort='sort'
  572. spackage='Perl5'
  573. spitshell='cat'
  574. split=''
  575. src='.'
  576. ssizetype='ssize_t'
  577. startperl='#!/usr/bin/perl'
  578. stdchar='char'
  579. stdio_base='((fp)->_base)'
  580. stdio_bufsiz='((fp)->_cnt + (fp)->_ptr - (fp)->_base)'
  581. stdio_cnt='((fp)->_cnt)'
  582. stdio_filbuf=''
  583. stdio_ptr='((fp)->_ptr)'
  584. strings='/usr/include/string.h'
  585. submit=''
  586. subversion='3'
  587. sysman='/usr/man/man1'
  588. tail=''
  589. tar=''
  590. tbl=''
  591. tee='tee'
  592. test='test'
  593. timeincl='/usr/include/sys/time.h '
  594. timetype='time_t'
  595. touch='touch'
  596. tr='tr'
  597. trnl='\n'
  598. troff=''
  599. uidtype='uid_t'
  600. uname='uname'
  601. uniq='uniq'
  602. usedl='define'
  603. usemymalloc='n'
  604. usenm='false'
  605. useopcode='true'
  606. useperlio='undef'
  607. useposix='true'
  608. usesfio='false'
  609. useshrplib='false'
  610. usethreads='undef'
  611. usevfork='false'
  612. usrinc='/usr/include'
  613. uuname=''
  614. version='5.00503'
  615. vi=''
  616. voidflags='15'
  617. xlibpth='/usr/lib/386 /lib/386'
  618. zcat=''
  619. zip='zip'
  620. !END!
  621.  
  622. my $summary = <<'!END!';
  623. Summary of my $package ($baserev patchlevel $PATCHLEVEL subversion $SUBVERSION) configuration:
  624.   Platform:
  625.     osname=$osname, osvers=$osvers, archname=$archname
  626.     uname='$myuname'
  627.     hint=$hint, useposix=$useposix, d_sigaction=$d_sigaction
  628.     usethreads=$usethreads useperlio=$useperlio d_sfio=$d_sfio
  629.   Compiler:
  630.     cc='$cc', optimize='$optimize', gccversion=$gccversion
  631.     cppflags='$cppflags'
  632.     ccflags ='$ccflags'
  633.     stdchar='$stdchar', d_stdstdio=$d_stdstdio, usevfork=$usevfork
  634.     intsize=$intsize, longsize=$longsize, ptrsize=$ptrsize, doublesize=$doublesize
  635.     d_longlong=$d_longlong, longlongsize=$longlongsize, d_longdbl=$d_longdbl, longdblsize=$longdblsize
  636.     alignbytes=$alignbytes, usemymalloc=$usemymalloc, prototype=$prototype
  637.   Linker and Libraries:
  638.     ld='$ld', ldflags ='$ldflags'
  639.     libpth=$libpth
  640.     libs=$libs
  641.     libc=$libc, so=$so, useshrplib=$useshrplib, libperl=$libperl
  642.   Dynamic Linking:
  643.     dlsrc=$dlsrc, dlext=$dlext, d_dlsymun=$d_dlsymun, ccdlflags='$ccdlflags'
  644.     cccdlflags='$cccdlflags', lddlflags='$lddlflags'
  645.  
  646. !END!
  647. my $summary_expanded = 0;
  648.  
  649. sub myconfig {
  650.     return $summary if $summary_expanded;
  651.     $summary =~ s{\$(\w+)}
  652.              { my $c = $Config{$1}; defined($c) ? $c : 'undef' }ge;
  653.     $summary_expanded = 1;
  654.     $summary;
  655. }
  656.  
  657. sub FETCH { 
  658.     # check for cached value (which may be undef so we use exists not defined)
  659.     return $_[0]->{$_[1]} if (exists $_[0]->{$_[1]});
  660.  
  661.     # Search for it in the big string 
  662.     my($value, $start, $marker, $quote_type);
  663.     $marker = "$_[1]=";
  664.     $quote_type = "'";
  665.     # return undef unless (($value) = $config_sh =~ m/^$_[1]='(.*)'\s*$/m);
  666.     # Check for the common case, ' delimeted
  667.     $start = index($config_sh, "\n$marker$quote_type");
  668.     # If that failed, check for " delimited
  669.     if ($start == -1) {
  670.       $quote_type = '"';
  671.       $start = index($config_sh, "\n$marker$quote_type");
  672.     }
  673.     return undef if ( ($start == -1) &&  # in case it's first 
  674.         (substr($config_sh, 0, length($marker)) ne $marker) );
  675.     if ($start == -1) { 
  676.       # It's the very first thing we found. Skip $start forward
  677.       # and figure out the quote mark after the =.
  678.       $start = length($marker) + 1;
  679.       $quote_type = substr($config_sh, $start - 1, 1);
  680.     } 
  681.     else { 
  682.       $start += length($marker) + 2;
  683.     }
  684.     $value = substr($config_sh, $start, 
  685.         index($config_sh, "$quote_type\n", $start) - $start);
  686.  
  687.     # If we had a double-quote, we'd better eval it so escape
  688.     # sequences and such can be interpolated. Since the incoming
  689.     # value is supposed to follow shell rules and not perl rules,
  690.     # we escape any perl variable markers
  691.     if ($quote_type eq '"') {
  692.       $value =~ s/\$/\\\$/g;
  693.       $value =~ s/\@/\\\@/g;
  694.       eval "\$value = \"$value\"";
  695.     }
  696.     #$value = sprintf($value) if $quote_type eq '"';
  697.     $value = undef if $value eq 'undef'; # So we can say "if $Config{'foo'}".
  698.     $_[0]->{$_[1]} = $value; # cache it
  699.     return $value;
  700. }
  701.  
  702. my $prevpos = 0;
  703.  
  704. sub FIRSTKEY {
  705.     $prevpos = 0;
  706.     # my($key) = $config_sh =~ m/^(.*?)=/;
  707.     substr($config_sh, 0, index($config_sh, '=') );
  708.     # $key;
  709. }
  710.  
  711. sub NEXTKEY {
  712.     # Find out how the current key's quoted so we can skip to its end.
  713.     my $quote = substr($config_sh, index($config_sh, "=", $prevpos)+1, 1);
  714.     my $pos = index($config_sh, qq($quote\n), $prevpos) + 2;
  715.     my $len = index($config_sh, "=", $pos) - $pos;
  716.     $prevpos = $pos;
  717.     $len > 0 ? substr($config_sh, $pos, $len) : undef;
  718. }
  719.  
  720. sub EXISTS { 
  721.     # exists($_[0]->{$_[1]})  or  $config_sh =~ m/^$_[1]=/m;
  722.     exists($_[0]->{$_[1]}) or
  723.     index($config_sh, "\n$_[1]='") != -1 or
  724.     substr($config_sh, 0, length($_[1])+2) eq "$_[1]='" or
  725.     index($config_sh, "\n$_[1]=\"") != -1 or
  726.     substr($config_sh, 0, length($_[1])+2) eq "$_[1]=\"";
  727. }
  728.  
  729. sub STORE  { die "\%Config::Config is read-only\n" }
  730. sub DELETE { &STORE }
  731. sub CLEAR  { &STORE }
  732.  
  733.  
  734. sub config_sh {
  735.     $config_sh
  736. }
  737.  
  738. sub config_re {
  739.     my $re = shift;
  740.     my @matches = ($config_sh =~ /^$re=.*\n/mg);
  741.     @matches ? (print @matches) : print "$re: not found\n";
  742. }
  743.  
  744. sub config_vars {
  745.     foreach(@_){
  746.     config_re($_), next if /\W/;
  747.     my $v=(exists $Config{$_}) ? $Config{$_} : 'UNKNOWN';
  748.     $v='undef' unless defined $v;
  749.     print "$_='$v';\n";
  750.     }
  751. }
  752.  
  753. sub TIEHASH { bless {} }
  754.  
  755. # avoid Config..Exporter..UNIVERSAL search for DESTROY then AUTOLOAD
  756. sub DESTROY { }
  757.  
  758. tie %Config, 'Config';
  759.  
  760. 1;
  761.