Typo squad.
[p5sagit/p5-mst-13.2.git] / pod / perldelta.pod
1 =head1 NAME
2
3 perldelta - what is new for perl v5.8.0
4
5 =head1 DESCRIPTION
6
7 This document describes differences between the 5.6.0 release
8 and the 5.8.0 release.
9
10 Many of the bug fixes in 5.8.0 were already seen in the 5.6.1
11 maintenance release since the two releases were kept closely
12 coordinated.
13
14 If you are upgrading from Perl 5.005_03, you might also want
15 to read L<perl56delta>.
16
17 =head1 Highlights In 5.8.0
18
19 =over 4
20
21 =item *
22
23 Better Unicode support
24
25 =item *
26
27 New Thread Implementation
28
29 =item *
30
31 Many New Modules
32
33 =item *
34
35 Better Numeric Accuracy
36
37 =item *
38
39 Safe Signals
40
41 =item *
42
43 More Extensive Regression Testing
44
45 =back
46
47 =head1 Incompatible Changes
48
49 =head2 Binary Incompatibility
50
51 B<Perl 5.8 is not binary compatible with earlier releases of Perl.>
52
53 B<You have to recompile your XS modules.>
54
55 (Pure Perl modules should continue to work.)
56
57 The major reason for the discontinuity is the new IO architecture
58 called PerlIO.  PerlIO is the default configuration because
59 without it many new features of Perl 5.8 cannot be used.  In other
60 words: you just have to recompile your modules, sorry about that.
61
62 In future releases of Perl, non-PerlIO aware XS modules may become
63 completely unsupported.  This shouldn't be too difficult for module
64 authors, however: PerlIO has been designed as a drop-in replacement
65 (at the source code level) for the stdio interface.
66
67 Depending on your platform, there are also other reasons why
68 we decided to break binary compatibility, please read on. 
69
70 =head2 64-bit platforms and malloc
71
72 If your pointers are 64 bits wide, the Perl malloc is no longer being
73 used because it does not work well with 8-byte pointers.  Also,
74 usually the system mallocs on such platforms are much better optimized
75 for such large memory models than the Perl malloc.  Some memory-hungry
76 Perl applications like the PDL don't work well with Perl's malloc.
77 Finally, other applications than Perl (like modperl) tend to prefer
78 the system malloc.  Such platforms include Alpha and 64-bit HPPA,
79 MIPS, PPC, and Sparc.
80
81 =head2 AIX Dynaloading
82
83 The AIX dynaloading now uses in AIX releases 4.3 and newer the native
84 dlopen interface of AIX instead of the old emulated interface.  This
85 change will probably break backward compatibility with compiled
86 modules.  The change was made to make Perl more compliant with other
87 applications like modperl which are using the AIX native interface.
88
89 =head2 Attributes for C<my> variables now handled at run-time.
90
91 The C<my EXPR : ATTRS> syntax now applies variable attributes at
92 run-time.  (Subroutine and C<our> variables still get attributes applied
93 at compile-time.)  See L<attributes> for additional details.  In particular,
94 however, this allows variable attributes to be useful for C<tie> interfaces,
95 which was a deficiency of earlier releases.  Note that the new semantics
96 doesn't work with the Attribute::Handlers module (as of version 0.76).
97
98 =head2 Socket Extension Dynamic in VMS
99
100 The Socket extension is now dynamically loaded instead of being
101 statically built in.  This may or may not be a problem with ancient
102 TCP/IP stacks of VMS: we do not know since we weren't able to test
103 Perl in such configurations.
104
105 =head2 IEEE-format Floating Point Default on OpenVMS Alpha
106
107 Perl now uses IEEE format (T_FLOAT) as the default internal floating
108 point format on OpenVMS Alpha, potentially breaking binary compatibility
109 with external libraries or existing data.  G_FLOAT is still available as
110 a configuration option.  The default on VAX (D_FLOAT) has not changed.
111
112 =head2 New Unicode Properties
113
114 Unicode I<scripts> are now supported. Scripts are similar to (and superior
115 to) Unicode I<blocks>. The difference between scripts and blocks is that
116 scripts are the glyphs used by a language or a group of languages, while
117 the blocks are more artificial groupings of (mostly) 256 characters based
118 on the Unicode numbering.
119
120 In general, scripts are more inclusive, but not universally so. For
121 example, while the script C<Latin> includes all the Latin characters and
122 their various diacritic-adorned versions, it does not include the various
123 punctuation or digits (since they are not solely C<Latin>).
124
125 A number of other properties are now supported, including C<\p{L&}>,
126 C<\p{Any}> C<\p{Assigned}>, C<\p{Unassigned}>, C<\p{Blank}> and
127 C<\p{SpacePerl}> (along with their C<\P{...}> versions, of course).
128 See L<perlunicode> for details, and more additions.
129
130 The C<In> or C<Is> prefix to names used with the C<\p{...}> and C<\P{...}>
131 are now almost always optional. The only exception is that a C<In> prefix
132 is required to signify a Unicode block when a block name conflicts with a
133 script name. For example, C<\p{Tibetan}> refers to the script, while
134 C<\p{InTibetan}> refers to the block. When there is no name conflict, you
135 can omit the C<In> from the block name (e.g. C<\p{BraillePatterns}>), but
136 to be safe, it's probably best to always use the C<In>).
137
138 =head2 REF(...) Instead Of SCALAR(...)
139
140 A reference to a reference now stringifies as "REF(0x81485ec)" instead
141 of "SCALAR(0x81485ec)" in order to be more consistent with the return
142 value of ref().
143
144 =head2 pack/unpack D/F recycled
145
146 The undocumented pack/unpack template letters D/F have been recycled
147 for better use: now they stand for long double (if supported by the
148 platform) and NV (Perl internal floating point type).  (They used
149 to be aliases for d/f, but you never knew that.)
150
151 =head2 Deprecations
152
153 =over 4
154
155 =item *
156
157 The semantics of bless(REF, REF) were unclear and until someone proves
158 it to make some sense, it is forbidden.
159
160 =item *
161
162 The obsolete chat2 library that should never have been allowed
163 to escape the laboratory has been decommissioned.
164
165 =item *
166
167 The builtin dump() function has probably outlived most of its
168 usefulness.  The core-dumping functionality will remain in future
169 available as an explicit call to C<CORE::dump()>, but in future
170 releases the behaviour of an unqualified C<dump()> call may change.
171
172 =item *
173
174 The very dusty examples in the eg/ directory have been removed.
175 Suggestions for new shiny examples welcome but the main issue is that
176 the examples need to be documented, tested and (most importantly)
177 maintained.
178
179 =item *
180
181 The (bogus) escape sequences \8 and \9 now give an optional warning
182 ("Unrecognized escape passed through").  There is no need to \-escape
183 any C<\w> character.
184
185 =item *
186
187 The list of filenames from glob() (or <...>) is now by default sorted
188 alphabetically to be csh-compliant (which is what happened before
189 in most UNIX platforms).  (bsd_glob() does still sort platform
190 natively, ASCII or EBCDIC, unless GLOB_ALPHASORT is specified.)
191
192 =item *
193
194 Spurious syntax errors generated in certain situations, when glob()
195 caused File::Glob to be loaded for the first time, have been fixed.
196
197 =item *
198
199 Although "you shouldn't do that", it was possible to write code that
200 depends on Perl's hashed key order (Data::Dumper does this).  The new
201 algorithm "One-at-a-Time" produces a different hashed key order.
202 More details are in L</"Performance Enhancements">.
203
204 =item *
205
206 lstat(FILEHANDLE) now gives a warning because the operation makes no sense.
207 In future releases this may become a fatal error.
208
209 =item *
210
211 The C<package;> syntax (C<package> without an argument) has been
212 deprecated.  Its semantics were never that clear and its
213 implementation even less so.  If you have used that feature to
214 disallow all but fully qualified variables, C<use strict;> instead.
215
216 =item *
217
218 The unimplemented POSIX regex features [[.cc.]] and [[=c=]] are still
219 recognised but now cause fatal errors.  The previous behaviour of
220 ignoring them by default and warning if requested was unacceptable
221 since it, in a way, falsely promised that the features could be used.
222
223 =item *
224
225 The current user-visible implementation of pseudo-hashes (the weird
226 use of the first array element) is deprecated starting from Perl 5.8.0
227 and will be removed in Perl 5.10.0, and the feature will be
228 implemented differently.  Not only is the current interface rather
229 ugly, but the current implementation slows down normal array and hash
230 use quite noticeably. The C<fields> pragma interface will remain
231 available.  The I<restricted hashes> interface is expected to
232 be the replacement interface (see L<Hash::Util>).
233
234 =item *
235
236 The syntaxes C<< @a->[...] >> and  C<< %h->{...} >> have now been deprecated.
237
238 =item *
239
240 After years of trying the suidperl is considered to be too complex to
241 ever be considered truly secure.  The suidperl functionality is likely
242 to be removed in a future release.
243
244 =item *
245
246 The 5.005 threads model (module C<Thread>) is deprecated and expected
247 to be removed in Perl 5.10.  Multithreaded code should be migrated to
248 the new ithreads model (see L<threads> and L<threads::shared>).
249
250 =item *
251
252 The long deprecated uppercase aliases for the string comparison
253 operators (EQ, NE, LT, LE, GE, GT) have now been removed.
254
255 =item *
256
257 The tr///C and tr///U features have been removed and will not return;
258 the interface was a mistake.  Sorry about that.  For similar
259 functionality, see pack('U0', ...) and pack('C0', ...).
260
261 =item *
262
263 Earlier Perls treated "sub foo (@bar)" as equivalent to "sub foo (@)".
264 The prototypes are now checked at compile-time for invalid characters.
265 An optional warning is generated ("Illegal character in prototype...")
266 but this may be upgraded to a fatal error in a future release.
267
268 =back
269
270 =head1 Core Enhancements
271
272 =head2 PerlIO is Now The Default
273
274 =over 4
275
276 =item *
277
278 IO is now by default done via PerlIO rather than system's "stdio".
279 PerlIO allows "layers" to be "pushed" onto a file handle to alter the
280 handle's behaviour.  Layers can be specified at open time via 3-arg
281 form of open:
282
283    open($fh,'>:crlf :utf8', $path) || ...
284
285 or on already opened handles via extended C<binmode>:
286
287    binmode($fh,':encoding(iso-8859-7)');
288
289 The built-in layers are: unix (low level read/write), stdio (as in
290 previous Perls), perlio (re-implementation of stdio buffering in a
291 portable manner), crlf (does CRLF <=> "\n" translation as on Win32,
292 but available on any platform).  A mmap layer may be available if
293 platform supports it (mostly UNIXes).
294
295 Layers to be applied by default may be specified via the 'open' pragma.
296
297 See L</"Installation and Configuration Improvements"> for the effects
298 of PerlIO on your architecture name.
299
300 =item *
301
302 File handles can be marked as accepting Perl's internal encoding of Unicode
303 (UTF-8 or UTF-EBCDIC depending on platform) by a pseudo layer ":utf8" :
304
305    open($fh,">:utf8","Uni.txt");
306
307 Note for EBCDIC users: the pseudo layer ":utf8" is erroneously named
308 for you since it's not UTF-8 what you will be getting but instead
309 UTF-EBCDIC.  See L<perlunicode>, L<utf8>, and
310 http://www.unicode.org/unicode/reports/tr16/ for more information.
311 In future releases this naming may change.
312
313 =item *
314
315 File handles can translate character encodings from/to Perl's internal
316 Unicode form on read/write via the ":encoding()" layer.
317
318 =item *
319
320 File handles can be opened to "in memory" files held in Perl scalars via:
321
322    open($fh,'>', \$variable) || ...
323
324 =item *
325
326 Anonymous temporary files are available without need to
327 'use FileHandle' or other module via
328
329    open($fh,"+>", undef) || ...
330
331 That is a literal undef, not an undefined value.
332
333 =item *
334
335 The list form of C<open> is now implemented for pipes (at least on UNIX):
336
337    open($fh,"-|", 'cat', '/etc/motd')
338
339 creates a pipe, and runs the equivalent of exec('cat', '/etc/motd') in
340 the child process.
341
342 =item *
343
344 If your locale environment variables (LANGUAGE, LC_ALL, LC_CTYPE, LANG)
345 contain the strings 'UTF-8' or 'UTF8' (case-insensitive matching),
346 the default encoding of your STDIN, STDOUT, and STDERR, and of
347 B<any subsequent file open>, is UTF-8.
348
349 =back
350
351 =head2 Restricted Hashes
352
353 A restricted hash is restricted to a certain set of keys, no keys
354 outside the set can be added.  Also individual keys can be restricted
355 so that the key cannot be deleted and the value cannot be changed.
356 No new syntax is involved: the Hash::Util module is the interface.
357
358 =head2 Safe Signals
359
360 Perl used to be fragile in that signals arriving at inopportune moments
361 could corrupt Perl's internal state.  Now Perl postpones handling of
362 signals until it's safe (between opcodes).
363
364 This change may have surprising side effects because signals no longer
365 interrupt Perl instantly.  Perl will now first finish whatever it was
366 doing, like finishing an internal operation (like sort()) or an
367 external operation (like an I/O operation), and only then look at any
368 arrived signals (and before starting the next operation).  No more corrupt
369 internal state since the current operation is always finished first,
370 but the signal may take more time to get heard.  Note that breaking
371 out from potentially blocking operations should still work, though.
372
373 =head2 Unicode Overhaul
374
375 Unicode in general should be now much more usable than in Perl 5.6.0
376 (or even in 5.6.1).  Unicode can be used in hash keys, Unicode in
377 regular expressions should work now, Unicode in tr/// should work now,
378 Unicode in I/O should work now.  See L<perluniintro> for introduction
379 and L<perlunicode> for details.
380
381 =over 4
382
383 =item *
384
385 The Unicode Character Database coming with Perl has been upgraded
386 to Unicode 3.2.0.  For more information, see http://www.unicode.org/ .
387
388 =item *
389
390 For developers interested in enhancing Perl's Unicode capabilities:
391 almost all the UCD files are included with the Perl distribution in
392 the F<lib/unicore subdirectory>.  The most notable omission, for space
393 considerations, is the Unihan database.
394
395 =item *
396
397 The properties \p{Blank} and \p{SpacePerl} have been added. "Blank" is like
398 C isblank(), that is, it contains only "horizontal whitespace" (the space
399 character is, the newline isn't), and the "SpacePerl" is the Unicode
400 equivalent of C<\s> (\p{Space} isn't, since that includes the vertical
401 tabulator character, whereas C<\s> doesn't.)
402
403 See "New Unicode Properties" earlier in this document for additional
404 information on changes with Unicode properties.
405
406 =back
407
408 =head2 Understanding of Numbers
409
410 In general a lot of fixing has happened in the area of Perl's
411 understanding of numbers, both integer and floating point.  Since in
412 many systems the standard number parsing functions like C<strtoul()>
413 and C<atof()> seem to have bugs, Perl tries to work around their
414 deficiencies.  This results hopefully in more accurate numbers.
415
416 Perl now tries internally to use integer values in numeric conversions
417 and basic arithmetics (+ - * /) if the arguments are integers, and
418 tries also to keep the results stored internally as integers.
419 This change leads to often slightly faster and always less lossy
420 arithmetics. (Previously Perl always preferred floating point numbers
421 in its math.)
422
423 =head2 Miscellaneous Changes
424
425 =over 4
426
427 =item *
428
429 AUTOLOAD is now lvaluable, meaning that you can add the :lvalue attribute
430 to AUTOLOAD subroutines and you can assign to the AUTOLOAD return value.
431
432 =item *
433
434 C<perl -d:Module=arg,arg,arg> now works (previously one couldn't pass
435 in multiple arguments.)
436
437 =item *
438
439 The builtin dump() now gives an optional warning
440 C<dump() better written as CORE::dump()>,
441 meaning that by default C<dump(...)> is resolved as the builtin 
442 dump() which dumps core and aborts, not as (possibly) user-defined
443 C<sub dump>.  To call the latter, qualify the call as C<&dump(...)>.
444 (The whole dump() feature is to considered deprecated, and possibly
445 removed/changed in future releases.)
446
447 =item *
448
449 chomp() and chop() are now overridable.  Note, however, that their
450 prototype (as given by C<prototype("CORE::chomp")> is undefined,
451 because it cannot be expressed and therefore one cannot really write
452 replacements to override these builtins.
453
454 =item *
455
456 END blocks are now run even if you exit/die in a BEGIN block.
457 Internally, the execution of END blocks is now controlled by 
458 PL_exit_flags & PERL_EXIT_DESTRUCT_END. This enables the new
459 behaviour for Perl embedders. This will default in 5.10. See
460 L<perlembed>.
461
462 =item *
463
464 Formats now support zero-padded decimal fields.
465
466 =item *
467
468 Lvalue subroutines can now return C<undef> in list context.
469 However, the lvalue subroutine feature still remains experimental.
470
471 =item *
472
473 A lost warning "Can't declare ... dereference in my" has been
474 restored (Perl had it earlier but it became lost in later releases.)
475
476 =item *
477
478 A new special regular expression variable has been introduced:
479 C<$^N>, which contains the most-recently closed group (submatch).
480
481 =item *
482
483 C<no Module;> now works even if there is no "sub unimport" in the Module.
484
485 =item *
486
487 The numerical comparison operators return C<undef> if either operand
488 is a NaN.  Previously the behaviour was unspecified.
489
490 =item *
491
492 The following builtin functions are now overridable: each(), keys(),
493 pop(), push(), shift(), splice(), unshift().
494
495 =item *
496
497 C<pack() / unpack()> now can group template letters with C<()> and then
498 apply repetition/count modifiers on the groups.
499
500 =item *
501
502 C<pack() / unpack()> can now process the Perl internal numeric types:
503 IVs, UVs, NVs-- and also long doubles, if supported by the platform.
504 The template letters are C<j>, C<J>, C<F>, and C<D>.
505
506 =item *
507
508 C<pack('U0a*', ...)> can now be used to force a string to UTF8.
509
510 =item *
511
512 my __PACKAGE__ $obj now works.
513
514 =item *
515
516 POSIX::sleep() now returns the number of I<unslept> seconds
517 (as the POSIX standard says), as opposed to CORE::sleep() which
518 returns the number of slept seconds.
519
520 =item *
521
522 The printf() and sprintf() now support parameter reordering using the
523 C<%\d+\$> and C<*\d+\$> syntaxes.  For example
524
525     print "%2\$s %1\$s\n", "foo", "bar";
526
527 will print "bar foo\n".  This feature helps in writing
528 internationalised software, and in general when the order
529 of the parameters can vary.
530
531 =item *
532
533 prototype(\&) is now available.
534
535 =item *
536
537 prototype(\[$@%&]) is now available to implicitly create references
538 (useful for example if you want to emulate the tie() interface).
539
540 =item *
541
542 A new command-line option, C<-t> is available.  It is the
543 little brother of C<-T>: instead of dying on taint violations,
544 lexical warnings are given.  B<This is only meant as a temporary
545 debugging aid while securing the code of old legacy applications.
546 This is not a substitute for -T.>
547
548 =item *
549
550 In other taint news, the C<exec LIST> and C<system LIST> have now been
551 considered too risky (think C<exec @ARGV>: it can start any program
552 with any arguments), and now the said forms cause a warning.
553 You should carefully launder the arguments to guarantee their
554 validity.  In future releases of Perl the forms will become fatal
555 errors so consider starting laundering now.
556
557 =item *
558
559 Tied hash interfaces are now required to have the EXISTS and DELETE
560 methods (either own or inherited).
561
562 =item *
563
564 If tr/// is just counting characters, it doesn't attempt to
565 modify its target.
566
567 =item *
568
569 untie() will now call an UNTIE() hook if it exists.  See L<perltie>
570 for details.
571
572 =item *
573
574 L<utime> now supports C<utime undef, undef, @files> to change the
575 file timestamps to the current time.
576
577 =item *
578
579 The rules for allowing underscores (underbars) in numeric constants
580 have been relaxed and simplified: now you can have an underscore
581 simply B<between digits>.
582
583 =item *
584
585 Rather than relying on C's argv[0] (which may not contain a full pathname)
586 where possible $^X is now set by asking the operating system.
587 (eg by reading F</proc/self/exe> on Linux, F</proc/curproc/file> on FreeBSD)
588
589 =item *
590
591 A new variable, C<${^TAINT}>, indicates whether taint mode is enabled.
592
593 =item *
594
595 You can now override the readline() builtin, and this overrides also
596 the <FILEHANDLE> angle bracket operator.
597
598 =item *
599
600 The command-line options -s and -F are now recognized on the shebang
601 (#!) line.
602
603 =item *
604
605 Use of the C</c> match modifier without an accompanying C</g> modifier
606 elicits a new warning: C<Use of /c modifier is meaningless without /g>.
607
608 Use of C</c> in substitutions, even with C</g>, elicits 
609 C<Use of /c modifier is meaningless in s///>.  
610
611 Use of C</g> with C<split> elicits C<Use of /g modifier is meaningless
612 in split>.
613
614 =back
615
616 =head1 Modules and Pragmata
617
618 =head2 New Modules and Pragmata
619
620 =over 4
621
622 =item *
623
624 C<Attribute::Handlers> allows a class to define attribute handlers.
625
626     package MyPack;
627     use Attribute::Handlers;
628     sub Wolf :ATTR(SCALAR) { print "howl!\n" }
629
630     # later, in some package using or inheriting from MyPack...
631
632     my MyPack $Fluffy : Wolf; # the attribute handler Wolf will be called
633
634 Both variables and routines can have attribute handlers.  Handlers can
635 be specific to type (SCALAR, ARRAY, HASH, or CODE), or specific to the
636 exact compilation phase (BEGIN, CHECK, INIT, or END).
637
638 =item *
639
640 B<B::Concise> is a new compiler backend for walking the Perl syntax
641 tree, printing concise info about ops, from Stephen McCamant.  The
642 output is highly customisable.  See L<B::Concise>.
643
644 =item *
645
646 The new bignum, bigint, and bigrat pragmas implement transparent
647 bignum support (using the Math::BigInt, Math::BigFloat, and
648 Math::BigRat backends), by Tels.
649
650 =item *
651
652 C<Class::ISA> for reporting the search path for a class's ISA tree,
653 by Sean Burke, has been added.  See L<Class::ISA>.
654
655 =item *
656
657 C<Cwd> has now a split personality: if possible, an XS extension is
658 used, (this will hopefully be faster, more secure, and more robust)
659 but if not possible, the familiar Perl implementation is used.
660
661 =item *
662
663 C<Devel::PPPort>, originally from Kenneth Albanowski and now
664 maintained by Paul Marquess, has been added.  It is primarily used
665 by C<h2xs> to enhance portability of XS modules between different
666 versions of Perl.
667
668 =item *
669
670 C<Digest>, frontend module for calculating digests (checksums), from
671 Gisle Aas, has been added.  See L<Digest>.
672
673 =item *
674
675 C<Digest::MD5> for calculating MD5 digests (checksums) as defined in
676 RFC 1321, from Gisle Aas, has been added.  See L<Digest::MD5>.
677
678     use Digest::MD5 'md5_hex';
679
680     $digest = md5_hex("Thirsty Camel");
681
682     print $digest, "\n"; # 01d19d9d2045e005c3f1b80e8b164de1
683
684 NOTE: the C<MD5> backward compatibility module is deliberately not
685 included since its further use is discouraged.
686
687 =item *
688
689 C<Encode>, orginally by Nick Ing-Simmons and now maintained by Dan
690 Kogai, provides a mechanism to translate between different character
691 encodings.  Support for Unicode, ISO-8859-1, and ASCII are compiled in
692 to the module.  Several other encodings (like the rest of the
693 ISO-8859, CP*/Win*, Mac, KOI8-R, three variants EBCDIC, Chinese,
694 Japanese, and Korean encodings) are included and can be loaded at
695 runtime.  (For space considerations, the largest Chinese encodings
696 have been separated into their own CPAN module, Encode::HanExtra,
697 which Encode will use if available).  See L<Encode>.
698
699 Any encoding supported by Encode module is also available to the
700 ":encoding()" layer if PerlIO is used.
701
702 =item *
703
704 C<Hash::Util> is the interface to the new I<restricted hashes>
705 feature.  (Implemented by Jeffrey Friedl, Nick Ing-Simmons, and
706 Michael Schwern.)
707
708 =item *
709
710 C<I18N::Langinfo> can be use to query locale information.
711 See L<I18N::Langinfo>.
712
713 =item *
714
715 C<I18N::LangTags> has functions for dealing with RFC3066-style
716 language tags, by Sean Burke.  See L<I18N::LangTags>.
717
718 =item *
719
720 C<ExtUtils::Constant> is a new tool for extension writers for
721 generating XS code to import C header constants, by Nicholas Clark.
722 See L<ExtUtils::Constant>.
723
724 =item *
725
726 C<Filter::Simple> is an easy-to-use frontend to Filter::Util::Call,
727 from Damian Conway.  See L<Filter::Simple>.
728
729     # in MyFilter.pm:
730
731     package MyFilter;
732
733     use Filter::Simple sub {
734         while (my ($from, $to) = splice @_, 0, 2) {
735                 s/$from/$to/g;
736         }
737     };
738
739     1;
740
741     # in user's code:
742
743     use MyFilter qr/red/ => 'green';
744
745     print "red\n";   # this code is filtered, will print "green\n"
746     print "bored\n"; # this code is filtered, will print "bogreen\n"
747
748     no MyFilter;
749
750     print "red\n";   # this code is not filtered, will print "red\n"
751
752 =item *
753
754 C<File::Temp> allows one to create temporary files and directories in
755 an easy, portable, and secure way, by Tim Jenness.  See L<File::Temp>.
756
757 =item *
758
759 C<Filter::Util::Call> provides you with the framework to write
760 I<Source Filters> in Perl, from Paul Marquess.  For most uses the
761 frontend Filter::Simple is to be preferred.  See L<Filter::Util::Call>.
762
763 =item *
764
765 C<if> is a new pragma for conditional inclusion of modules, from
766 Ilya Zakharevich.
767
768 =item *
769
770 L<libnet> is a collection of perl5 modules related to network
771 programming, from Graham Barr.  See L<Net::FTP>, L<Net::NNTP>,
772 L<Net::Ping> (not part of libnet, but related), L<Net::POP3>,
773 L<Net::SMTP>, and L<Net::Time>.
774
775 Perl installation leaves libnet unconfigured, use F<libnetcfg> to configure.
776
777 =item *
778
779 C<List::Util> is a selection of general-utility list subroutines, like
780 sum(), min(), first(), and shuffle(), by Graham Barr.  See L<List::Util>.
781
782 =item *
783
784 C<Locale::Constants>, C<Locale::Country>, C<Locale::Currency>
785 C<Locale::Language>, and L<Locale::Script>, from Neil Bowers, have
786 been added.  They provide the codes for various locale standards, such
787 as "fr" for France, "usd" for US Dollar, and "ja" for Japanese.
788
789     use Locale::Country;
790
791     $country = code2country('jp');               # $country gets 'Japan'
792     $code    = country2code('Norway');           # $code gets 'no'
793
794 See L<Locale::Constants>, L<Locale::Country>, L<Locale::Currency>,
795 and L<Locale::Language>.
796
797 =item *
798
799 C<Locale::Maketext> is localization framework from Sean Burke.  See
800 L<Locale::Maketext>, and L<Locale::Maketext::TPJ13>.  The latter is an
801 article about software localization, originally published in The Perl
802 Journal #13, republished here with kind permission.
803
804 =item *
805
806 C<Math::BigRat> for big rational numbers, to accompany Math::BigInt and
807 Math::BigFloat, from Tels.
808
809 =item *
810
811 C<Memoize> can make your functions faster by trading space for time,
812 from Mark-Jason Dominus.  See L<Memoize>.
813
814 =item *
815
816 C<MIME::Base64> allows you to encode data in base64, from Gisle Aas,
817 as defined in RFC 2045 - I<MIME (Multipurpose Internet Mail
818 Extensions)>.
819
820     use MIME::Base64;
821
822     $encoded = encode_base64('Aladdin:open sesame');
823     $decoded = decode_base64($encoded);
824
825     print $encoded, "\n"; # "QWxhZGRpbjpvcGVuIHNlc2FtZQ=="
826
827 See L<MIME::Base64>.
828
829 =item *
830
831 C<MIME::QuotedPrint> allows you to encode data in quoted-printable
832 encoding, as defined in RFC 2045 - I<MIME (Multipurpose Internet Mail
833 Extensions)>, from Gisle Aas.
834
835     use MIME::QuotedPrint;
836
837     $encoded = encode_qp("Smiley in Unicode: \x{263a}");
838     $decoded = decode_qp($encoded);
839
840     print $encoded, "\n"; # "Smiley in Unicode: =263A"
841
842 MIME::QuotedPrint has been enhanced to provide the basic methods
843 necessary to use it with PerlIO::Via as in :
844
845     use MIME::QuotedPrint;
846     open($fh,">Via(MIME::QuotedPrint)",$path);
847
848 See L<MIME::QuotedPrint>.
849
850 =item *
851
852 C<NEXT> is pseudo-class for method redispatch, from Damian Conway.
853 See L<NEXT>.
854
855 =item *
856
857 C<open> is a new pragma for setting the default I/O disciplines
858 for open().
859
860 =item *
861
862 C<PerlIO::Scalar> provides the implementation of IO to "in memory"
863 Perl scalars as discussed above, from Nick Ing-Simmons.  It also
864 serves as an example of a loadable PerlIO layer.  Other future
865 possibilities include PerlIO::Array and PerlIO::Code.
866 See L<PerlIO::Scalar>.
867
868 =item *
869
870 C<PerlIO::Via> acts as a PerlIO layer and wraps PerlIO layer
871 functionality provided by a class (typically implemented in perl
872 code), from Nick Ing-Simmons.
873
874     use MIME::QuotedPrint;
875     open($fh,">Via(MIME::QuotedPrint)",$path);
876
877 This will automatically convert everything output to C<$fh>
878 to Quoted-Printable.  See L<PerlIO::Via>.
879
880 =item *
881
882 C<Pod::ParseLink>, by Russ Allbery, has been added,
883 to parse LZ<><> links in pods as described in the new
884 perlpodspec.
885
886 =item *
887
888 C<Pod::Text::Overstrike>, by Joe Smith, has been added.
889 It converts POD data to formatted overstrike text.
890 See L<Pod::Text::Overstrike>.
891
892 =item *
893
894 C<Scalar::Util> is a selection of general-utility scalar subroutines,
895 like blessed(), reftype(), and tainted().  See L<Scalar::Util>.
896
897 =item *
898
899 C<sort> is a new pragma for controlling the behaviour of sort().
900
901 =item *
902
903 C<Storable> gives persistence to Perl data structures by allowing the
904 storage and retrieval of Perl data to and from files in a fast and
905 compact binary format.  Because in effect Storable does serialisation
906 of Perl data structues, with it you can also clone deep, hierarchical
907 datastructures.  Storable was originally created by Raphael Manfredi,
908 but it is now maintained by Abhijit Menon-Sen.  Storable has been
909 enhanced to understand the two new hash features, Unicode keys and
910 restricted hashes.  See L<Storable>.
911
912 =item *
913
914 C<Switch>, from Damian Conway, has been added.  Just by saying
915
916     use Switch;
917
918 you have C<switch> and C<case> available in Perl.
919
920     use Switch;
921
922     switch ($val) {
923
924                 case 1          { print "number 1" }
925                 case "a"        { print "string a" }
926                 case [1..10,42] { print "number in list" }
927                 case (@array)   { print "number in list" }
928                 case /\w+/      { print "pattern" }
929                 case qr/\w+/    { print "pattern" }
930                 case (%hash)    { print "entry in hash" }
931                 case (\%hash)   { print "entry in hash" }
932                 case (\&sub)    { print "arg to subroutine" }
933                 else            { print "previous case not true" }
934     }
935
936 See L<Switch>.
937
938 =item *
939
940 C<Test::More> is yet another framework for writing test scripts,
941 more extensive than Test::Simple, by Michael Schwern.  See L<Test::More>.
942
943 =item *
944
945 C<Test::Simple> has basic utilities for writing tests, by Michael
946 Schwern.   See L<Test::Simple>.
947
948 =item *
949
950 C<Text::Balanced> has been added, for extracting delimited text
951 sequences from strings, from Damian Conway.
952
953     use Text::Balanced 'extract_delimited';
954
955     ($a, $b) = extract_delimited("'never say never', he never said", "'", '');
956
957 $a will be "'never say never'", $b will be ', he never said'.
958
959 In addition to extract_delimited() there are also extract_bracketed(),
960 extract_quotelike(), extract_codeblock(), extract_variable(),
961 extract_tagged(), extract_multiple(), gen_delimited_pat(), and
962 gen_extract_tagged().  With these you can implement rather advanced
963 parsing algorithms.  See L<Text::Balanced>.
964
965 =item *
966
967 C<threads> is an interface to interpreter threads, by Arthur Bergman.
968 Interpreter threads (ithreads) is the new thread model introduced in
969 Perl 5.6 but only available as an internal interface for extension
970 writers (and for Win32 Perl for C<fork()> emulation).  See L<threads>.
971
972 =item *
973
974 C<threads::shared> allows data sharing for interpreter threads, from
975 Arthur Bergman.  In the ithreads model any data sharing between
976 threads must be explicit, as opposed to the old 5.005 thread model
977 where data sharing was implicit.  See L<threads::shared>.
978
979 =item *
980
981 C<Tie::File>, by Mark-Jason Dominus, associates a Perl array with the
982 lines of a file.
983
984 =item *
985
986 C<Tie::Memoize>, by Ilya Zakharevich, provides on-demand loaded hashes.
987
988 =item *
989
990 C<Tie::RefHash::Nestable>, by Edward Avis, allows storing hash
991 references (unlike the standard Tie::RefHash)  The module is contained
992 within Tie::RefHash, see L<Tie::RefHash>.
993
994 =item *
995
996 C<Time::HiRes> provides high resolution timing (ualarm, usleep,
997 and gettimeofday), from Douglas E. Wegscheid.  See L<Time::HiRes>.
998
999 =item *
1000
1001 C<Unicode::UCD> offers a querying interface to the Unicode Character
1002 Database.  See L<Unicode::UCD>.
1003
1004 =item *
1005
1006 C<Unicode::Collate> implements the UCA (Unicode Collation Algorithm)
1007 for sorting Unicode strings, by SADAHIRO Tomoyuki.  See L<Unicode::Collate>.
1008
1009 =item *
1010
1011 C<Unicode::Normalize> implements the various Unicode normalization
1012 forms, by SADAHIRO Tomoyuki.  See L<Unicode::Normalize>.
1013
1014 =item *
1015
1016 C<XS::Typemap>, by Tim Jenness, is a test extension that exercises XS
1017 typemaps.  Nothing gets installed but for extension writers the code
1018 is worth studying.
1019
1020 =back
1021
1022 =head2 Updated And Improved Modules and Pragmata
1023
1024 =over 4
1025
1026 =item *
1027
1028 The following independently supported modules have been updated to the
1029 newest versions from CPAN: CGI, CPAN, DB_File, File::Spec, File::Temp,
1030 Getopt::Long, Math::BigFloat, Math::BigInt, the podlators bundle
1031 (Pod::Man, Pod::Text), Pod::LaTeX, Pod::Parser, Storable,
1032 Term::ANSIColor, Test, Text-Tabs+Wrap.
1033
1034 =item *
1035
1036 The attributes::reftype() now works on tied arguments.
1037
1038 =item *
1039
1040 AutoLoader can now be disabled with C<no AutoLoader;>.
1041
1042 =item *
1043
1044 B::Deparse has been significantly enhanced.  It now can deparse almost
1045 all of the standard test suite (so that the tests still succeed).
1046 There is a make target "test.deparse" for trying this out.
1047
1048 =item *
1049
1050 Class::Struct can now define the classes in compile time.
1051
1052 =item *
1053
1054 Class::Struct now assigns the array/hash element if the accessor
1055 is called with an array/hash element as the B<sole> argument.
1056
1057 =item *
1058
1059 The return value of Cwd::fastcwd() is now tainted.
1060
1061 =item *
1062
1063 Data::Dumper has now an option to sort hashes.
1064
1065 =item *
1066
1067 Data::Dumper has now an option to dump code references
1068 using B::Deparse.
1069
1070 =item *
1071
1072 DB_File now supports newer Berkeley DB versions, among
1073 other improvements.
1074
1075 =item *
1076
1077 Devel::Peek now has an interface for the Perl memory statistics
1078 (this works only if you are using perl's malloc, and if you have
1079 compiled with debugging).
1080
1081 =item *
1082
1083 The English module can now be used without the infamous performance
1084 hit by saying
1085
1086         use English '-no_match_vars';
1087
1088 (Assuming, of course, that one doesn't need the troublesome variables
1089 C<$`>, C<$&>, or C<$'>.)  Also, introduced C<@LAST_MATCH_START> and
1090 C<@LAST_MATCH_END> English aliases for C<@-> and C<@+>.
1091
1092 =item *
1093
1094 ExtUtils::MakeMaker now uses File::Spec internally, which hopefully
1095 leads into better portability.
1096
1097 =item *
1098
1099 Fcntl, Socket, and Sys::Syslog have been rewritten to use the
1100 new-style constant dispatch section (see L<ExtUtils::Constant>).
1101 This means that they will be more robust and hopefully faster.
1102
1103 =item *
1104
1105 File::Find now chdir()s correctly when chasing symbolic links.
1106
1107 =item *
1108
1109 File::Find now has pre- and post-processing callbacks.  It also
1110 correctly changes directories when chasing symbolic links.  Callbacks
1111 (naughtily) exiting with "next;" instead of "return;" now work.
1112
1113 =item *
1114
1115 File::Find is now (again) reentrant.  It also has been made
1116 more portable.
1117
1118 =item *
1119
1120 The warnings issued by File::Find now belong to their own category.
1121 You can enable/disable them with C<use/no warnings 'File::Find';>.
1122
1123 =item *
1124
1125 File::Glob::glob() renamed to File::Glob::bsd_glob() to avoid
1126 prototype mismatch with CORE::glob().
1127
1128 =item *
1129
1130 File::Glob now supports C<GLOB_LIMIT> constant to limit the size of
1131 the returned list of filenames.
1132
1133 =item *
1134
1135 IPC::Open3 now allows the use of numeric file descriptors.
1136
1137 =item *
1138
1139 IO::Socket has now atmark() method, which returns true if the socket
1140 is positioned at the out-of-band mark.  The method is also exportable
1141 as a sockatmark() function.
1142
1143 =item *
1144
1145 IO::Socket::INET has support for ReusePort option (if your platform
1146 supports it).  The Reuse option now has an alias, ReuseAddr.  For clarity
1147 you may want to prefer ReuseAddr.
1148
1149 =item *
1150
1151 IO::Socket::INET now supports C<LocalPort> of zero (usually meaning
1152 that the operating system will make one up.)
1153
1154 =item *
1155
1156 use lib now works identically to @INC.  Removing directories
1157 with 'no lib' now works.
1158
1159 =item *
1160
1161 Math::BigFloat and Math::BigInt have undergone a full rewrite.
1162 They are now magnitudes faster, and they support various
1163 bignum libraries such as GMP and PARI as their backends.
1164
1165 =item *
1166
1167 Math::Complex handles inf, NaN etc., better.
1168
1169 =item *
1170
1171 Net::Ping has been muchly enhanced: multihoming is now supported,
1172 Win32 functionality is better, there is now time measuring
1173 functionality (optionally high-resolution using Time::HiRes),
1174 and there is now "external" protocol which uses Net::Ping::External
1175 module which runs your external ping utility and parses the output.
1176 A version of Net::Ping::External is available in CPAN.
1177
1178 Note that some of the Net::Ping tests are disabled when running
1179 under the Perl distribution since one cannot assume one or more
1180 of the following: enabled echo port at localhost, full Internet
1181 connectivity, or sympathetic firewalls.  You can set the environment
1182 variable PERL_TEST_Net_Ping to "1" (one) before running the Perl test
1183 suite to enable all the Net::Ping tests.
1184
1185 =item *
1186
1187 POSIX::sigaction() is now much more flexible and robust.
1188 You can now install coderef handlers, 'DEFAULT', and 'IGNORE'
1189 handlers, installing new handlers was not atomic.
1190
1191 =item *
1192
1193 In Safe the C<%INC> now localised in a Safe compartment so that
1194 use/require work.
1195
1196 =item *
1197
1198 In SDBM_File on dosish platforms, some keys went missing because of
1199 lack of support for files with "holes".  A workaround for the problem
1200 has been added.
1201
1202 =item *
1203
1204 In Search::Dict one can now have a pre-processing hook for the
1205 lines being searched.
1206
1207 =item *
1208
1209 The Shell module now has an OO interface.
1210
1211 =item *
1212
1213 In Sys::Syslog there is now a failover mechanism that will go
1214 through alternative connection mechanisms until the message
1215 is successfully logged.
1216
1217 =item *
1218
1219 The Test module has been significantly enhanced.
1220
1221 =item *
1222
1223 Time::Local::timelocal() does not handle fractional seconds anymore.
1224 The rationale is that neither does localtime(), and timelocal() and
1225 localtime() are supposed to be inverses of each other.
1226
1227 =item *
1228
1229 The vars pragma now supports declaring fully qualified variables.
1230 (Something that C<our()> does not and will not support.)
1231
1232 =item *
1233
1234 The C<utf8::> name space (as in the pragma) provides various
1235 Perl-callable functions to provide low level access to Perl's
1236 internal Unicode representation.  At the moment only length()
1237 has been implemented.
1238
1239 =back
1240
1241 =head1 Utility Changes
1242
1243 =over 4
1244
1245 =item *
1246
1247 Emacs perl mode (emacs/cperl-mode.el) has been updated to version
1248 4.31.
1249
1250 =item *
1251
1252 F<emacs/e2ctags.pl> is now much faster.
1253
1254 =item *
1255
1256 C<enc2xs> is a tool for people adding their own encodings to the
1257 Encode module.
1258
1259 =item *
1260
1261 C<h2ph> now supports C trigraphs.
1262
1263 =item *
1264
1265 C<h2xs> now produces a template README.
1266
1267 =item *
1268
1269 C<h2xs> now uses C<Devel::PPort> for better portability between
1270 different versions of Perl.
1271
1272 =item *
1273
1274 C<h2xs> uses the new L<ExtUtils::Constant> module which will affect
1275 newly created extensions that define constants.  Since the new code is
1276 more correct (if you have two constants where the first one is a
1277 prefix of the second one, the first constant B<never> gets defined),
1278 less lossy (it uses integers for integer constant, as opposed to the
1279 old code that used floating point numbers even for integer constants),
1280 and slightly faster, you might want to consider regenerating your
1281 extension code (the new scheme makes regenerating easy).
1282 L<h2xs> now also supports C trigraphs.
1283
1284 =item *
1285
1286 C<libnetcfg> has been added to configure the libnet.
1287
1288 =item *
1289
1290 C<perlbug> is now much more robust.  It also sends the bug report to
1291 perl.org, not perl.com.
1292
1293 =item *
1294
1295 C<perlcc> has been rewritten and its user interface (that is,
1296 command line) is much more like that of the UNIX C compiler, cc.
1297 (The perlbc tools has been removed.  Use C<perlcc -B> instead.)
1298
1299 =item *
1300
1301 C<perlivp> is a new Installation Verification Procedure utility
1302 for running any time after installing Perl.
1303
1304 =item *
1305
1306 C<piconv> is an implementation of the character conversion utility
1307 C<iconv>, demonstrating the new Encode module.
1308
1309 =item *
1310
1311 C<pod2html> now allows specifying a cache directory.
1312
1313 =item *
1314
1315 C<pod2html> now produces XHTML 1.0.
1316
1317 =item *
1318
1319 C<pod2html> now understands POD written using different line endings
1320 (PC-like CRLF versus UNIX-like LF versus MacClassic-like CR).
1321
1322 =item *
1323
1324 C<s2p> has been completely rewritten in Perl.  (It is in fact a full
1325 implementation of sed in Perl: you can use the sed functionality by
1326 using the C<psed> utility.)
1327
1328 =item *
1329
1330 C<xsubpp> now understands POD documentation embedded in the *.xs files.
1331
1332 =item *
1333
1334 C<xsubpp> now supports OUT keyword.
1335
1336 =back
1337
1338 =head1 New Documentation
1339
1340 =over 4
1341
1342 =item *
1343
1344 perl56delta details the changes between the 5.005 release and the
1345 5.6.0 release.
1346
1347 =item *
1348
1349 perlclib documents the internal replacements for standard C library
1350 functions.  (Interesting only for extension writers and Perl core
1351 hackers.)
1352
1353 =item *
1354
1355 perldebtut is a Perl debugging tutorial.
1356
1357 =item *
1358
1359 perlebcdic contains considerations for running Perl on EBCDIC platforms.
1360
1361 =item *
1362
1363 perlintro is a gentle introduction to Perl.
1364
1365 =item *
1366
1367 perliol documents the internals of PerlIO with layers.
1368
1369 =item *
1370
1371 perlmodstyle is a style guide for writing modules.
1372
1373 =item *
1374
1375 perlnewmod tells about writing and submitting a new module.
1376
1377 =item *
1378
1379 perlpacktut is a pack() tutorial.
1380
1381 =item *
1382
1383 perlpod has been rewritten to be clearer and to record the best
1384 practices gathered over the years.
1385
1386 =item *
1387
1388 perlpodspec is a more formal specification of the pod format,
1389 mainly of interest for writers of pod applications, not to
1390 people writing in pod.
1391
1392 =item *
1393
1394 perlretut is a regular expression tutorial.
1395
1396 =item *
1397
1398 perlrequick is a regular expressions quick-start guide.
1399 Yes, much quicker than perlretut.
1400
1401 =item *
1402
1403 perltodo has been updated.
1404
1405 =item *
1406
1407 perltootc has been renamed as perltooc (to not to conflict
1408 with perltoot in filesystems restricted to "8.3" names)
1409
1410 =item *
1411
1412 perluniintro is an introduction to using Unicode in Perl.
1413 (perlunicode is more of a detailed reference and background
1414 information)
1415
1416 =item *
1417
1418 perlutil explains the command line utilities packaged with the Perl
1419 distribution.
1420
1421 =back
1422
1423 The following platform-specific documents are available before
1424 the installation as README.I<platform>, and after the installation
1425 as perlI<platform>:
1426
1427     perlaix perlamiga perlapollo perlbeos perlbs2000
1428     perlce perlcygwin perldgux perldos perlepoc perlhpux
1429     perlhurd perlmachten perlmacos perlmint perlmpeix
1430     perlnetware perlos2 perlos390 perlplan9 perlqnx perlsolaris
1431     perltru64 perluts perlvmesa perlvms perlvos perlwin32
1432
1433 =over 4
1434
1435 =item *
1436
1437 The documentation for the POSIX-BC platform is called "BS2000", to avoid
1438 confusion with the Perl POSIX module.
1439
1440 =item *
1441
1442 The documentation for the WinCE platform is called perlce (README.ce
1443 in the source code kit), to avoid confusion with the perlwin32
1444 documentation on 8.3-restricted filesystems.
1445
1446 =back
1447
1448 =head1 Performance Enhancements
1449
1450 =over 4
1451
1452 =item *
1453
1454 map() could get pathologically slow when the result list it generates
1455 is larger than the source list.  The performance has been improved for
1456 common scenarios.
1457
1458 =item *
1459
1460 sort() has been changed to use primarily mergesort internally as
1461 opposed to the earlier quicksort.  For very small lists this may
1462 result in slightly slower sorting times, but in general the speedup
1463 should be at least 20%.  Additional bonuses are that the worst case
1464 behaviour of sort() is now better (in computer science terms it now
1465 runs in time O(N log N), as opposed to quicksort's Theta(N**2)
1466 worst-case run time behaviour), and that sort() is now stable
1467 (meaning that elements with identical keys will stay ordered as they
1468 were before the sort).  See the C<sort> pragma for information.
1469
1470 The story in more detail: suppose you want to serve yourself a little
1471 slice of Pi.
1472
1473     @digits = ( 3,1,4,1,5,9 );
1474
1475 A numerical sort of the digits will yield (1,1,3,4,5,9), as expected.
1476 Which C<1> comes first is hard to know, since one C<1> looks pretty
1477 much like any other.  You can regard this as totally trivial,
1478 or somewhat profound.  However, if you just want to sort the even
1479 digits ahead of the odd ones, then what will
1480
1481     sort { ($a % 2) <=> ($b % 2) } @digits;
1482
1483 yield?  The only even digit, C<4>, will come first.  But how about
1484 the odd numbers, which all compare equal?  With the quicksort algorithm
1485 used to implement Perl 5.6 and earlier, the order of ties is left up
1486 to the sort.  So, as you add more and more digits of Pi, the order
1487 in which the sorted even and odd digits appear will change.
1488 and, for sufficiently large slices of Pi, the quicksort algorithm
1489 in Perl 5.8 won't return the same results even if reinvoked with the
1490 same input.  The justification for this rests with quicksort's
1491 worst case behavior.  If you run
1492
1493    sort { $a <=> $b } ( 1 .. $N , 1 .. $N );
1494
1495 (something you might approximate if you wanted to merge two sorted
1496 arrays using sort), doubling $N doesn't just double the quicksort time,
1497 it I<quadruples> it.  Quicksort has a worst case run time that can
1498 grow like N**2, so-called I<quadratic> behaviour, and it can happen
1499 on patterns that may well arise in normal use.  You won't notice this
1500 for small arrays, but you I<will> notice it with larger arrays,
1501 and you may not live long enough for the sort to complete on arrays
1502 of a million elements.  So the 5.8 quicksort scrambles large arrays
1503 before sorting them, as a statistical defence against quadratic behaviour.
1504 But that means if you sort the same large array twice, ties may be
1505 broken in different ways.
1506
1507 Because of the unpredictability of tie-breaking order, and the quadratic
1508 worst-case behaviour, quicksort was I<almost> replaced completely with
1509 a stable mergesort.  I<Stable> means that ties are broken to preserve
1510 the original order of appearance in the input array.  So
1511
1512     sort { ($a % 2) <=> ($b % 2) } (3,1,4,1,5,9);
1513
1514 will yield (4,3,1,1,5,9), guaranteed.  The even and odd numbers
1515 appear in the output in the same order they appeared in the input.
1516 Mergesort has worst case O(NlogN) behaviour, the best value
1517 attainable.  And, ironically, this mergesort does particularly
1518 well where quicksort goes quadratic:  mergesort sorts (1..$N, 1..$N)
1519 in O(N) time.  But quicksort was rescued at the last moment because
1520 it is faster than mergesort on certain inputs and platforms.
1521 For example, if you really I<don't> care about the order of even
1522 and odd digits, quicksort will run in O(N) time; it's very good
1523 at sorting many repetitions of a small number of distinct elements.
1524 The quicksort divide and conquer strategy works well on platforms
1525 with relatively small, very fast, caches.  Eventually, the problem gets
1526 whittled down to one that fits in the cache, from which point it
1527 benefits from the increased memory speed.
1528
1529 Quicksort was rescued by implementing a sort pragma to control aspects
1530 of the sort.  The B<stable> subpragma forces stable behaviour,
1531 regardless of algorithm.  The B<_quicksort> and B<_mergesort>
1532 subpragmas are heavy-handed ways to select the underlying implementation.
1533 The leading C<_> is a reminder that these subpragmas may not survive
1534 beyond 5.8.  More appropriate mechanisms for selecting the implementation
1535 exist, but they wouldn't have arrived in time to save quicksort.
1536
1537 =item *
1538
1539 Hashes now use Bob Jenkins "One-at-a-Time" hashing key algorithm
1540 ( http://burtleburtle.net/bob/hash/doobs.html ).  This algorithm is
1541 reasonably fast while producing a much better spread of values than
1542 the old hashing algorithm (originally by Chris Torek, later tweaked by
1543 Ilya Zakharevich).  Hash values output from the algorithm on a hash of
1544 all 3-char printable ASCII keys comes much closer to passing the
1545 DIEHARD random number generation tests.  According to perlbench, this
1546 change has not affected the overall speed of Perl.
1547
1548 =item *
1549
1550 unshift() should now be noticeably faster.
1551
1552 =back
1553
1554 =head1 Installation and Configuration Improvements
1555
1556 =head2 Generic Improvements
1557
1558 =over 4
1559
1560 =item *
1561
1562 INSTALL now explains how you can configure Perl to use 64-bit
1563 integers even on non-64-bit platforms.
1564
1565 =item *
1566
1567 Policy.sh policy change: if you are reusing a Policy.sh file
1568 (see INSTALL) and you use Configure -Dprefix=/foo/bar and in the old
1569 Policy $prefix eq $siteprefix and $prefix eq $vendorprefix, all of
1570 them will now be changed to the new prefix, /foo/bar.  (Previously
1571 only $prefix changed.)  If you do not like this new behaviour,
1572 specify prefix, siteprefix, and vendorprefix explicitly.
1573
1574 =item *
1575
1576 A new optional location for Perl libraries, otherlibdirs, is available.
1577 It can be used for example for vendor add-ons without disturbing Perl's
1578 own library directories.
1579
1580 =item *
1581
1582 In many platforms the vendor-supplied 'cc' is too stripped-down to
1583 build Perl (basically, 'cc' doesn't do ANSI C).  If this seems
1584 to be the case and 'cc' does not seem to be the GNU C compiler
1585 'gcc', an automatic attempt is made to find and use 'gcc' instead.
1586
1587 =item *
1588
1589 gcc needs to closely track the operating system release to avoid
1590 build problems. If Configure finds that gcc was built for a different
1591 operating system release than is running, it now gives a clearly visible
1592 warning that there may be trouble ahead.
1593
1594 =item *
1595
1596 Since Perl 5.8 is not binary-compatible with previous releases
1597 of Perl, Configure no longer suggests including the 5.005
1598 modules in @INC.
1599
1600 =item *
1601
1602 Configure C<-S> can now run non-interactively.
1603
1604 =item *
1605
1606 Configure support for pdp11-style memory models has been removed due
1607 to obsolescence.
1608
1609 =item *
1610
1611 configure.gnu now works with options with whitespace in them.
1612
1613 =item *
1614
1615 installperl now outputs everything to STDERR.
1616
1617 =item *
1618
1619 $Config{byteorder} is now computed dynamically (this is more robust
1620 with "fat binaries" where an executable image contains binaries for
1621 more than one binary platform.)
1622
1623 =item *
1624
1625 Because PerlIO is now the default on most platforms, "-perlio" doesn't
1626 get appended to the $Config{archname} (also known as $^O) anymore.
1627 Instead, if you explicitly choose not to use perlio (Configure command
1628 line option -Uuseperlio), you will get "-stdio" appended.
1629
1630 =item *
1631
1632 Another change related to the architecture name is that "-64all"
1633 (-Duse64bitall, or "maximally 64-bit") is appended only if your
1634 pointers are 64 bits wide.  (To be exact, the use64bitall is ignored.)
1635
1636 =item *
1637
1638 In AFS installations one can configure the root of the AFS to be
1639 somewhere else than the default F</afs> by using the Configure
1640 parameter C<-Dafsroot=/some/where/else>.
1641
1642 =item *
1643
1644 APPLLIB_EXP, a less-know configuration-time definition, has been
1645 documented.  It can be used to prepend site-specific directories
1646 to Perl's default search path (@INC), see INSTALL for information.
1647
1648 =item *
1649
1650 The version of Berkeley DB used when the Perl (and, presumably, the
1651 DB_File extension) was built is now available as
1652 C<@Config{qw(db_version_major db_version_minor db_version_patch)}>
1653 from Perl and as C<DB_VERSION_MAJOR_CFG DB_VERSION_MINOR_CFG
1654 DB_VERSION_PATCH_CFG> from C.
1655
1656 =item *
1657
1658 Building Berkeley DB3 for compatibility modes for DB, NDBM, and ODBM
1659 has been documented in INSTALL.
1660
1661 =item *
1662
1663 If you have CPAN access (either network or a local copy such as a
1664 CD-ROM) you can during specify extra modules to Configure to build and
1665 install with Perl using the -Dextras=...  option.  See INSTALL for
1666 more details.
1667
1668 =item *
1669
1670 In addition to config.over a new override file, config.arch, is
1671 available.  That is supposed to be used by hints file writers for
1672 architecture-wide changes (as opposed to config.over which is for
1673 site-wide changes).
1674
1675 =item *
1676
1677 If your file system supports symbolic links you can build Perl outside
1678 of the source directory by
1679
1680         mkdir /tmp/perl/build/directory
1681         cd /tmp/perl/build/directory
1682         sh /path/to/perl/source/Configure -Dmksymlinks ...
1683
1684 This will create in /tmp/perl/build/directory a tree of symbolic links
1685 pointing to files in /path/to/perl/source.  The original files are left
1686 unaffected.  After Configure has finished you can just say
1687
1688         make all test
1689
1690 and Perl will be built and tested, all in /tmp/perl/build/directory.
1691
1692 =item *
1693
1694 For Perl developers several new make targets for profiling
1695 and debugging have been added, see L<perlhack>.
1696
1697 =over 8
1698
1699 =item *
1700
1701 Use of the F<gprof> tool to profile Perl has been documented in
1702 L<perlhack>.  There is a make target called "perl.gprof" for
1703 generating a gprofiled Perl executable.
1704
1705 =item *
1706
1707 If you have GCC 3, there is a make target called "perl.gcov" for
1708 creating a gcoved Perl executable for coverage analysis.  See
1709 L<perlhack>.
1710
1711 =item *
1712
1713 If you are on IRIX or Tru64 platforms, new profiling/debugging options
1714 have been added, see L<perlhack> for more information about pixie and
1715 Third Degree.
1716
1717 =back
1718
1719 =item *
1720
1721 Guidelines of how to construct minimal Perl installations have
1722 been added to INSTALL.
1723
1724 =item *
1725
1726 The Thread extension is now not built at all under ithreads
1727 (C<Configure -Duseithreads>) because it wouldn't work anyway (the
1728 Thread extension requires being Configured with C<-Duse5005threads>).
1729
1730 But note that the Thread.pm interface is now shared by both
1731 thread models.
1732
1733 =item *
1734
1735 The Gconvert macro ($Config{d_Gconvert}) used by perl for stringifying
1736 floating-point numbers is now more picky about using sprintf %.*g
1737 rules for the conversion.  Some platforms that used to use gcvt may
1738 now resort to the slower sprintf.
1739
1740 =item *
1741
1742 The obsolete method of making a special (e.g., debugging) flavor
1743 of perl by saying
1744
1745         make LIBPERL=libperld.a
1746
1747 has been removed. Use -DDEBUGGING instead.
1748
1749 =back
1750
1751 =head2 New Or Improved Platforms
1752
1753 For the list of platforms known to support Perl,
1754 see L<perlport/"Supported Platforms">.
1755
1756 =over 4
1757
1758 =item *
1759
1760 AIX dynamic loading should be now better supported.
1761
1762 =item *
1763
1764 AIX should now work better with gcc, threads, and 64-bitness.  Also the
1765 long doubles support in AIX should be better now.  See L<perlaix>.
1766
1767 =item *
1768
1769 AtheOS ( http://www.atheos.cx/ ) is a new platform.
1770
1771 =item *
1772
1773 BeOS has been reclaimed.
1774
1775 =item *
1776
1777 DG/UX platform now supports the 5.005-style threads.  See L<perldgux>.
1778
1779 =item *
1780
1781 DYNIX/ptx platform (a.k.a. dynixptx) is supported at or near osvers 4.5.2.
1782
1783 =item *
1784
1785 EBCDIC platforms (z/OS, also known as OS/390, POSIX-BC, and VM/ESA)
1786 have been regained.  Many test suite tests still fail and the
1787 co-existence of Unicode and EBCDIC isn't quite settled, but the
1788 situation is much better than with Perl 5.6.  See L<perlos390>,
1789 L<perlbs2000> (for POSIX-BC), and L<perlvmesa> for more information.
1790
1791 =item *
1792
1793 Building perl with -Duseithreads or -Duse5005threads now works under
1794 HP-UX 10.20 (previously it only worked under 10.30 or later). You will
1795 need a thread library package installed. See README.hpux.
1796
1797 =item *
1798
1799 MacOS Classic (MacPerl has of course been available since
1800 perl 5.004 but now the source code bases of standard Perl
1801 and MacPerl have been synchronised)
1802
1803 =item *
1804
1805 MacOS X (or Darwin) should now be able to build Perl even on HFS+
1806 filesystems.  (The case-insensitivity confused the Perl build process.)
1807
1808 =item *
1809
1810 NCR MP-RAS is now supported.
1811
1812 =item *
1813
1814 All the NetBSD specific patches (except for the installation
1815 specific ones) have been merged back to the main distribution.
1816
1817 =item *
1818
1819 NetWare from Novell is now supported.  See L<perlnetware>.
1820
1821 =item *
1822
1823 NonStop-UX is now supported.
1824
1825 =item *
1826
1827 NEC SUPER-UX is now supported.
1828
1829 =item *
1830
1831 All the OpenBSD specific patches (except for the installation
1832 specific ones) have been merged back to the main distribution.
1833
1834 =item *
1835
1836 Perl has been tested with the GNU pth userlevel thread package
1837 ( http://www.gnu.org/software/pth/pth.html ) . All but one thread
1838 test worked, and that one failure was because of test results arriving
1839 in unexpected order.
1840
1841 =item *
1842
1843 Stratus VOS is now supported using Perl's native build method
1844 (Configure).  This is the recommended method to build Perl on
1845 VOS.  The older methods, which build miniperl, are still
1846 available.  See L<perlvos>.
1847
1848 =item *
1849
1850 Amdahl UTS UNIX mainframe platform is now supported.
1851
1852 =item *
1853
1854 WinCE is now supported.  See L<perlce>.
1855
1856 =item *
1857
1858 z/OS (formerly known as OS/390, formerly known as MVS OE) has now
1859 support for dynamic loading.  This is not selected by default,
1860 however, you must specify -Dusedl in the arguments of Configure.
1861
1862 =back
1863
1864 =head1 Selected Bug Fixes
1865
1866 Numerous memory leaks and uninitialized memory accesses have been
1867 hunted down.  Most importantly anonymous subs used to leak quite
1868 a bit.
1869
1870 =over 4
1871
1872 =item *
1873
1874 The autouse pragma didn't work for Multi::Part::Function::Names.
1875
1876 =item *
1877
1878 caller() could cause core dumps in certain situations.  Carp was sometimes
1879 affected by this problem.  In particular, caller() now returns a
1880 subroutine name of C<(unknown)> for subroutines that have been removed
1881 from the symbol table.
1882
1883 =item *
1884
1885 chop(@list) in list context returned the characters chopped in
1886 reverse order.  This has been reversed to be in the right order.
1887
1888 =item *
1889
1890 Configure no longer includes the DBM libraries (dbm, gdbm, db, ndbm)
1891 when building the Perl binary.  The only exception to this is SunOS 4.x,
1892 which needs them.
1893
1894 =item *
1895
1896 The behaviour of non-decimal but numeric string constants such as
1897 "0x23" was platform-dependent: in some platforms that was seen as 35,
1898 in some as 0, in some as a floating point number (don't ask).  This
1899 was caused by Perl using the operating system libraries in a situation
1900 where the result of the string to number conversion is undefined: now
1901 Perl consistently handles such strings as zero in numeric contexts.
1902
1903 =item *
1904
1905 The order of DESTROYs has been made more predictable.
1906
1907 =item *
1908
1909 Several debugger fixes: exit code now reflects the script exit code,
1910 condition C<"0"> now treated correctly, the C<d> command now checks
1911 line number, the C<$.> no longer gets corrupted, all debugger output
1912 now goes correctly to the socket if RemotePort is set.
1913
1914 =item *
1915
1916 Perl 5.6.0 could emit spurious warnings about redefinition of dl_error()
1917 when statically building extensions into perl.  This has been corrected.
1918
1919 =item *
1920
1921 L<dprofpp> -R didn't work.
1922
1923 =item *
1924
1925 C<*foo{FORMAT}> now works.
1926
1927 =item *
1928
1929 Infinity is now recognized as a number.
1930
1931 =item *
1932
1933 UNIVERSAL::isa no longer caches methods incorrectly.  (This broke
1934 the Tk extension with 5.6.0.)
1935
1936 =item *
1937
1938 Lexicals I: lexicals outside an eval "" weren't resolved
1939 correctly inside a subroutine definition inside the eval "" if they
1940 were not already referenced in the top level of the eval""ed code.
1941
1942 =item *
1943
1944 Lexicals II: lexicals leaked at file scope into subroutines that
1945 were declared before the lexicals.
1946
1947 =item *
1948
1949 Lexical warnings now propagating correctly between scopes
1950 and into C<eval "...">.
1951
1952 =item *
1953
1954 C<use warnings qw(FATAL all)> did not work as intended.  This has been
1955 corrected.
1956
1957 =item *
1958
1959 warnings::enabled() now reports the state of $^W correctly if the caller
1960 isn't using lexical warnings.
1961
1962 =item *
1963
1964 Line renumbering with eval and C<#line> now works.
1965
1966 =item *
1967
1968 Fixed numerous memory leaks, especially in eval "".
1969
1970 =item *
1971
1972 Localised tied variables no more leak memory
1973
1974     use Tie::Hash;
1975     tie my %tied_hash => 'Tie::StdHash';
1976
1977     ...
1978
1979     # Used to leak memory every time local() was called,
1980     # in a loop this added up.
1981     local($tied_hash{Foo}) = 1;
1982
1983 =item *
1984
1985 Localised hash elements (and %ENV) are correctly unlocalised to not to
1986 exist, if that's what they were.
1987
1988
1989     use Tie::Hash;
1990     tie my %tied_hash => 'Tie::StdHash';
1991
1992     ...
1993
1994     # Nothing has set the FOO element so far
1995
1996     { local $tied_hash{FOO} = 'Bar' }
1997     
1998     # Here the FOO element would have been C<undef>,
1999     # but no more so. 
2000
2001 As a side effect of this fix, tied hash interfaces B<must> define
2002 the EXISTS and DELETE methods.
2003
2004 =item *
2005
2006 mkdir() now ignores trailing slashes in the directory name,
2007 as mandated by POSIX.
2008
2009 =item *
2010
2011 Some versions of glibc have a broken modfl().  This affects builds
2012 with C<-Duselongdouble>.  This version of Perl detects this brokenness
2013 and has a workaround for it.  The glibc release 2.2.2 is known to have
2014 fixed the modfl() bug.
2015
2016 =item *
2017
2018 Modulus of unsigned numbers now works (4063328477 % 65535 used to
2019 return 27406, instead of 27047).
2020
2021 =item *
2022
2023 Some "not a number" warnings introduced in 5.6.0 eliminated to be
2024 more compatible with 5.005.  Infinity is now recognised as a number.
2025
2026 =item *
2027
2028 Numeric conversions did not recognize changes in the string value
2029 properly in certain circumstances.
2030
2031 =item *
2032
2033 Attributes (like :shared) didn't work with our().
2034
2035 =item *
2036
2037 our() variables will not cause "will not stay shared" warnings.
2038
2039 =item *
2040
2041 "our" variables of the same name declared in two sibling blocks
2042 resulted in bogus warnings about "redeclaration" of the variables.
2043 The problem has been corrected.
2044
2045 =item *
2046
2047 pack "Z" now correctly terminates the string with "\0".
2048
2049 =item *
2050
2051 Fix password routines which in some shadow password platforms
2052 (e.g. HP-UX) caused getpwent() to return every other entry.
2053
2054 =item *
2055
2056 The PERL5OPT environment variable (for passing command line arguments
2057 to Perl) didn't work for more than a single group of options.
2058
2059 =item *
2060
2061 PERL5OPT with embedded spaces didn't work.
2062
2063 =item *
2064
2065 printf() no longer resets the numeric locale to "C".
2066
2067 =item *
2068
2069 C<qw(a\\b)> now parses correctly as C<'a\\b'>.
2070
2071 =item *
2072
2073 pos() did not return the correct value within s///ge in earlier
2074 versions.  This is now handled correctly.
2075
2076 =item *
2077
2078 Printing quads (64-bit integers) with printf/sprintf now works
2079 without the q L ll prefixes (assuming you are on a quad-capable platform).
2080
2081 =item *
2082
2083 Regular expressions on references and overloaded scalars now work.
2084
2085 =item *
2086
2087 Right-hand side magic (GMAGIC) could in many cases such as string
2088 concatenation be invoked too many times.
2089
2090 =item *
2091
2092 scalar() now forces scalar context even when used in void context.
2093
2094 =item *
2095
2096 SOCKS support is now much more robust.
2097
2098 =item *
2099
2100 sort() arguments are now compiled in the right wantarray context
2101 (they were accidentally using the context of the sort() itself).
2102 The comparison block is now run in scalar context, and the arguments
2103 to be sorted are always provided list context.
2104
2105 =item *
2106
2107 Changed the POSIX character class C<[[:space:]]> to include the (very
2108 rarely used) vertical tab character.  Added a new POSIX-ish character
2109 class C<[[:blank:]]> which stands for horizontal whitespace
2110 (currently, the space and the tab).
2111
2112 =item *
2113
2114 The tainting behaviour of sprintf() has been rationalized.  It does
2115 not taint the result of floating point formats anymore, making the
2116 behaviour consistent with that of string interpolation.
2117
2118 =item *
2119
2120 Some cases of inconsistent taint propagation (such as within hash
2121 values) have been fixed.
2122
2123 =item *
2124
2125 The RE engine found in Perl 5.6.0 accidentally pessimised certain kinds
2126 of simple pattern matches.  These are now handled better.
2127
2128 =item *
2129
2130 Regular expression debug output (whether through C<use re 'debug'>
2131 or via C<-Dr>) now looks better.
2132
2133 =item *
2134
2135 Multi-line matches like C<"a\nxb\n" =~ /(?!\A)x/m> were flawed.  The
2136 bug has been fixed.
2137
2138 =item *
2139
2140 Use of $& could trigger a core dump under some situations.  This
2141 is now avoided.
2142
2143 =item *
2144
2145 The regular expression captured submatches ($1, $2, ...) are now
2146 more consistently unset if the match fails, instead of leaving false
2147 data lying around in them.
2148
2149 =item *
2150
2151 readline() on files opened in "slurp" mode could return an extra "" at
2152 the end in certain situations.  This has been corrected.
2153
2154 =item *
2155
2156 Autovivification of symbolic references of special variables described
2157 in L<perlvar> (as in C<${$num}>) was accidentally disabled.  This works
2158 again now.
2159
2160 =item *
2161
2162 Sys::Syslog ignored the C<LOG_AUTH> constant.
2163
2164 =item *
2165
2166 All but the first argument of the IO syswrite() method are now optional.
2167
2168 =item *
2169
2170 $AUTOLOAD, sort(), lock(), and spawning subprocesses
2171 in multiple threads simultaneously are now thread-safe.
2172
2173 =item *
2174
2175 Tie::ARRAY SPLICE method was broken.
2176
2177 =item *
2178
2179 Allow read-only string on left hand side of non-modifying tr///.
2180
2181 =item *
2182
2183 If C<STDERR> is tied, warnings caused by C<warn> and C<die> now
2184 correctly pass to it.
2185
2186 =item *
2187
2188 Several Unicode fixes.
2189
2190 =over 8
2191
2192 =item *
2193
2194 BOMs (byte order marks) in the beginning of Perl files
2195 (scripts, modules) should now be transparently skipped.
2196 UTF-16 (UCS-2) encoded Perl files should now be read correctly.
2197
2198 =item *
2199
2200 The character tables have been updated to Unicode 3.2.0.
2201
2202 =item *
2203
2204 Comparing with utf8 data does not magically upgrade non-utf8 data
2205 into utf8.  (This was a problem for example if you were mixing data
2206 from I/O and Unicode data: your output might have got magically encoded
2207 as UTF-8.)
2208
2209 =item *
2210
2211 Generating illegal Unicode code points like U+FFFE, or the UTF-16
2212 surrogates, now also generates an optional warning.
2213
2214 =item *
2215
2216 C<IsAlnum>, C<IsAlpha>, and C<IsWord> now match titlecase.
2217
2218 =item *
2219
2220 Concatenation with the C<.> operator or via variable interpolation,
2221 C<eq>, C<substr>, C<reverse>, C<quotemeta>, the C<x> operator,
2222 substitution with C<s///>, single-quoted UTF8, should now work.
2223
2224 =item *
2225
2226 The C<tr///> operator now works.  Note that the C<tr///CU>
2227 functionality has been removed (but see pack('U0', ...)).
2228
2229 =item *
2230
2231 C<eval "v200"> now works.
2232
2233 =item *
2234
2235 Perl 5.6.0 parsed m/\x{ab}/ incorrectly, leading to spurious warnings.
2236 This has been corrected.
2237
2238 =item *
2239
2240 Zero entries were missing from the Unicode classes like C<IsDigit>.
2241
2242 =back
2243
2244 =item *
2245
2246 Large unsigned numbers (those above 2**31) could sometimes lose their
2247 unsignedness, causing bogus results in arithmetic operations.
2248
2249 =back
2250
2251 =head2 Platform Specific Changes and Fixes
2252
2253 =over 4
2254
2255 =item *
2256
2257 BSDI 4.*
2258
2259 Perl now works on post-4.0 BSD/OSes.
2260
2261 =item *
2262
2263 All BSDs
2264
2265 Setting C<$0> now works (as much as possible; see L<perlvar> for details).
2266
2267 =item *
2268
2269 Cygwin
2270
2271 Numerous updates; currently synchronised with Cygwin 1.3.10.
2272
2273 =item *
2274
2275 Previously DYNIX/ptx had problems in its Configure probe for non-blocking I/O.
2276
2277 =item *
2278
2279 EPOC
2280
2281 EPOC update after Perl 5.6.0.  See README.epoc.
2282
2283 =item *
2284
2285 FreeBSD 3.*
2286
2287 Perl now works on post-3.0 FreeBSDs.
2288
2289 =item *
2290
2291 HP-UX
2292
2293 README.hpux updated; C<Configure -Duse64bitall> now works.
2294
2295 =item *
2296
2297 IRIX
2298
2299 Numerous compilation flag and hint enhancements; accidental mixing
2300 of 32-bit and 64-bit libraries (a doomed attempt) made much harder.
2301
2302 =item *
2303
2304 Linux
2305
2306 =over 8
2307
2308 =item *
2309
2310 Long doubles should now work (see INSTALL).
2311
2312 =item *
2313
2314 Linux previously had problems related to sockaddrlen when using
2315 accept(), revcfrom() (in Perl: recv()), getpeername(), and getsockname().
2316
2317 =back
2318
2319 =item *
2320
2321 MacOS Classic
2322
2323 Compilation of the standard Perl distribution in MacOS Classic should
2324 now work if you have the Metrowerks development environment and
2325 the missing Mac-specific toolkit bits.  Contact the macperl mailing
2326 list for details.
2327
2328 =item *
2329
2330 MPE/iX
2331
2332 MPE/iX update after Perl 5.6.0.  See README.mpeix.
2333
2334 =item *
2335
2336 NetBSD/threads: try installing the GNU pth (should be in the
2337 packages collection, or http://www.gnu.org/software/pth/),
2338 and Configure with -Duseithreads. 
2339
2340 =item *
2341
2342 NetBSD/sparc
2343
2344 Perl now works on NetBSD/sparc.
2345
2346 =item *
2347
2348 OS/2
2349
2350 Now works with usethreads (see INSTALL).
2351
2352 =item *
2353
2354 Solaris
2355
2356 64-bitness using the Sun Workshop compiler now works.
2357
2358 =item *
2359
2360 Stratus VOS
2361
2362 The native build method requires at least VOS Release 14.5.0
2363 and GNU C++/GNU Tools 2.0.1 or later.  The Perl pack function
2364 now maps overflowed values to +infinity and underflowed values
2365 to -infinity.
2366
2367 =item *
2368
2369 Tru64 (aka Digital UNIX, aka DEC OSF/1)
2370
2371 The operating system version letter now recorded in $Config{osvers}.
2372 Allow compiling with gcc (previously explicitly forbidden).  Compiling
2373 with gcc still not recommended because buggy code results, even with
2374 gcc 2.95.2.
2375
2376 =item *
2377
2378 Unicos
2379
2380 Fixed various alignment problems that lead into core dumps either
2381 during build or later; no longer dies on math errors at runtime;
2382 now using full quad integers (64 bits), previously was using 
2383 only 46 bit integers for speed.
2384
2385 =item *
2386
2387 VMS
2388
2389 chdir() now works better despite a CRT bug; now works with MULTIPLICITY
2390 (see INSTALL); now works with Perl's malloc.
2391
2392 The tainting of C<%ENV> elements via C<keys> or C<values> was previously
2393 unimplemented.  It now works as documented.
2394
2395 The C<waitpid> emulation has been improved.  The worst bug (now fixed)
2396 was that a pid of -1 would cause a wildcard search of all processes on
2397 the system.  The most significant enhancement is that we can now
2398 usually get the completion status of a terminated process.
2399
2400 POSIX-style signals are now emulated much better on VMS versions prior
2401 to 7.0.
2402
2403 The C<system> function and backticks operator have improved
2404 functionality and better error handling.
2405
2406 File access tests now use current process privileges rather than the
2407 user's default privileges, which could sometimes result in a mismatch
2408 between reported access and actual access.
2409
2410 =item *
2411
2412 Windows
2413
2414 =over 8
2415
2416 =item *
2417
2418 accept() no longer leaks memory.
2419
2420 =item *
2421
2422 Borland C++ v5.5 is now a supported compiler that can build Perl.
2423 However, the generated binaries continue to be incompatible with those
2424 generated by the other supported compilers (GCC and Visual C++).
2425
2426 =item *
2427
2428 Better chdir() return value for a non-existent directory.
2429
2430 =item *
2431
2432 Duping socket handles with open(F, ">&MYSOCK") now works under Windows 9x.
2433
2434 =item *
2435
2436 New %ENV entries now propagate to subprocesses.
2437
2438 =item *
2439
2440 Current directory entries in %ENV are now correctly propagated to child
2441 processes.
2442
2443 =item *
2444
2445 $ENV{LIB} now used to search for libs under Visual C.
2446
2447 =item *
2448
2449 fork() emulation has been improved in various ways, but still continues
2450 to be experimental.  See L<perlfork> for known bugs and caveats.
2451
2452 =item *
2453
2454 A failed (pseudo)fork now returns undef and sets errno to EAGAIN.
2455
2456 =item *
2457
2458 Win32::GetCwd() correctly returns C:\ instead of C: when at the drive root.
2459 Other bugs in chdir() and Cwd::cwd() have also been fixed.
2460
2461 =item *
2462
2463 HTML files will be installed in c:\perl\html instead of c:\perl\lib\pod\html
2464
2465 =item *
2466
2467 The makefiles now provide a single switch to bulk-enable all the features
2468 enabled in ActiveState ActivePerl (a popular Win32 binary distribution).
2469
2470 =item *
2471
2472 Allow REG_EXPAND_SZ keys in the registry.
2473
2474 =item *
2475
2476 Can now send() from all threads, not just the first one.
2477
2478 =item *
2479
2480 Fake signal handling reenabled, bugs and all.
2481
2482 =item *
2483
2484 %SIG has been enabled under USE_ITHREADS, but its use is completely
2485 unsupported under all configurations.
2486
2487 =item *
2488
2489 Less stack reserved per thread so that more threads can run
2490 concurrently. (Still 16M per thread.)
2491
2492 =item *
2493
2494 C<File::Spec-&gt;tmpdir()> now prefers C:/temp over /tmp
2495 (works better when perl is running as service).
2496
2497 =item *
2498
2499 Better UNC path handling under ithreads.
2500
2501 =item *
2502
2503 wait(), waitpid() and backticks now return the correct exit status under
2504 Windows 9x.
2505
2506 =item *
2507
2508 winsock handle leak fixed.
2509
2510 =item *
2511
2512 The Perl parser has been stress tested using both random input and
2513 Markov chain input and the few found crashes and lockups have been
2514 fixed.
2515
2516 =back
2517
2518 =back
2519
2520 =head1 New or Changed Diagnostics
2521
2522 =over 4
2523
2524 =item *
2525
2526 The lexical warnings category "deprecated" is no longer a sub-category
2527 of the "syntax" category. It is now a top-level category in its own
2528 right.
2529
2530 =item *
2531
2532 All regular expression compilation error messages are now hopefully
2533 easier to understand both because the error message now comes before
2534 the failed regex and because the point of failure is now clearly
2535 marked by a C<E<lt>-- HERE> marker.
2536
2537 =item *
2538
2539 The various "opened only for", "on closed", "never opened" warnings
2540 drop the C<main::> prefix for filehandles in the C<main> package,
2541 for example C<STDIN> instead of C<main::STDIN>. 
2542
2543 =item *
2544
2545 The "Unrecognized escape" warning has been extended to include C<\8>,
2546 C<\9>, and C<\_>.  There is no need to escape any of the C<\w> characters.
2547
2548 =item *
2549
2550 Two new debugging options have been added: if you have compiled your
2551 Perl with debugging, you can use the -DT and -DR options to trace
2552 tokenising and to add reference counts to displaying variables,
2553 respectively.
2554
2555 =item *
2556
2557 The debugger (perl5db.pl) has been modified to present a more
2558 consistent commands interface, via (CommandSet=580).  perl5db.t was
2559 also added to test the changes, and as a placeholder for further tests.
2560
2561 See L<perldebug>.
2562
2563 =item *
2564
2565 The debugger has a new C<dumpDepth> option to control the maximum
2566 depth to which nested structures are dumped.  The C<x> command has
2567 been extended so that C<x N EXPR> dumps out the value of I<EXPR> to a
2568 depth of at most I<N> levels.
2569
2570 =item *
2571
2572 The debugger can now show lexical variables if you have the CPAN
2573 module PadWalker installed.
2574
2575 =item *
2576
2577 If an attempt to use a (non-blessed) reference as an array index
2578 is made, a warning is given.
2579
2580 =item *
2581
2582 C<push @a;> and C<unshift @a;> (with no values to push or unshift)
2583 now give a warning.  This may be a problem for generated and evaled
2584 code.
2585
2586 =item *
2587
2588 If you try to L<perlfunc/pack> a number less than 0 or larger than 255
2589 using the C<"C"> format you will get an optional warning.  Similarly
2590 for the C<"c"> format and a number less than -128 or more than 127.
2591
2592 =item *
2593
2594 Certain regex modifiers such as C<(?o)> make sense only if applied to
2595 the entire regex.  You will get an optional warning if you try to do
2596 otherwise. 
2597
2598 =item *
2599
2600 Using arrays or hashes as references (e.g. C<< %foo->{bar} >>
2601 has been deprecated for a while.  Now you will get an optional warning.
2602
2603 =item *
2604
2605 Using C<sort> in scalar context now issues an optional warning.
2606 This didn't do anything useful, as the sort was not performed.
2607
2608 =back
2609
2610 =head1 Changed Internals
2611
2612 =over 4
2613
2614 =item *
2615
2616 perlapi.pod (a companion to perlguts) now attempts to document the
2617 internal API.
2618
2619 =item *
2620
2621 You can now build a really minimal perl called microperl.
2622 Building microperl does not require even running Configure;
2623 C<make -f Makefile.micro> should be enough.  Beware: microperl makes
2624 many assumptions, some of which may be too bold; the resulting
2625 executable may crash or otherwise misbehave in wondrous ways.
2626 For careful hackers only.
2627
2628 =item *
2629
2630 Added rsignal(), whichsig(), do_join(), op_clear, op_null,
2631 ptr_table_clear(), ptr_table_free(), sv_setref_uv(), and several UTF-8
2632 interfaces to the publicised API.  For the full list of the available
2633 APIs see L<perlapi>.
2634
2635 =item *
2636
2637 Made possible to propagate customised exceptions via croak()ing.
2638
2639 =item *
2640
2641 Now xsubs can have attributes just like subs.  (Well, at least the
2642 built-in attributes.)
2643
2644 =item *
2645
2646 dTHR and djSP have been obsoleted; the former removed (because it's
2647 a no-op) and the latter replaced with dSP.
2648
2649 =item *
2650
2651 PERL_OBJECT has been completely removed.
2652
2653 =item *
2654
2655 The MAGIC constants (e.g. C<'P'>) have been macrofied
2656 (e.g. C<PERL_MAGIC_TIED>) for better source code readability
2657 and maintainability.
2658
2659 =item *
2660
2661 The regex compiler now maintains a structure that identifies nodes in
2662 the compiled bytecode with the corresponding syntactic features of the
2663 original regex expression.  The information is attached to the new
2664 C<offsets> member of the C<struct regexp>. See L<perldebguts> for more
2665 complete information.
2666
2667 =item *
2668
2669 The C code has been made much more C<gcc -Wall> clean.  Some warning
2670 messages still remain in some platforms, so if you are compiling with
2671 gcc you may see some warnings about dubious practices.  The warnings
2672 are being worked on.
2673
2674 =item *
2675
2676 F<perly.c>, F<sv.c>, and F<sv.h> have now been extensively commented.
2677
2678 =item *
2679
2680 Documentation on how to use the Perl source repository has been added
2681 to F<Porting/repository.pod>.
2682
2683 =item *
2684
2685 There are now several profiling make targets.
2686
2687 =back
2688
2689 =head1 Security Vulnerability Closed
2690
2691 (This change was already made in 5.7.0 but bears repeating here.)
2692
2693 A potential security vulnerability in the optional suidperl component
2694 of Perl was identified in August 2000.  suidperl is neither built nor
2695 installed by default.  As of November 2001 the only known vulnerable
2696 platform is Linux, most likely all Linux distributions.  CERT and
2697 various vendors and distributors have been alerted about the vulnerability.
2698 See http://www.cpan.org/src/5.0/sperl-2000-08-05/sperl-2000-08-05.txt
2699 for more information.
2700
2701 The problem was caused by Perl trying to report a suspected security
2702 exploit attempt using an external program, /bin/mail.  On Linux
2703 platforms the /bin/mail program had an undocumented feature which
2704 when combined with suidperl gave access to a root shell, resulting in
2705 a serious compromise instead of reporting the exploit attempt.  If you
2706 don't have /bin/mail, or if you have 'safe setuid scripts', or if
2707 suidperl is not installed, you are safe.
2708
2709 The exploit attempt reporting feature has been completely removed from
2710 Perl 5.8.0 (and the maintenance release 5.6.1, and it was removed also
2711 from all the Perl 5.7 releases), so that particular vulnerability
2712 isn't there anymore.  However, further security vulnerabilities are,
2713 unfortunately, always possible.  The suidperl functionality is most
2714 probably going to be removed in Perl 5.10.  In any case, suidperl
2715 should only be used by security experts who know exactly what they are
2716 doing and why they are using suidperl instead of some other solution
2717 such as sudo ( see http://www.courtesan.com/sudo/ ).
2718
2719 =head1 New Tests
2720
2721 Several new tests have been added, especially for the F<lib>
2722 subsection.  There are now about 56 000 individual tests (spread over
2723 about 620 test scripts), in the regression suite (5.6.1 has about
2724 11700 tests, in 258 test scripts) Many of the new tests are introduced
2725 by the new modules, but still in general Perl is now more thoroughly
2726 tested.
2727
2728 Because of the large number of tests, running the regression suite
2729 will take considerably longer time than it used to: expect the suite
2730 to take up to 4-5 times longer to run than in perl 5.6.  In a really
2731 fast machine you can hope to finish the suite in about 6-8 minutes
2732 (wallclock time).
2733
2734 The tests are now reported in a different order than in earlier Perls.
2735 (This happens because the test scripts from under t/lib have been moved
2736 to be closer to the library/extension they are testing.)
2737
2738 =head1 Known Problems
2739
2740 =head2 AIX
2741
2742 =over 4
2743
2744 =item *
2745
2746 In AIX 4.2 Perl extensions that use C++ functions that use statics
2747 may have problems in that the statics are not getting initialized.
2748 In newer AIX releases this has been solved by linking Perl with
2749 the libC_r library, but unfortunately in AIX 4.2 the said library
2750 has an obscure bug where the various functions related to time
2751 (such as time() and gettimeofday()) return broken values, and
2752 therefore in AIX 4.2 Perl is not linked against the libC_r.
2753
2754 =item *
2755
2756 vac 5.0.0.0 May Produce Buggy Code For Perl
2757
2758 The AIX C compiler vac version 5.0.0.0 may produce buggy code,
2759 resulting in few random tests failing, but when the failing tests
2760 are run by hand, they succeed.  We suggest upgrading to at least
2761 vac version 5.0.1.0, that has been known to compile Perl correctly.
2762 "lslpp -L|grep vac.C" will tell you the vac version. See README.aix.
2763
2764 =item *
2765
2766 If building threaded Perl, you may get compilation warning from pp_sys.c:
2767
2768   "pp_sys.c", line 4651.39: 1506-280 (W) Function argument assignment between types "unsigned char*" and "const void*" is not allowed.
2769
2770 This is harmless; it is caused by the getnetbyaddr() and getnetbyaddr_r()
2771 having slightly different types for their first argument.
2772
2773 =back
2774
2775 =head2 ext/threads/t/libc
2776
2777 If this test fails, it indicates that your libc (C library) is not
2778 threadsafe.  This particular test stress tests the localtime() call to
2779 find out whether it is threadsafe.  See L<perlthrtut> for more information.
2780
2781 =head2 FreeBSD Failing locale Test 117 For ISO8859-15 Locales
2782
2783 The ISO8859-15 locales may fail the locale test 117 in FreeBSD.
2784 This is caused by the characters \xFF (y with diaeresis) and \xBE
2785 (Y with diaeresis) not behaving correctly when being matched
2786 case-insensitively.
2787
2788 =head2 Modifying $_ Inside for(..)
2789
2790    for (1..5) { $_++ }
2791
2792 works without complaint.  It shouldn't.  (You should be able to
2793 modify only lvalue elements inside the loops.)  You can see the
2794 correct behaviour by replacing the 1..5 with 1, 2, 3, 4, 5.
2795
2796 =head2 mod_perl 1.26 Doesn't Build With Threaded Perl
2797
2798 Use mod_perl 1.27 or higher.
2799
2800 =head2 lib/ftmp-security tests warn 'system possibly insecure'
2801
2802 Don't panic.  Read INSTALL 'make test' section instead.
2803
2804 =head2 HP-UX lib/posix Subtest 9 Fails When LP64-Configured
2805
2806 If perl is configured with -Duse64bitall, the successful result of the
2807 subtest 10 of lib/posix may arrive before the successful result of the
2808 subtest 9, which confuses the test harness so much that it thinks the
2809 subtest 9 failed.
2810
2811 =head2 Linux With Sfio Fails op/misc Test 48
2812
2813 No known fix.
2814
2815 =head2 Mac OS X
2816
2817 Please remember to set your environment variable LC_ALL to "C"
2818 (setenv LC_ALL C) before running "make test" to avoid a lot of
2819 warnings about the broken locales of Mac OS X.
2820
2821 The following tests are known to fail:
2822
2823  Failed Test                 Stat Wstat Total Fail  Failed  List of Failed
2824  -------------------------------------------------------------------------
2825  ../ext/DB_File/t/db-btree.t    0    11    ??   ??       %  ??
2826  ../ext/DB_File/t/db-recno.t              149    3   2.01%  61 63 65
2827
2828 If you are building on a UFS partition, you will also probably see
2829 t/op/stat.t subtest #9 fail.  This is caused by Darwin's UFS not
2830 supporting inode change time.
2831
2832 Also the ext/POSIX/t/posix.t subtest #10 fails but it is skipped for
2833 now because the failure is Apple's fault, not Perl's (blocked signals
2834 are lost).
2835
2836 If you Configure with ithreads, ext/threads/t/libc.t will fail, again
2837 not Perl's fault-- the libc of Mac OS X is not threadsafe (in this
2838 particular test the localtime() call is found to be threadunsafe.)
2839
2840 =head2 op/sprintf tests 91, 129, and 130
2841
2842 The op/sprintf tests 91, 129, and 130 are known to fail on some platforms.
2843 Examples include any platform using sfio, and Compaq/Tandem's NonStop-UX.
2844
2845 The test 91 is known to fail at QNX6 (nto), because C<sprintf '%e',0>
2846 incorrectly produces C<0.000000e+0> instead of C<0.000000e+00>.
2847
2848 For the tests 129 and 130 the failing platforms do not comply with
2849 the ANSI C Standard, line 19ff on page 134 of ANSI X3.159 1989 to
2850 be exact.  (They produce something other than "1" and "-1" when
2851 formatting 0.6 and -0.6 using the printf format "%.0f", most often
2852 they produce "0" and "-0".)
2853
2854 =head2 Solaris 2.5
2855
2856 In case you are still using Solaris 2.5 (aka SunOS 5.5), you may
2857 experience failures (the test core dumping) in lib/locale.t.
2858 The suggested cure is to upgrade your Solaris.
2859
2860 =head2 Stratus VOS
2861
2862 When Perl is built using the native build process on VOS Release
2863 14.5.0 and GNU C++/GNU Tools 2.0.1, all attempted tests either
2864 pass or result in TODO (ignored) failures.
2865
2866 =head Term::ReadKey not working on Win32
2867
2868 Use Term::ReadKey 2.20 or later.
2869
2870 =head2 Failure of Thread (5.005-style) tests
2871
2872 B<Note that support for 5.005-style threading is deprecated,
2873 experimental and practically unsupported.  In 5.10 it is expected
2874 to be removed.>
2875
2876 The following tests are known to fail due to fundamental problems in
2877 the 5.005 threading implementation. These are not new failures--Perl
2878 5.005_0x has the same bugs, but didn't have these tests.
2879
2880  ../ext/List/Util/t/first.t         255 65280     7    4  57.14%  2 5-7
2881  ../lib/English.t                     2   512    54    2   3.70%  2-3
2882  ../lib/Filter/Simple/t/data.t                    6    3  50.00%  1-3
2883  ../lib/Filter/Simple/t/filter_onl                9    3  33.33%  1-2 5
2884  ../lib/autouse.t                                10    1  10.00%  4
2885  op/flip.t                                       15    1   6.67%  15
2886
2887 These failures are unlikely to get fixed as the 5.005-style threads
2888 are considered fundamentally broken.  (Basically what happens is that
2889 competing threads can corrupt shared global state.)
2890
2891 =head2 UNICOS
2892
2893  ../ext/Socket/socketpair.t       1   256    45    1   2.22%  12
2894  ../ext/Storable/t/downgrade.t   92 23552    59    6  10.17%  144-147
2895                                                               150-151
2896  ../lib/Math/Trig.t                          26    1   3.85%  25
2897  ../lib/warnings.t                          470    1   0.21%  429
2898  op/numconvert.t                           1440   13   0.90%  208 509-510
2899                                 657-658 665-666 829-830 989-990 1149-1150
2900
2901 The Trig and numconvert failures are caused by the slighly differing
2902 (from IEEE) floating point implementation of UNICOS.  The warnings
2903 failure is also related: the test assumes a certain floating point
2904 output format, this assumption fails in UNICOS.
2905
2906 =head2 UNICOS/mk
2907
2908 =over 4
2909
2910 =item *
2911
2912 During Configure the test
2913
2914     Guessing which symbols your C compiler and preprocessor define...
2915
2916 will probably fail with error messages like
2917
2918     CC-20 cc: ERROR File = try.c, Line = 3
2919       The identifier "bad" is undefined.
2920
2921       bad switch yylook 79bad switch yylook 79bad switch yylook 79bad switch yylook 79#ifdef A29K
2922       ^
2923
2924     CC-65 cc: ERROR File = try.c, Line = 3
2925       A semicolon is expected at this point.
2926
2927 This is caused by a bug in awk utility of UNICOS/mk.  You can ignore
2928 the error, but it does cause a slight problem: you cannot fully
2929 benefit from the h2ph utility (see L<h2ph>) that can be used to
2930 convert C headers to Perl libraries, mainly used to be able to access
2931 from Perl the constants defined using C preprocessor, cpp.  Because of
2932 the above error parts of the converted headers will be invisible.
2933 Luckily, these days the need for h2ph is rare.
2934
2935 =item *
2936
2937 If building Perl with the interpreter threads (ithreads), the
2938 getgrent(), getgrnam(), and getgrgid() functions cannot return the
2939 list of the group members due to a bug in the multithreaded support of
2940 UNICOS/mk.  What this means that in list context the functions will
2941 return only three values, not four.
2942
2943 =back
2944
2945 =head2 UTS
2946
2947 There are a few known test failures, see L<perluts>.
2948
2949 =head2 VMS
2950
2951 There should be no reported test failures with a default configuration,
2952 though there are a number of tests marked TODO that point to areas
2953 needing further debugging and/or porting work.
2954
2955 =head2 Win32
2956
2957 In multi-CPU boxes there are some problems with the I/O buffering:
2958 some output may appear twice.
2959
2960 =head2 XML::Parser not working
2961
2962 Use XML::Parser 2.31 or later.
2963
2964 =head2 z/OS (OS/390)
2965
2966 z/OS has rather many test failures but the situation is actually
2967 better than it was in 5.6.0, it's just that so many new modules and
2968 tests have been added.
2969
2970  Failed Test                   Stat Wstat Total Fail  Failed  List of Failed
2971  ---------------------------------------------------------------------------
2972  ../ext/Data/Dumper/t/dumper.t              357    8   2.24%  311 314 325 327
2973                                                               331 333 337 339
2974  ../ext/IO/lib/IO/t/io_unix.t                 5    4  80.00%  2-5
2975  ../ext/Storable/t/downgrade.t   12  3072   169   12   7.10%  14-15 46-47 78-79
2976                                                               110-111 150 161
2977  ../lib/ExtUtils/t/Constant.t   121 30976    48   48 100.00%  1-48
2978  ../lib/ExtUtils/t/Embed.t                    9    9 100.00%  1-9
2979  op/pat.t                                   910    7   0.77%  665 776 785 832-
2980                                                               834 845
2981  op/sprintf.t                               224    3   1.34%  98 100 136
2982  op/tr.t                                     97    5   5.15%  63 71-74
2983  uni/fold.t                                 780    6   0.77%  61 169 196 661
2984                                                               710-711
2985
2986 The dumper.t and downgrade.t are problems in the tests, the io_unix
2987 and sprintf are problems in the USS (UDP sockets and printf formats).
2988 The pat, tr, and fold are genuine Perl problems caused by EBCDIC (and
2989 in the pat and fold cases, combining that with Unicode).  The Constant
2990 and Embed are probably problems in the tests (since they test Perl's
2991 ability to build extensions, and that seems to be working reasonably well.)
2992
2993 =head2 Localising Tied Arrays and Hashes Is Broken
2994
2995     local %tied_array;
2996
2997 doesn't work as one would expect: the old value is restored
2998 incorrectly.
2999
3000 =head2 Self-tying of Arrays and Hashes Is Forbidden
3001
3002 Self-tying of arrays and hashes is broken in rather deep and
3003 hard-to-fix ways.  As a stop-gap measure to avoid people from getting
3004 frustrated at the mysterious results (core dumps, most often) it is
3005 for now forbidden (you will get a fatal error even from an attempt).
3006
3007 =head2 Building Extensions Can Fail Because Of Largefiles
3008
3009 Some extensions like mod_perl are known to have issues with
3010 `largefiles', a change brought by Perl 5.6.0 in which file offsets
3011 default to 64 bits wide, where supported.  Modules may fail to compile
3012 at all or compile and work incorrectly.  Currently there is no good
3013 solution for the problem, but Configure now provides appropriate
3014 non-largefile ccflags, ldflags, libswanted, and libs in the %Config
3015 hash (e.g., $Config{ccflags_nolargefiles}) so the extensions that are
3016 having problems can try configuring themselves without the
3017 largefileness.  This is admittedly not a clean solution, and the
3018 solution may not even work at all.  One potential failure is whether
3019 one can (or, if one can, whether it's a good idea) link together at
3020 all binaries with different ideas about file offsets, all this is
3021 platform-dependent.
3022
3023 =head2 Unicode Support on EBCDIC Still Spotty
3024
3025 Though mostly working, Unicode support still has problem spots on
3026 EBCDIC platforms.  One such known spot are the C<\p{}> and C<\P{}>
3027 regular expression constructs for code points less than 256: the
3028 C<pP> are testing for Unicode code points, not knowing about EBCDIC.
3029
3030 =head2 The Compiler Suite Is Still Very Experimental
3031
3032 The compiler suite is slowly getting better but it continues to be
3033 highly experimental.  Use in production environments is discouraged.
3034
3035 =head2 The Long Double Support Is Still Experimental
3036
3037 The ability to configure Perl's numbers to use "long doubles",
3038 floating point numbers of hopefully better accuracy, is still
3039 experimental.  The implementations of long doubles are not yet
3040 widespread and the existing implementations are not quite mature
3041 or standardised, therefore trying to support them is a rare
3042 and moving target.  The gain of more precision may also be offset
3043 by slowdown in computations (more bits to move around, and the
3044 operations are more likely to be executed by less optimised
3045 libraries).
3046
3047 =head2 Seen In Perl 5.7 But Gone Now
3048
3049 C<Time::Piece> (previously known as C<Time::Object>) was removed
3050 because it was felt that it didn't have enough value in it to be a
3051 core module.  It is still a useful module, though, and is available
3052 from the CPAN.
3053
3054 Perl 5.8 unfortunately does not build anymore on AmigaOS,
3055 this broke at some point accidentally.  Since there are not that many
3056 Amiga developers available, we could not get this fixed and tested in
3057 time for 5.8.0.
3058
3059 =head1 Reporting Bugs
3060
3061 If you find what you think is a bug, you might check the articles
3062 recently posted to the comp.lang.perl.misc newsgroup and the perl
3063 bug database at http://bugs.perl.org/  There may also be
3064 information at http://www.perl.com/ , the Perl Home Page.
3065
3066 If you believe you have an unreported bug, please run the B<perlbug>
3067 program included with your release.  Be sure to trim your bug down
3068 to a tiny but sufficient test case.  Your bug report, along with the
3069 output of C<perl -V>, will be sent off to perlbug@perl.org to be
3070 analysed by the Perl porting team.
3071
3072 =head1 SEE ALSO
3073
3074 The F<Changes> file for exhaustive details on what changed.
3075
3076 The F<INSTALL> file for how to build Perl.
3077
3078 The F<README> file for general stuff.
3079
3080 The F<Artistic> and F<Copying> files for copyright information.
3081
3082 =head1 HISTORY
3083
3084 Written by Jarkko Hietaniemi <F<jhi@iki.fi>>.
3085
3086 =cut