Martin, I've never tried this, but I recall reading that building extensions was broken in the default 5.8.0. You might try the new release candidate for 5.8.1 or search the Perl VMS archives for the patches necessary for extension building.
I'm still using 5.6.1 on my production machines. -Jordan Henderson The common idea that success spoils people by making them vain, egotistic, and self-complacent is erroneous; on the contrary it makes them, for the most part, humble, tolerant, and kind. Failure makes people bitter and cruel. -- W. Somerset Maugham > -----Original Message----- > From: Dr. Martin P.J. Zinser [mailto:[EMAIL PROTECTED] > Sent: Thursday, July 10, 2003 5:10 PM > To: [EMAIL PROTECTED] > Subject: Help with DBI 1.37 > > Hello, > > according to the Changes file for DBI 1.37 VMS build support should be > fixed as > of 1.36. Still I am running into serious problems and would appreciate > some help very much. > > Environment: > > OpenVMS Alpha 7.3, DEC C 6.5, Perl 5.8.0 compiled from sources. > > $ dir > > Directory DKA0:[TMP.DBI-1_37] > > CHANGES.;1 DBD_XSH.H;1 DBI.PM;1 DBI.XS;1 > DBIPPORT.H;1 DBIPROF.PL;1 DBIPROXY.PL;1 DBIXS.H;1 > DBI_SQL.H;1 DRIVER.XST;1 DRIVER_XST.H;1 LIB.DIR;1 > MAKEFILE.PL;1 MANIFEST.;1 PERL.XS;1 README.;1 > T.DIR;1 TEST.PL;1 TODO.;1 TYPEMAP.;1 > > Total of 20 files. > $ perl makefile.pl > *** Note: > The optional PlRPC-modules (RPC::PlServer etc) are not installed. > If you want to use the DBD::Proxy driver and DBI::ProxyServer > modules, then you'll need to install the RPC::PlServer, RPC::PlClient, > Storable and Net::Daemon modules. The CPAN Bundle::DBI may help you. > You can install them any time after installing the DBI. > You do *not* need these modules for typical DBI usage. > > Optional modules are available from any CPAN mirror, in particular > http://www.perl.com/CPAN/modules/by-module > http://www.perl.org/CPAN/modules/by-module > ftp://ftp.funet.fi/pub/languages/perl/CPAN/modules/by-module > > Creating extra DBI::PurePerl test: t/zz_01basics_pp.t > Creating extra DBI::PurePerl test: t/zz_02dbidrv_pp.t > Creating extra DBI::PurePerl test: t/zz_03handle_pp.t > Creating extra DBI::PurePerl test: t/zz_04mods_pp.t > Creating extra DBI::PurePerl test: t/zz_05thrclone_pp.t > Creating extra DBI::PurePerl test: t/zz_06attrs_pp.t > Creating extra DBI::PurePerl test: t/zz_07kids_pp.t > Creating extra DBI::PurePerl test: t/zz_08keeperr_pp.t > Creating extra DBI::PurePerl test: t/zz_10examp_pp.t > Creating extra DBI::PurePerl test: t/zz_15array_pp.t > Creating extra DBI::PurePerl test: t/zz_20meta_pp.t > Creating extra DBI::PurePerl test: t/zz_30subclass_pp.t > Creating extra DBI::PurePerl test: t/zz_40profile_pp.t > Creating extra DBI::PurePerl test: t/zz_41prof_dump_pp.t > Creating extra DBI::PurePerl test: t/zz_42prof_data_pp.t > Creating extra DBI::PurePerl test: t/zz_60preparse_pp.t > Creating extra DBI::PurePerl test: t/zz_80proxy_pp.t > Checking if your kit is complete... > Looks good > Can't cd to (perl_root:[lib]/) switch: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) stock: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) site_perl: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) search: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) scalar: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) pod: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) perlio: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) next: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) net: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) mime: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) memoize: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) math: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) locale: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) list: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) ipc: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) io: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) i18n: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) hash: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) getopt: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) filter: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) file: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) extutils: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) exporter: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) env: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) encode: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) digest: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) devel: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) data: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) cpan: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) class: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) cgi: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) carp: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) bignum: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) b: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) auto: invalid argument > at makefile.pl line 240 > Can't cd to (perl_root:[lib]/) attribute: invalid argument > at makefile.pl line 240 > > Warning: I could not locate your pod2man program. As a last choice, > I will look for the file to which the logical name POD2MAN > points when MMK is invoked. > > Writing Descrip.MMS for DBI > > Remember to actually *read* the README file! > Use 'make' to build the software (dmake or nmake on Windows). > Then 'make test' to execute self tests. > Then 'make install' to install the DBI and then delete this working > directory before unpacking and building any DBD::* drivers. > > As you would have expected perl_root is defined and available: > > $ sh log perl_root > "PERL_ROOT" = "DSA0:[PUBLIC.GNU.PERL.]" (LNM$PROCESS_TABLE) > > $ dir perl_root:[lib] > > Directory PERL_ROOT:[LIB] > > .exists;1 abbrev.pl;1 AnyDBM_File.pm;1 > AnyDBM_File.t;1 > assert.pl;1 ATTRIBUTE.DIR;1 attributes.pm;1 attrs.pm;1 > AUTO.DIR;1 AutoLoader.pm;1 AutoLoader.t;1 AutoSplit.pm;1 > AutoSplit.t;1 autouse.pm;1 autouse.t;1 B.DIR;1 > b.pm;1 base.pm;1 Benchmark.pm;1 Benchmark.t;1 > > ... (Rest of dir listing omitted to save electrons ;-) > > I anyhow did attempt to build: > > $ mmk > Copy/NoConfirm Changes [.blib.lib.DBI]Changes.pm > %CREATE-I-EXISTS, [.blib.lib] already exists > MCR perl_root:[000000]miniperl.exe "-MExtUtils::Install" -e > "pm_to_blib({split(' ',<STDIN>)},'[.blib.lib.auto]','')" <.MM_tmp > cp dbiproxy.pl [.blib.lib]dbiproxy.pl > cp [.lib.win32]dbiodbc.pm [.blib.lib.win32]dbiodbc.pm > cp dbd_xsh.h [.blib.arch.auto.DBI]dbd_xsh.h > cp [.lib.dbi]profiledumper.pm [.blib.lib.dbi]profiledumper.pm > cp [.lib.dbd]proxy.pm [.blib.lib.dbd]proxy.pm > cp [.lib.dbi]w32odbc.pm [.blib.lib.dbi]w32odbc.pm > cp [.lib.dbi]faq.pm [.blib.lib.dbi]faq.pm > cp [.lib.dbi.dbd]metadata.pm [.blib.lib.dbi.dbd]metadata.pm > cp [.lib.bundle]dbi.pm [.blib.lib.bundle]dbi.pm > cp [.lib.dbi]proxyserver.pm [.blib.lib.dbi]proxyserver.pm > cp [.lib.dbi]profiledata.pm [.blib.lib.dbi]profiledata.pm > cp dbi.pm [.blib.lib]dbi.pm > cp [.lib.dbd]nullp.pm [.blib.lib.dbd]nullp.pm > cp [.lib.dbi]profile.pm [.blib.lib.dbi]profile.pm > cp dbixs.h [.blib.arch.auto.DBI]dbixs.h > cp driver.xst [.blib.arch.auto.DBI]driver.xst > cp driver_xst.h [.blib.arch.auto.DBI]driver_xst.h > cp dbiprof.pl [.blib.lib]dbiprof.pl > cp [.lib.dbi.const]getinfotype.pm [.blib.lib.dbi.const]getinfotype.pm > cp [.lib.dbi.const]getinforeturn.pm [.blib.lib.dbi.const]getinforeturn.pm > cp [.lib.dbi.const.getinfo]odbc.pm [.blib.lib.dbi.const.getinfo]odbc.pm > cp [.lib.dbi.const.getinfo]ansi.pm [.blib.lib.dbi.const.getinfo]ansi.pm > cp [.lib.dbi]dbd.pm [.blib.lib.dbi]dbd.pm > cp dbipport.h [.blib.arch.auto.DBI]dbipport.h > cp [.lib.dbd]sponge.pm [.blib.lib.dbd]sponge.pm > cp [.lib.dbi]pureperl.pm [.blib.lib.dbi]pureperl.pm > cp dbi_sql.h [.blib.arch.auto.DBI]dbi_sql.h > cp [.lib.dbi.profiledumper]apache.pm > [.blib.lib.dbi.profiledumper]apache.pm > cp [.lib.dbd]examplep.pm [.blib.lib.dbd]examplep.pm > MCR perl_root:[000000]miniperl.exe -e "use ExtUtils::Mksymlists;" -e > "Mksymlists('NAME' => 'DBI', 'DL_FUNCS' => { }, 'DL_VARS > ' => [], 'FUNCLIST' => [])" > MCR perl_root:[000000]miniperl.exe -e "print > ""[.blib.arch.auto.DBI]DBI.olb/Include=DBI\n[.blib.arch.auto.DBI]DBI.olb/L > ibrary\n"";" > >>DBI.OPT > MCR perl_root:[000000]miniperl.exe -e "print qq{PerlShr/Share\n}" > >>DBI.OPT > Copy/NoConfirm DBI.OPT [.BLIB.ARCH.AUTO.DBI]DBI.OPT > %MMK-I-ACTNOUPD, action did not update target > [.BLIB.ARCH.AUTO.DBI]DRIVER.XST > %MMK-I-ACTNOUPD, action did not update target > [.BLIB.ARCH.AUTO.DBI]DRIVER_XST.H > MCR perl_root:[000000]miniperl.exe -p -e "s/~DRIVER~/Perl/g" < > [.blib.arch.auto.DBI]Driver.xst > Perl.xsi > MCR perl_root:[000000]miniperl.exe perl_root:[lib.ExtUtils]xsubpp - > typemap perl_root:[lib.ExtUtils]typemap -typemap typemap PERL.xs > >PERL.C > Warning: long symbol DBD__Perl__db_selectall_arrayref > trimmed to DBD_Perl_db_selectal_arayref > at perl_root:[lib.extutils]xsubpp line 1095 > Warning: long symbol DBD__Perl__db_selectrow_arrayref > trimmed to DBD_Pl_db_ser_arayref > at perl_root:[lib.extutils]xsubpp line 1095 > Warning: long symbol DBD__Perl__db_dbd_take_imp_data > trimmed to DBD_Pl_db_d_te_i_data > at perl_root:[lib.extutils]xsubpp line 1095 > Warning: long symbol DBD__Perl__st_bind_param_inout > trimmed to DBD_Perl_st_bind_param_inout > at perl_root:[lib.extutils]xsubpp line 1095 > Warning: long symbol DBD__Perl__st_fetchrow_arrayref > trimmed to DBD_Perl_st_fetchrow_arayref > at perl_root:[lib.extutils]xsubpp line 1095 > Warning: long symbol DBD__Perl__st_fetchall_arrayref > trimmed to DBD_Perl_st_fetchal_arayref > at perl_root:[lib.extutils]xsubpp line 1095 > > These should be harmless... > > MCR perl_root:[000000]miniperl.exe -p -e "s/~DRIVER~/Perl/g" < > [.blib.arch.auto.DBI]Driver.xst > Perl.xsi > CC/DECC /Include=[]/Standard=Relaxed_ANSI/Prefix=All/Obj=.obj > /NOANSI_ALIAS/float=ieee/ieee=denorm_results/Define=(DBI_NO_THREADS,"V > ERSION=""1.37""","XS_VERSION=""1.37""")/Include=(perl_root:[lib.VMS_AXP.5_ > 8_0.CORE])/NoList PERL.c > MCR perl_root:[000000]miniperl.exe perl_root:[lib.ExtUtils]xsubpp - > typemap perl_root:[lib.ExtUtils]typemap -typemap typemap DBI.xs > >DBI.C > CC/DECC /Include=[]/Standard=Relaxed_ANSI/Prefix=All/Obj=.obj > /NOANSI_ALIAS/float=ieee/ieee=denorm_results/Define=(DBI_NO_THREADS,"V > ERSION=""1.37""","XS_VERSION=""1.37""")/Include=(perl_root:[lib.VMS_AXP.5_ > 8_0.CORE])/NoList DBI.c > If F$Search("[.BLIB.ARCH.AUTO.DBI]DBI.OLB").eqs."" Then > Library/Object/Create [.BLIB.ARCH.AUTO.DBI]DBI.OLB > Library/Object/Replace [.BLIB.ARCH.AUTO.DBI]DBI.OLB DBI.OBJ > %CREATE-I-EXISTS, [.blib.arch.auto.DBI] already exists > If F$TrnLNm("PerlShr").eqs."" Then Define/NoLog/User PerlShr > Sys$Share:PerlShr.exe > Link /NoTrace/NoMap /Shareable=[.BLIB.ARCH.AUTO.DBI]PL_DBI.EXE > DBI.opt/Option,perl_root:[lib.VMS_AXP.5_8_0.CORE]perlshr_attr.opt/Opt > ion > Running mkbootstrap for DBI () > Copy/NoConfirm DBI.bs [.blib.arch.auto.DBI]DBI.bs > Can't open [.blib.man1]dbiprof.pl.rno for writing: i/o error > at -e line 2 > %SYSTEM-F-ABORT, abort > Can't open [.blib.man1]dbiproxy.pl.rno for writing: i/o error > at -e line 2 > %SYSTEM-F-ABORT, abort > > This on the other hand looks not so good... > > Any advise? > > Thanks a lot, Martin > > Dr. Martin P.J. Zinser [EMAIL PROTECTED] > boerse.com > Deutsche Boerse Systems Inc. > Suite 1580 Tel: +1-312-408-3085 > 141 West Jackson Blvd. FAX: +1-312-408-3071 > Chicago, IL, 60604 > USA Private: [EMAIL PROTECTED]
