This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
When FETCHSIZE returns <0 perl segfaults
[perl5.git] / README.vms
1 If you read this file _as_is_, just ignore the equal signs on the left.
2 This file is written in the POD format (see [.POD]PERLPOD.POD;1) which is
3 specially designed to be readable as is.
4
5 =head1 NAME
6
7 README.vms - Configuring, building, testing, and installing perl on VMS
8
9 =head1 SYNOPSIS
10
11 To configure, build, test, and install perl on VMS:
12
13     @ Configure
14     mms
15     mms test
16     mms install
17
18 mmk may be used in place of mms in the last three steps.
19
20 =head1 DESCRIPTION
21
22 =head2 Important safety tip
23
24 The build and install procedures have changed significantly from the 5.004
25 releases!  Make sure you read the "Configuring the Perl Build", "Building 
26 Perl", and "Installing Perl" sections of this document before you build or 
27 install.  Also please note other changes in the current release by having
28 a look at L<perldelta/VMS>.
29
30 Also note that, as of Perl version 5.005 and later, an ANSI C compliant 
31 compiler is required to build Perl.  VAX C is *not* ANSI compliant, as it 
32 died a natural death some time before the standard was set.  Therefore 
33 VAX C will not compile Perl 5.005 or later.  We are sorry about that.
34
35 There have been no recent reports of builds using Gnu C, but latent
36 (and most likely outdated) support for it is still present in various
37 parts of the sources.  Currently the HP (formerly Compaq, and even 
38 more formerly DEC) C compiler is the only viable alternative for
39 building Perl.
40
41 There is minimal support for HP C++ but this support is not complete;
42 if you get it working please write to the vmsperl list (for info see
43 L</"Mailing Lists">).
44
45
46 =head2 Introduction to Perl on VMS
47
48 The VMS port of Perl is as functionally complete as any other Perl port
49 (and as complete as the ports on some Unix systems). The Perl binaries
50 provide all the Perl system calls that are either available under VMS or
51 reasonably emulated. There are some incompatibilities in process handling
52 (e.g. the fork/exec model for creating subprocesses doesn't do what you
53 might expect under Unix), mainly because VMS and Unix handle processes and
54 sub-processes very differently.
55
56 There are still some unimplemented system functions, and of course we
57 could use modules implementing useful VMS system services, so if you'd like
58 to lend a hand we'd love to have you.  Join the Perl Porting Team Now!
59
60 There are issues with various versions of DEC C, so if you're not running a
61 relatively modern version, check the "DEC C issues" section later on in this
62 document.
63
64 =head2 Other required software for Compiling Perl on VMS
65
66 In addition to VMS and DCL you will need two things:
67
68 =over 4
69
70 =item 1  A C compiler. 
71
72 HP (formerly Compaq, more formerly DEC) C for VMS (VAX, Alpha, or Itanium).
73
74 =item 2  A make tool. 
75
76 DEC's MMS (v2.6 or later), or MadGoat's free MMS
77 analog MMK (available from ftp.madgoat.com/madgoat) both work
78 just fine. Gnu Make might work, but it's been so long since
79 anyone's tested it that we're not sure.  MMK is free though, so
80 go ahead and use that.
81
82 =back
83
84 =head2 Additional software that is optional for Perl on VMS
85
86 You may also want to have on hand:
87
88 =over 4
89
90 =item 1  GUNZIP/GZIP.EXE for VMS 
91
92 A de-compressor for *.gz and *.tgz files available from a number 
93 of web/ftp sites and is distributed on the OpenVMS Freeware CD-ROM 
94 from HP.
95
96     http://www.hp.com/go/openvms/freeware/
97     http://www.crinoid.com/utils/
98
99 =item 2  VMS TAR 
100
101 For reading and writing unix tape archives (*.tar files).  Vmstar is also 
102 available from a number of web/ftp sites and is distributed on the OpenVMS
103 Freeware CD-ROM from HP.
104
105     http://www.hp.com/go/openvms/freeware/
106
107 Recent versions of VMS tar on ODS-5 volumes may extract tape archive
108 files with ^. escaped periods in them.  See below for further workarounds.
109
110 A port of GNU tar is also available as part of the GNV package:
111
112     http://gnv.sourceforge.net/
113
114 =item 3  UNZIP.EXE for VMS
115
116 A combination decompressor and archive reader/writer for *.zip files.  
117 Unzip is available from a number of web/ftp sites.
118
119     http://www.info-zip.org/UnZip.html
120     http://www.hp.com/go/openvms/freeware/
121     ftp://ftp.hp.com/pub/openvms
122     ftp://ftp.madgoat.com/madgoat/
123     ftp://ftp.process.com/vms-freeware/fileserv
124
125 =item 4  MOST
126
127 Most is an optional pager that is convenient to use with perldoc (unlike 
128 TYPE/PAGE, MOST can go forward and backwards in a document and supports 
129 regular expression searching).  Most builds with the slang 
130 library on VMS.  Most and slang are available from:
131
132     ftp://space.mit.edu/pub/davis/
133     ftp://ftp.process.com/vms-freeware/narnia/
134
135 =item 5 GNU PATCH and DIFFUTILS for VMS
136
137 Patches to Perl are usually distributed as GNU unified or contextual diffs. 
138 Such patches are created by the GNU diff program (part of the diffutils
139 distribution) and applied with GNU patch.  VMS ports of these utilities are
140 available here:
141
142     http://www.crinoid.com/utils/
143     http://www.hp.com/go/openvms/freeware/
144
145 =back
146
147 Please note that UNZIP and GUNZIP are not the same thing (they work with
148 different formats).  Many of the useful files from CPAN (the Comprehensive
149 Perl Archive Network) are in *.tar.gz or *.tgz format (this includes copies 
150 of the source code for perl as well as modules and scripts that you may 
151 wish to add later) hence you probably want to have GUNZIP.EXE and 
152 VMSTAR.EXE on your VMS machine.
153
154 If you want to include socket support, you'll need a TCP/IP stack and either
155 DEC C, or socket libraries.  See the "Socket Support (optional)" topic 
156 for more details.
157
158 =head1 Unpacking the Perl source code
159
160 You may need to set up a foreign symbol for the unpacking utility of choice.
161
162 If you unpack a perl source kit with a name containing multiple periods on
163 an ODS-5 volume using recent versions of vmstar (e.g. V3.4 or later) you may
164 need to be especially careful in unpacking the tape archive file.  Try to use
165 the ODS-2 compatability qualifiers such as:
166
167     vmstar /extract/verbose/ods2 perl-V^.VIII^.III.tar
168
169 or:
170
171     vmstar -xvof perl-5^.8^.3.tar
172
173 If you neglected to use the /ODS2 qualifier or the -o switch then you
174 could rename the source directory:
175
176     set security/protection=(o:rwed) perl-5^.8^.3.dir
177     rename perl-5^.8^.3.dir perl-5_8_3.dir
178
179 Perl on VMS as of 5.8.3 does not completely handle extended file
180 parse styles such as are encountered on ODS-5.  While it can be built,
181 installed, and run on ODS-5 filesystems; it may encounter
182 trouble with characters that are otherwise illegal on ODS-2
183 volumes (notably the ^. escaped period sequence).
184
185 =head1 Configuring the Perl build
186
187 To configure perl (a necessary first step), issue the command
188
189    @ Configure
190
191 from the top of an unpacked perl source directory.  You will be asked a 
192 series of questions, and the answers to them (along with the capabilities 
193 of your C compiler and network stack) will determine how perl is custom 
194 built for your machine.
195
196 If you have multiple C compilers installed, you'll have your choice of
197 which one to use.  Various older versions of DEC C had some caveats, so if
198 you're using a version older than 5.2, check the "DEC C Issues" section.
199
200 If you have any symbols or logical names in your environment that may 
201 interfere with the build or regression testing of perl then configure.com 
202 will try to warn you about them.  If a logical name is causing
203 you trouble but is in an LNM table that you do not have write access to
204 then try defining your own to a harmless equivalence string in a table 
205 such that it is resolved before the other (e.g. if TMP is defined in the
206 SYSTEM table then try DEFINE TMP "NL:" or somesuch in your process table) 
207 otherwise simply deassign the dangerous logical names.  The potentially 
208 troublesome logicals and symbols are:
209
210     COMP    "LOGICAL"
211     EXT     "LOGICAL"
212     FOO     "LOGICAL"
213     LIB     "LOGICAL"
214     LIST    "LOGICAL"
215     MIME    "LOGICAL"
216     POSIX   "LOGICAL"
217     SYS     "LOGICAL"
218     T       "LOGICAL"
219     THREAD  "LOGICAL"
220     THREADS "LOGICAL"
221     TIME    "LOGICAL"
222     TMP     "LOGICAL"
223     UNICODE "LOGICAL"
224     UTIL    "LOGICAL"
225     TEST    "SYMBOL"
226
227 As a handy shortcut, the command:
228
229     @ Configure "-des"
230
231 (note the quotation marks and case) will choose reasonable defaults 
232 automatically (it takes DEC C over Gnu C, DEC C sockets over SOCKETSHR 
233 sockets, and either over no sockets).  Some options can be given
234 explicitly on the command line; the following example specifies a 
235 non-default location for where Perl will be installed:
236
237     @ Configure "-d" "-Dprefix=dka100:[utils.perl5.]"
238
239 Note that the installation location would be by default where you unpacked 
240 the source with a "_ROOT." appended.  For example if you unpacked the perl 
241 source into:
242
243    DKA200:[PERL-5_10_2...]
244
245 Then the PERL_SETUP.COM that gets written out by CONFIGURE.COM will
246 try to DEFINE your installation PERL_ROOT to be:
247
248    DKA200:[PERL-5_10_2_ROOT.]
249
250 More help with configure.com is available from:
251
252     @ Configure "-h"
253
254 See the "Changing compile-time options (optional)" section below to learn
255 even more details about how to influence the outcome of the important 
256 configuration step.  If you find yourself reconfiguring and rebuilding 
257 then be sure to also follow the advice in the "Cleaning up and starting 
258 fresh (optional)" and the checklist of items in the "CAVEATS" sections 
259 below.
260
261 =head2 Changing compile-time options (optional) for Perl on VMS
262
263 Most of the user definable features of Perl are enabled or disabled in
264 configure.com, which processes the hints file config_h.SH.  There is
265 code in there to Do The Right Thing, but that  may end up being the
266 wrong thing for you.  Make sure you understand what you are doing since
267 inappropriate changes to configure.com or config_h.SH can render perl 
268 unbuildable; odds are that there's nothing in there you'll need to
269 change.
270
271 The one exception is the various *DIR install locations. Changing those
272 requires changes in genconfig.pl as well.  Be really careful if you need to
273 change these, as they can cause some fairly subtle problems.
274
275 =head2 Socket Support (optional) for Perl on VMS
276
277 Perl includes a number of functions for IP sockets, which are available if
278 you choose to compile Perl with socket support.  Since IP networking is an 
279 optional addition to VMS, there are several different IP stacks available.  
280 How well integrated they are into the system depends on the stack, your 
281 version of VMS, and the version of your C compiler.
282
283 The most portable solution uses the SOCKETSHR library. In combination with
284 either UCX or NetLib, this supports all the major TCP stacks (Multinet,
285 Pathways, TCPWare, UCX, and CMU) on all versions of VMS Perl runs on, with
286 all the compilers on both VAX and Alpha. The socket interface is also
287 consistent across versions of VMS and C compilers. It has a problem with
288 UDP sockets when used with Multinet, though, so you should be aware of
289 that.
290
291 The other solution available is to use the socket routines built into DEC
292 C. Which routines are available depend on the version of VMS you're
293 running, and require proper UCX emulation by your TCP/IP vendor.
294 Relatively current versions of Multinet, TCPWare, Pathway, and UCX all
295 provide the required libraries--check your manuals or release notes to see
296 if your version is new enough.
297
298 =head1 Building Perl
299
300 The configuration script will print out, at the very end, the MMS or MMK
301 command you need to compile perl.  Issue it (exactly as printed) to start
302 the build.  
303
304 Once you issue your MMS or MMK command, sit back and wait.  Perl should 
305 compile and link without a problem.  If a problem does occur check the 
306 "CAVEATS" section of this document.  If that does not help send some 
307 mail to the VMSPERL mailing list.  Instructions are in the "Mailing Lists" 
308 section of this document.
309
310 =head1 Testing Perl
311
312 Once Perl has built cleanly you need to test it to make sure things work.
313 This step is very important since there are always things that can go wrong
314 somehow and yield a dysfunctional Perl for you.
315
316 Testing is very easy, though, as there's a full test suite in the perl
317 distribution.  To run the tests, enter the *exact* MMS line you used to
318 compile Perl and add the word "test" to the end, like this:
319
320 If the compile command was:
321
322     MMS
323
324 then the test command ought to be:
325
326     MMS test
327
328 MMS (or MMK) will run all the tests.  This may take some time, as there are 
329 a lot of tests.  If any tests fail, there will be a note made on-screen. 
330 At the end of all the tests, a summary of the tests, the number passed and 
331 failed, and the time taken will be displayed.
332
333 The test driver invoked via MMS TEST has a DCL wrapper ([.VMS]TEST.COM) that
334 downgrades privileges to NETMBX, TMPMBX for the duration of the test run,
335 and then restores them to their prior state upon completion of testing. 
336 This is done to ensure that the tests run in a private sandbox and can do no
337 harm to your system even in the unlikely event something goes badly wrong in
338 one of the test scripts while running the tests from a privileged account. 
339 A side effect of this safety precaution is that the account used to run the
340 test suite must be the owner of the directory tree in which Perl has been
341 built; otherwise the manipulations of temporary files and directories
342 attempted by some of the tests will fail.
343
344 If any tests fail, it means something is wrong with Perl. If the test suite
345 hangs (some tests can take upwards of two or three minutes, or more if
346 you're on an especially slow machine, depending on your machine speed, so
347 don't be hasty), then the test *after* the last one displayed failed. Don't
348 install Perl unless you're confident that you're OK. Regardless of how
349 confident you are, make a bug report to the VMSPerl mailing list.
350
351 If one or more tests fail, you can get more information on the failure by 
352 issuing this command sequence:
353
354     @ [.VMS]TEST .typ "" "-v" [.subdir]test.T
355
356 where ".typ" is the file type of the Perl images you just built (if you
357 didn't do anything special, use .EXE), and "[.subdir]test.T" is the test
358 that failed. For example, with a normal Perl build, if the test indicated
359 that t/op/time failed, then you'd do this:
360
361     @ [.VMS]TEST .EXE "" "-v" [.OP]TIME.T
362
363 Note that test names are reported in UNIX syntax and relative to the
364 top-level build directory.  When supplying them individually to the test
365 driver, you can use either UNIX or VMS syntax, but you must give the path
366 relative to the [.T] directory and you must also add the .T extension to the
367 filename.  So, for example if the test lib/Math/Trig fails, you would run:
368
369     @ [.VMS]TEST .EXE "" -"v" [-.lib.math]trig.t
370
371 When you send in a bug report for failed tests, please include the output
372 from this command, which is run from the main source directory:
373
374     MCR []MINIPERL "-V"
375
376 Note that -"V" really is a capital V in double quotes. This will dump out a
377 couple of screens worth of configuration information, and can help us 
378 diagnose the problem.  If (and only if) that did not work then try enclosing 
379 the output of:
380
381     MMS printconfig
382
383 If (and only if) that did not work then try enclosing the output of:
384
385     @ [.vms]myconfig
386
387 You may also be asked to provide your C compiler version ("CC/VERSION NL:" 
388 with DEC C, "gcc --version" with GNU CC).  To obtain the version of MMS or 
389 MMK you are running try "MMS/ident" or "MMK /ident".  The GNU make version 
390 can be identified with "make --version".
391
392 =head2 Cleaning up and starting fresh (optional) installing Perl on VMS
393
394 If you need to recompile from scratch, you have to make sure you clean up
395 first.  There is a procedure to do it--enter the *exact* MMS line you used 
396 to compile and add "realclean" at the end, like this:
397
398 if the compile command was:
399
400     MMS
401
402 then the cleanup command ought to be:
403
404     MMS realclean
405
406 If you do not do this things may behave erratically during the subsequent 
407 rebuild attempt.  They might not, too, so it is best to be sure and do it.
408
409 =head1 Installing Perl
410
411 There are several steps you need to take to get Perl installed and
412 running.
413
414 =over 4
415
416 =item 1
417
418 Check your default file protections with
419
420      SHOW PROTECTION /DEFAULT
421
422 and adjust if necessary with SET PROTECTION=(code)/DEFAULT.
423
424 =item 2
425
426 Decide where you want Perl to be installed (unless you have already done so
427 by using the "prefix" configuration parameter -- see the example in the
428 "Configuring the Perl build" section).
429
430 The DCL script PERL_SETUP.COM that is written by CONFIGURE.COM will help you
431 with the definition of the PERL_ROOT and PERLSHR logical names and the PERL
432 foreign command  symbol.  Take a look at PERL_SETUP.COM and modify it if you
433 want to.  The installation process will execute PERL_SETUP.COM and copy
434 files to the directory tree pointed to by the PERL_ROOT logical name defined
435 there, so make sure that you have write access to the parent directory of
436 what will become the root of your Perl installation.
437
438 =item 3
439
440 Run the install script via:
441
442     MMS install
443
444 or
445
446     MMK install
447
448 If for some reason it complains about target INSTALL being up to date,
449 throw a /FORCE switch on the MMS or MMK command.
450
451 =back
452
453 Copy PERL_SETUP.COM to a place accessible to your perl users.  
454
455 For example:
456
457     COPY PERL_SETUP.COM SYS$LIBRARY: 
458
459 If you want to have everyone on the system have access to perl
460 then add a line that reads
461
462     $ @sys$library:perl_setup
463
464 to SYS$MANAGER:SYLOGIN.COM.
465
466 Two alternatives to the foreign symbol would be to install PERL into 
467 DCLTABLES.EXE (Check out the section "Installing Perl into DCLTABLES 
468 (optional)" for more information), or put the image in a 
469 directory that's in your DCL$PATH (if you're using VMS V6.2 or higher).
470
471 An alternative to having PERL_SETUP.COM define the PERLSHR logical name
472 is to simply copy it into the system shareable library directory with:
473
474     copy perl_root:[000000]perlshr.exe sys$share:
475
476 See also the "INSTALLing images (optional)" section.
477
478 =head2 Installing Perl into DCLTABLES (optional) on VMS
479
480 Execute the following command file to define PERL as a DCL command.
481 You'll need CMKRNL privilege to install the new dcltables.exe.
482
483     $ create perl.cld
484     !
485     ! modify to reflect location of your perl.exe
486     !
487     define verb perl
488       image perl_root:[000000]perl.exe
489       cliflags (foreign)
490     $!
491     $ set command perl /table=sys$common:[syslib]dcltables.exe -
492      /output=sys$common:[syslib]dcltables.exe
493     $ install replace sys$common:[syslib]dcltables.exe
494     $ exit
495
496 =head2 INSTALLing Perl images (optional) on VMS
497
498 On systems that are using perl quite a bit, and particularly those with 
499 minimal RAM, you can boost the performance of perl by INSTALLing it as
500 a known image.  PERLSHR.EXE is typically larger than 3000 blocks
501 and that is a reasonably large amount of IO to load each time perl is 
502 invoked. 
503
504    INSTALL ADD PERLSHR/SHARE
505    INSTALL ADD PERL/HEADER
506
507 should be enough for PERLSHR.EXE (/share implies /header and /open), 
508 while /HEADER should do for PERL.EXE (perl.exe is not a shared image).
509
510 If your code 'use's modules, check to see if there is a shareable image for
511 them, too.  In the base perl build, POSIX, IO, Fcntl, Opcode, SDBM_File,
512 DCLsym, and Stdio, and other extensions all have shared images that can be
513 installed /SHARE.
514
515 How much of a win depends on your memory situation, but if you are firing
516 off perl with any regularity (like more than once every 20 seconds or so)
517 it is probably beneficial to INSTALL at least portions of perl.
518
519 While there is code in perl to remove privileges as it runs you are advised
520 to NOT INSTALL PERL.EXE with PRIVs!
521
522 =head2 Running h2ph to create perl header files (optional) on VMS
523
524 If using HP C, ensure that you have extracted loose versions of your 
525 compiler's header or *.H files.  Be sure to check the contents of:
526
527     SYS$LIBRARY:DECC$RTLDEF.TLB
528     SYS$LIBRARY:SYS$LIB_C.TLB
529     SYS$LIBRARY:SYS$STARLET_C.TLB
530
531 etcetera.
532
533 If using GNU cc then also check your GNU_CC:[000000...] tree for the locations
534 of the GNU cc headers.
535
536 =head1 Reporting Bugs
537
538 If you come across what you think might be a bug in Perl, please report
539 it. There's a script in PERL_ROOT:[UTILS], perlbug, that walks you through
540 the process of creating a bug report. This script includes details of your
541 installation, and is very handy. Completed bug reports should go to
542 perlbug@perl.com.
543
544 =head1 CAVEATS
545
546 Probably the single biggest gotcha in compiling Perl is giving the wrong
547 switches to MMS/MMK when you build. Use *exactly* what the configure.com 
548 script prints!
549
550 The next big gotcha is directory depth.  Perl can create directories four,
551 five, or even six levels deep during the build, so you don't have to be 
552 too deep to start to hit the RMS 8 level limit (for ODS 2 volumes which were
553 common on versions of VMS prior to V7.2 and even with V7.2 on the VAX).  
554 It is best to do:
555
556     DEFINE/TRANS=(CONC,TERM) PERLSRC "disk:[dir.dir.dir.perldir.]"
557     SET DEFAULT PERLSRC:[000000]
558
559 before building in cases where you have to unpack the distribution so deep
560 (note the trailing period in the definition of PERLSRC).  Perl modules 
561 from CPAN can be just as bad (or worse), so watch out for them, too. Perl's
562 configuration script will warn if it thinks you are too deep (at least on 
563 a VAX or on Alpha versions of VMS prior to 7.2).  But MakeMaker will not 
564 warn you if you start out building a module too deep in a directory.
565
566 As noted above ODS-5 escape sequences such as ^. can break the perl
567 build.  Solutions include renaming files and directories as needed or
568 being careful to use the -o switch or /ODS2 qualifier with latter
569 versions of the vmstar utility when unpacking perl or CPAN modules
570 on ODS-5 volumes.
571
572 Be sure that the process that you use to build perl has a PGFLQ greater
573 than 100000.  Be sure to have a correct local time zone to UTC offset
574 defined (in seconds) in the logical name SYS$TIMEZONE_DIFFERENTIAL before
575 running the regression test suite.  The SYS$MANAGER:UTC$CONFIGURE_TDF.COM 
576 procedure will help you set that logical for your system but may require 
577 system privileges.  For example, a location 5 hours west of UTC (such as 
578 the US East coast while not on daylight savings time) would have:
579
580     DEFINE SYS$TIMEZONE_DIFFERENTIAL "-18000"
581
582 A final thing that causes trouble is leftover pieces from a failed
583 build.  If things go wrong make sure you do a "(MMK|MMS|make) realclean"
584 before you rebuild.
585
586 =head2 DEC C issues with Perl on VMS
587
588 Note to DEC C users: Some early versions (pre-5.2, some pre-4. If you're DEC
589 C 5.x or higher, with current patches if any, you're fine) of the DECCRTL
590 contained a few bugs which affect Perl performance:
591
592 =over 4
593
594 =item - pipes
595
596 Newlines are lost on I/O through pipes, causing lines to run together.
597 This shows up as RMS RTB errors when reading from a pipe.  You can
598 work around this by having one process write data to a file, and
599 then having the other read the file, instead of the pipe.  This is
600 fixed in version 4 of DEC C.
601
602 =item - modf()
603
604 The modf() routine returns a non-integral value for some values above
605 INT_MAX; the Perl "int" operator will return a non-integral value in
606 these cases.  This is fixed in version 4 of DEC C.
607
608 =item - ALPACRT ECO
609
610 On the AXP, if SYSNAM privilege is enabled, the CRTL chdir() routine
611 changes the process default device and directory permanently, even
612 though the call specified that the change should not persist after
613 Perl exited.  This is fixed by DEC CSC patch ALPACRT04_061 or later.
614 See also:
615
616     http://ftp.support.compaq.com/patches/.new/openvms.shtml
617
618 =back
619
620 Please note that in later versions "DEC C" may also be known as 
621 "Compaq C".
622
623 =head2 GNU issues with Perl on VMS
624
625 It has been a while since the GNU utilities such as GCC or GNU make
626 were used to build perl on VMS.  Hence they may require a great deal
627 of source code modification to work again.
628
629     http://slacvx.slac.stanford.edu/HELP/GCC
630     http://www.progis.de/
631     http://www.lp.se/products/gnu.html
632
633 =head2 Floating Point Considerations
634
635 Prior to 5.8.0, Perl simply accepted the default floating point options of the
636 C compiler, namely representing doubles with D_FLOAT on VAX and G_FLOAT on
637 Alpha.  Single precision floating point values are represented in F_FLOAT
638 format when either D_FLOAT or G_FLOAT is in use for doubles.  Beginning with
639 5.8.0, Alpha builds now use IEEE floating point formats by default, which in
640 VMS parlance are S_FLOAT for singles and T_FLOAT for doubles.  IEEE is not
641 available on VAX, so F_FLOAT and D_FLOAT remain the defaults for singles and
642 doubles respectively.  The available non-default options are G_FLOAT on VAX
643 and D_FLOAT or G_FLOAT on Alpha.
644
645 The use of IEEE on Alpha introduces NaN, infinity, and denormalization
646 capabilities not available with D_FLOAT and G_FLOAT.  When using one of those
647 non-IEEE formats, silent underflow and overflow are emulated in the conversion
648 of strings to numbers, but it is preferable to get the real thing by using
649 IEEE where possible.
650
651 Regardless of what floating point format you consider preferable, be aware
652 that the choice may have an impact on compatibility with external libraries,
653 such as database interfaces, and with existing data, such as data created with
654 the C<pack> function and written to disk, or data stored via the Storable
655 extension.  For example, a C<pack("d", $foo)")> will create a D_FLOAT,
656 G_FLOAT, or T_FLOAT depending on what your Perl was configured with.  When
657 written to disk, the value can only be retrieved later by a Perl configured
658 with the same floating point option that was in effect when it was created.
659
660 To obtain a non-IEEE build on Alpha, simply answer no to the "Use IEEE math?"
661 question during the configuration.  To obtain an option different from the C
662 compiler default on either VAX or Alpha, put in the option that you want in
663 answer to the "Any additional cc flags?" question.  For example, to obtain a
664 G_FLOAT build on VAX, put in C</FLOAT=G_FLOAT>.
665
666 =head2 Multinet issues with Perl on VMS
667
668 Prior to the release of Perl 5.8.0 it was noted that the regression
669 test for lib/Net/hostent (in file [.lib.Net]hostent.t) will fail owing
670 to problems with the hostent structure returned by C calls to either
671 gethostbyname() or gethostbyaddr() using DEC or Compaq C with a
672 Multinet TCP/IP stack.  The problem was noted in Multinet 4.3A
673 using either Compaq C 6.5 or DEC C 6.0, and with Multinet 4.2A
674 using DEC C 5.2, but could easily affect other versions of Multinet.
675 Process Software Inc. has acknowledged a bug in the Multinet version 
676 of UCX$IPC_SHR and has provided an ECO for it. The ECO is called
677 UCX_LIBRARY_EMULATION-010_A044 and is available from:
678
679     http://www.multinet.process.com/eco.html
680
681 As of this writing, the ECO is only available for Multinet versions 
682 4.3A and later.  You may determine the version of Multinet that you 
683 are running using the command:
684
685     multinet show /version
686
687 from the DCL command prompt.
688
689 If the ECO is unavailable for your version of Multinet and you are 
690 unable to upgrade, you might try using Perl programming constructs 
691 such as:
692
693     $address = substr($gethostbyname_addr,0,4);
694
695 to temporarily work around the problem, or if you are brave
696 and do not mind the possibility of breaking IPv6 addresses,
697 you might modify the pp_sys.c file to add an ad-hoc correction
698 like so:
699
700
701     --- pp_sys.c;1        Thu May 30 14:42:17 2002
702     +++ pp_sys.c        Thu May 30 12:54:02 2002
703     @@ -4684,6 +4684,10 @@
704              }
705      #endif
706
707     +    if (hent) {
708     +        hent->h_length = 4;
709     +    }
710     +
711          if (GIMME != G_ARRAY) {
712              PUSHs(sv = sv_newmortal());
713              if (hent) {
714
715 then re-compile and re-test your perl.  After the installation
716 of the Multinet ECO you ought to back out any such changes though.
717
718 =head1 Mailing Lists
719
720 There are several mailing lists available to the Perl porter.  For VMS
721 specific issues (including both Perl questions and installation problems)
722 there is the VMSPERL mailing list.  It is usually a low-volume (10-12
723 messages a week) mailing list.
724
725 To subscribe, send a mail message to VMSPERL-SUBSCRIBE@PERL.ORG. The VMSPERL
726 mailing list address is VMSPERL@PERL.ORG.  Any mail sent there gets echoed
727 to all subscribers of the list.  There is a searchable archive of the list
728 on the web at:
729
730     http://www.xray.mpe.mpg.de/mailing-lists/vmsperl/
731
732 To unsubscribe from VMSPERL send a message to VMSPERL-UNSUBSCRIBE@PERL.ORG.
733 Be sure to do so from the subscribed account that you are canceling.
734
735 =head2 Web sites for Perl on VMS
736
737 Vmsperl pages on the web include:
738
739     http://www.sidhe.org/vmsperl/index.html
740     http://www.crinoid.com/
741     http://duphy4.physics.drexel.edu/pub/cgi_info.htmlx
742     http://www.cpan.org/modules/by-module/VMS/
743     http://www.xray.mpe.mpg.de/mailing-lists/vmsperl/
744     http://www.best.com/~pvhp/vms/
745     http://www-ang.kfunigraz.ac.at/~binder/perl.html
746     http://lists.perl.org/showlist.cgi?name=vmsperl
747     http://archive.develooper.com/vmsperl@perl.org/
748     http://h71000.www7.hp.com/openvms/products/ips/apache/csws_modperl.html
749
750 =head1 SEE ALSO
751
752 Perl information for users and programmers about the port of perl to VMS is
753 available from the [.VMS]PERLVMS.POD file that gets installed as L<perlvms>.
754 For administrators the perlvms document also includes a detailed discussion 
755 of extending vmsperl with CPAN modules after Perl has been installed.
756
757 =head1 AUTHORS
758
759 Revised 10-October-2001 by Craig Berry craigberry@mac.com.  
760 Revised 25-February-2000 by Peter Prymmer pvhp@best.com.  
761 Revised 27-October-1999 by Craig Berry craigberry@mac.com.  
762 Revised 01-March-1999 by Dan Sugalski dan@sidhe.org.  
763 Originally by Charles Bailey bailey@newman.upenn.edu.
764
765 =head1 ACKNOWLEDGEMENTS
766
767 A real big thanks needs to go to Charles Bailey
768 bailey@newman.upenn.edu, who is ultimately responsible for Perl 5.004
769 running on VMS. Without him, nothing the rest of us have done would be at
770 all important.
771
772 There are, of course, far too many people involved in the porting and testing
773 of Perl to mention everyone who deserves it, so please forgive us if we've
774 missed someone.  That said, special thanks are due to the following:
775
776   Tim Adye T.J.Adye@rl.ac.uk
777      for the VMS emulations of getpw*()
778   David Denholm denholm@conmat.phys.soton.ac.uk
779      for extensive testing and provision of pipe and SocketShr code,
780   Mark Pizzolato mark@infocomm.com
781      for the getredirection() code
782   Rich Salz rsalz@bbn.com
783      for readdir() and related routines
784   Peter Prymmer pvhp@best.com 
785      for extensive testing, as well as development work on
786      configuration and documentation for VMS Perl,
787   Dan Sugalski dan@sidhe.org
788      for extensive contributions to recent version support,
789      development of VMS-specific extensions, and dissemination
790      of information about VMS Perl,
791   the Stanford Synchrotron Radiation Laboratory and the
792      Laboratory of Nuclear Studies at Cornell University for
793      the opportunity to test and develop for the AXP,
794   John Hasstedt John.Hasstedt@sunysb.edu
795      for VAX VMS V7.2 support
796
797 and to the entire VMSperl group for useful advice and suggestions.  In
798 addition the perl5-porters deserve credit for their creativity and
799 willingness to work with the VMS newcomers.  Finally, the greatest debt of
800 gratitude is due to Larry Wall larry@wall.org, for having the ideas which
801 have made our sleepless nights possible.
802
803 Thanks,
804 The VMSperl group
805
806 =cut
807