PATH=.$p_$PATH
export PATH
+: This should not matter in a script, but apparently it does sometimes
+unset CDPATH
+
: Sanity checks
if test ! -t 0; then
echo "Say 'sh $me', not 'sh <$me'"
tmp_shrpenv=''
if "$useshrplib"; then
case "$osname" in
+ aix)
+ # We'll set it in Makefile.SH...
+ ;;
solaris|netbsd)
xxx="-R $shrpdir"
;;
: get csh whereabouts
case "$csh" in
-*csh) val="$undef" ;;
-*) val="$define" ;;
+'csh') val="$undef" ;;
+*) val="$define" ;;
esac
set d_csh
eval $setvar
-full_csh=$csh
+: Respect a hint or command line value for full_csh.
+case "$full_csh" in
+'') full_csh=$csh ;;
+esac
: see if cuserid exists
set cuserid d_cuserid
#include <db.h>
main()
{
-#ifdef DB_VERSION_MAJOR
+#ifdef DB_VERSION_MAJOR /* DB version >= 2: not yet. */
printf("You have Berkeley DB Version %d.%d\n",
DB_VERSION_MAJOR, DB_VERSION_MINOR);
printf("Perl currently only supports up to version 1.86.\n");
- exit(1);
+ exit(2);
#else
- exit(0);
+#if defined(_DB_H_) && defined(BTREEMAGIC) && defined(HASHMAGIC)
+ exit(0); /* DB version < 2: the coast is clear. */
+#else
+ exit(1); /* <db.h> not Berkeley DB? */
+#endif
#endif
}
EOCP