07.08.2007 Install from SYS$USER:[BNICI.perl.perl_extensions] (Perl: ODS-5 disk, User: ODS-2) ============================ =========== =========== Preconditions: - OpenVMS 8.3 - Perl for OpenVMS 5.8-6 (binary kit from HP) - MMK V3.9-10 is installed (http://vms.process.com/scripts/fileserv/fileserv.com?MMK) - gzip.exe is installed - vmstar.exe is installed (V3.4-1 or newer, having the ODS2 switch ) [- enable DCL extended file specifications (set proc/parse_style=extended) <= has no effect on an ODS-2 disk ] (check with pipe sh proc/all | sear sys$input parse) - Unpack zip into [.vms-device-0_09] SSV015_BNICI_> perl makefile.pl Checking if your kit is complete... Looks good Writing Descrip.MMS for VMS::Device SSV015_BNICI_> mms cp device.pm [.blib.lib.vms]device.pm AutoSplitting blib/lib/vms/device.pm ([.blib.lib.auto.VMS.Device]) MCR dkb100:[csws211.perl5_8_6]perl.exe -e "use ExtUtils::Mksymlists;" -e "Mksymlists('NAME' => 'VMS::Device', 'DL_FUNCS' => { }, 'DL_VARS' => [], 'FUNCLIST' => [])" MCR dkb100:[csws211.perl5_8_6]perl.exe -e "print ""[.blib.arch.auto.VMS.Device]Device.olb/Include=Device\n[.blib.arch.auto.VMS.Devic e]Device.olb/Library\n"";" >>Device.opt MCR dkb100:[csws211.perl5_8_6]perl.exe -e "print qq{PerlShr/Share\n}" >>Device.opt Copy/NoConfirm Device.opt [.blib.arch.auto.VMS.Device]Device.opt MCR dkb100:[csws211.perl5_8_6]perl.exe perl_root:[lib.ExtUtils]xsubpp -typemap perl_root:[lib.ExtUtils]typemap Device.xs >Device.C Warning: long symbol VMS__Device_decode_device_bitmap trimmed to VMS_Di_do_di_bitmap at perl_root:[lib.extutils]xsubpp line 1126 Please specify prototyping behavior for device.xs (see perlxs manual) CC/DECC /Include=[]/Standard=Relaxed_ANSI/Prefix=All/Obj=.obj/List/Machine/Show=Expan /NOANSI_ALIAS/float=ieee/ieee=denorm_results/D efine=("VERSION=""0.09""","XS_VERSION=""0.09""")/Include=(perl_root:[lib.VMS_AXP.5_8_6.CORE])/List/Machine/Show=Expan - Device.c + SYS$LIBRARY:SYS$LIB_C/LIBRARY If F$Search("[.blib.arch.auto.VMS.Device]Device.olb").eqs."" Then Library/Object/Create [.blib.arch.auto.VMS.Device]Device.olb Library/Object/Replace [.blib.arch.auto.VMS.Device]Device.olb Device.obj If F$TrnLNm("PerlShr").eqs."" Then Define/NoLog/User PerlShr Sys$Share:PerlShr.exe Link /NoTrace/Map/Full/Cross /Shareable=[.blib.arch.auto.VMS.Device]PL_VMS__Device.exe Device.opt/Option,perl_root:[lib.VMS_AXP.5_8_ 6.CORE]perlshr_attr.opt/Option Running mkbootstrap for VMS::Device () Copy/NoConfirm Device.bs [.blib.arch.auto.VMS.Device]Device.bs => generation ok (with a "long symbol name" warning). Test it: SSV015_BNICI_> mms test %MMS-F-BADTARG, Specified target (TEST) does not exist in the description file. => Test failed!! exactly as on ssvs10 Re-do Install with MMK from PERL_ROOT:[perl_ext] (ODS-5 disk) =============================================== (After having installed MMK downloaded from http://vms.process.com/scripts/fileserv/fileserv.com?MMK Unpack zip into [.vms-device-0_09] SSV015_BNICI_> perl makefile.pl Checking if your kit is complete... Looks good Writing Descrip.MMS for VMS::Device SSV015_BNICI_> mmk cp device.pm [.blib.lib.vms]device.pm AutoSplitting blib/lib/vms/device.pm ([.blib.lib.auto.VMS.Device]) MCR dkb100:[csws211.perl5_8_6]perl.exe -e "use ExtUtils::Mksymlists;" -e "Mksymlists('NAME' => 'VMS::Device', 'DL_FUNC S' => { }, 'DL_VARS' => [], 'FUNCLIST' => [])" MCR dkb100:[csws211.perl5_8_6]perl.exe -e "print ""[.blib.arch.auto.VMS.Device]Device.olb/Include=Device\n[.blib.arch.au to.VMS.Device]Device.olb/Library\n"";" >>DEVICE.OPT MCR dkb100:[csws211.perl5_8_6]perl.exe -e "print qq{PerlShr/Share\n}" >>DEVICE.OPT Copy/NoConfirm DEVICE.OPT [.BLIB.ARCH.AUTO.VMS.DEVICE]DEVICE.OPT MCR dkb100:[csws211.perl5_8_6]perl.exe perl_root:[lib.ExtUtils]xsubpp -typemap perl_root:[lib.ExtUtils]typemap DEVICE.x s >DEVICE.C Warning: long symbol VMS__Device_decode_device_bitmap trimmed to VMS_Di_do_di_bitmap at perl_root:[lib.extutils]xsubpp line 1126 Please specify prototyping behavior for device.xs (see perlxs manual) CC/DECC /Include=[]/Standard=Relaxed_ANSI/Prefix=All/Obj=.obj/List/Machine/Show=Expan /NOANSI_ALIAS/float=ieee/ieee=deno rm_results/Define=("VERSION=""0.09""","XS_VERSION=""0.09""")/Include=(perl_root:[lib.VMS_AXP.5_8_6.CORE])/List/Machine/S how=Expan DEVICE.c + SYS$LIBRARY:SYS$LIB_C/LIBRARY If F$Search("[.BLIB.ARCH.AUTO.VMS.DEVICE]DEVICE.OLB").eqs."" Then Library/Object/Create [.BLIB.ARCH.AUTO.VMS.DEVICE]DEVI CE.OLB Library/Object/Replace [.BLIB.ARCH.AUTO.VMS.DEVICE]DEVICE.OLB DEVICE.OBJ If F$TrnLNm("PerlShr").eqs."" Then Define/NoLog/User PerlShr Sys$Share:PerlShr.exe Link /NoTrace/Map/Full/Cross /Shareable=[.BLIB.ARCH.AUTO.VMS.DEVICE]PL_VMS__DEVICE.EXE Device.opt/Option,perl_root:[lib. VMS_AXP.5_8_6.CORE]perlshr_attr.opt/Option Running mkbootstrap for VMS::Device () Copy/NoConfirm Device.bs [.blib.arch.auto.VMS.Device]Device.bs SSV015_BNICI_> mmk test MCR dkb100:[csws211.perl5_8_6]perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(0, '[.blib.lib]', '[.blib.arch]')" t /*.t t/basic.... Can't locate VMS/Device.pm in @INC (@INC contains: . perl_root:[lib.VMS_AXP.5_8_6] perl_root:[lib] perl_root:[lib.site_p erl.VMS_AXP] perl_root:[lib.site_perl] /perl_root/lib/site_perl .) at t/basic.t line 11. BEGIN failed--compilation aborted at t/basic.t line 11. %SYSTEM-W-NOSUCHFILE, no such file dubious Test returned status 2320 (wstat 256, 0x100) (VMS status is 2320) DIED. FAILED test 1 Failed 1/1 tests, 0.00% okay Failed Test Stat Wstat Total Fail Failed List of Failed ------------------------------------------------------------------------------- t/basic.t 232 256 1 1 100.00% 1 Failed 1/1 test scripts, 0.00% okay. 1/1 subtests failed, 0.00% okay. %SYSTEM-W-NOSUCHFILE, no such file %MMK-F-ERRUPD, error status %X00000910 occurred when updating target TEST_DYNAMIC => Test failed too!! ================== 31.08.2007 Try nevertheless the install (re-do all steps from PERL_ROOT:[perl_ext]): - first enable DCL extended file specifications SSV015_BNICI_> set proc/parse_style=extended (overwrite the default "traditional") (check with pipe sh proc/all | sear sys$input parse) perl Makefile.PL mms <== ok mms test <== failed SSV015_BNICI_> mms test MCR dkb100:[csws211.perl5_8_6]perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(0, '[.blib.lib]', '[.blib.arch]')" t/*.t t/basic.... Can't locate VMS/Device.pm in @INC (@INC contains: . perl_root:[lib.VMS_AXP.5_8_6] perl_root:[lib] perl_root:[lib.site_perl.VMS_AXP] perl_root:[lib.site_perl] /perl_root/lib/site_perl .) at t/basic.t line 11. BEGIN failed--compilation aborted at t/basic.t line 11. %SYSTEM-W-NOSUCHFILE, no such file dubious Test returned status 2320 (wstat 256, 0x100) (VMS status is 2320) DIED. FAILED test 1 Failed 1/1 tests, 0.00% okay Failed Test Stat Wstat Total Fail Failed List of Failed ------------------------------------------------------------------------------- t/basic.t 232 256 1 1 100.00% 1 Failed 1/1 test scripts, 0.00% okay. 1/1 subtests failed, 0.00% okay. %SYSTEM-W-NOSUCHFILE, no such file %MMS-F-ABORT, For target test_dynamic, CLI returned abort status: %X00000910. -SYSTEM-W-NOSUCHFILE, no such file mms install SSV015_BNICI_> mms install Installing perl_root:[lib.site_perl.VMS_AXP.auto.vms.device]device.bs Installing perl_root:[lib.site_perl.VMS_AXP.auto.vms.device]device.olb Installing perl_root:[lib.site_perl.VMS_AXP.auto.vms.device]device.opt Installing perl_root:[lib.site_perl.VMS_AXP.auto.vms.device]extralibs.ld Installing perl_root:[lib.site_perl.VMS_AXP.auto.vms.device]pl_vms__device.exe Files found in [.blib.arch]: installing files in [.blib.lib] into architecture dependent library tree Installing perl_root:[lib.site_perl.VMS_AXP.auto.vms.device]autosplit.ix Installing perl_root:[lib.site_perl.VMS_AXP.vms]device.pm Writing perl_root:[lib.site_perl.VMS_AXP.auto.VMS.Device].packlist Appending installation info to perl_root:[lib.VMS_AXP.5_8_6]perllocal.pod Try the test program SSV015_BNICI_> perl VMS_DEVICE_TEST.PL DISK '_SSV015$DKB0:' found: ACPPID: 0 ... Total free is 14622192. => it worked properly!!