perlnewmod.pod: Fixed URL for Ken William's Tutorial
[p5sagit/p5-mst-13.2.git] / pod / perldelta.pod
CommitLineData
ba370e9b 1=head1 NAME
cc0fca54 2
f39f21d8 3perldelta - what is new for perl v5.8.0
cc0fca54 4
5=head1 DESCRIPTION
6
f39f21d8 7This document describes differences between the 5.6.0 release and the
85.8.0 release.
9
76663d67 10=head1 Highlights
11
12=over 4
13
14=item *
15
16Better Unicode support
17
18=item *
19
20New Thread Implementation
21
22=item *
23
24Many New Modules
25
26=item *
27
28Better Numeric Accuracy
29
30=item *
31
32Safe Signals
33
34=item *
35
36More Extensive Regression Testing
37
38=back
39
f39f21d8 40=head1 Incompatible Changes
41
77c8cf41 42=head2 64-bit platforms and malloc
43
057b7f2b 44If your pointers are 64 bits wide, the Perl malloc is no longer being
c2e23569 45used because it does not work well with 8-byte pointers. Also,
61947107 46usually the system mallocs on such platforms are much better optimized
c2e23569 47for such large memory models than the Perl malloc. Some memory-hungry
48Perl applications like the PDL don't work well with Perl's malloc.
49Finally, other applications than Perl (like modperl) tend to prefer
50the system malloc. Such platforms include Alpha and 64-bit HPPA,
51MIPS, PPC, and Sparc.
77c8cf41 52
53=head2 AIX Dynaloading
54
55The AIX dynaloading now uses in AIX releases 4.3 and newer the native
56dlopen interface of AIX instead of the old emulated interface. This
57change will probably break backward compatibility with compiled
58modules. The change was made to make Perl more compliant with other
59applications like modperl which are using the AIX native interface.
60
61=head2 Socket Extension Dynamic in VMS
62
63The Socket extension is now dynamically loaded instead of being
64statically built in. This may or may not be a problem with ancient
65TCP/IP stacks of VMS: we do not know since we weren't able to test
66Perl in such configurations.
67
68=head2 Different Definition of the Unicode Character Classes \p{In...}
69
70As suggested by the Unicode consortium, the Unicode character classes
71now prefer I<scripts> as opposed to I<blocks> (as defined by Unicode);
72in Perl, when the C<\p{In....}> and the C<\p{In....}> regular expression
73constructs are used. This has changed the definition of some of those
74character classes.
75
76The difference between scripts and blocks is that scripts are the
77glyphs used by a language or a group of languages, while the blocks
78are more artificial groupings of 256 characters based on the Unicode
79numbering.
80
81In general this change results in more inclusive Unicode character
82classes, but changes to the other direction also do take place:
83for example while the script C<Latin> includes all the Latin
84characters and their various diacritic-adorned versions, it
85does not include the various punctuation or digits (since they
86are not solely C<Latin>).
87
88Changes in the character class semantics may have happened if a script
89and a block happen to have the same name, for example C<Hebrew>.
90In such cases the script wins and C<\p{InHebrew}> now means the script
91definition of Hebrew. The block definition in still available,
92though, by appending C<Block> to the name: C<\p{InHebrewBlock}> means
93what C<\p{InHebrew}> meant in perl 5.6.0. For the full list
94of affected character classes, see L<perlunicode/Blocks>.
95
61947107 96=head2 Perl Parser Stress Tested
97
98The Perl parser has been stress tested using both random input and
99Markov chain input and the few found crashes and lockups have been
100fixed.
101
c2e23569 102=head2 REF(...) Instead Of SCALAR(...)
77c8cf41 103
057b7f2b 104A reference to a reference now stringifies as "REF(0x81485ec)" instead
c2e23569 105of "SCALAR(0x81485ec)" in order to be more consistent with the return
106value of ref().
77c8cf41 107
c2e23569 108=head2 Deprecations
77c8cf41 109
61947107 110=over 4
77c8cf41 111
61947107 112=item *
f39f21d8 113
61947107 114The semantics of bless(REF, REF) were unclear and until someone proves
115it to make some sense, it is forbidden.
f39f21d8 116
117=item *
118
c2e23569 119The obsolete chat2 library that should never have been allowed
120to escape the laboratory has been decommissioned.
f39f21d8 121
122=item *
123
61947107 124The very dusty examples in the eg/ directory have been removed.
125Suggestions for new shiny examples welcome but the main issue is that
126the examples need to be documented, tested and (most importantly)
127maintained.
f39f21d8 128
129=item *
130
c2e23569 131The (bogus) escape sequences \8 and \9 now give an optional warning
132("Unrecognized escape passed through"). There is no need to \-escape
133any C<\w> character.
f39f21d8 134
135=item *
136
c2e23569 137The list of filenames from glob() (or <...>) is now by default sorted
138alphabetically to be csh-compliant. (bsd_glob() does still sort platform
139natively, ASCII or EBCDIC, unless GLOB_ALPHASORT is specified.)
f39f21d8 140
141=item *
142
c2e23569 143Although "you shouldn't do that", it was possible to write code that
144depends on Perl's hashed key order (Data::Dumper does this). The new
145algorithm "One-at-a-Time" produces a different hashed key order.
146More details are in L</"Performance Enhancements">.
f39f21d8 147
148=item *
149
61947107 150lstat(FILEHANDLE) now gives a warning because the operation makes no sense.
151In future releases this may become a fatal error.
f39f21d8 152
153=item *
154
057b7f2b 155The C<package;> syntax (C<package> without an argument) has been
c2e23569 156deprecated. Its semantics were never that clear and its
157implementation even less so. If you have used that feature to
158disallow all but fully qualified variables, C<use strict;> instead.
61947107 159
160=item *
161
c2e23569 162The unimplemented POSIX regex features [[.cc.]] and [[=c=]] are still
163recognised but now cause fatal errors. The previous behaviour of
164ignoring them by default and warning if requested was unacceptable
165since it, in a way, falsely promised that the features could be used.
61947107 166
167=item *
168
c2e23569 169The current user-visible implementation of pseudo-hashes (the weird
170use of the first array element) is deprecated starting from Perl 5.8.0
171and will be removed in Perl 5.10.0, and the feature will be
172implemented differently. Not only is the current interface rather
173ugly, but the current implementation slows down normal array and hash
174use quite noticeably. The C<fields> pragma interface will remain
175available.
61947107 176
177=item *
178
aecce728 179The syntaxes C<< @a->[...] >> and C<< %h->{...} >> have now been deprecated.
61947107 180
181=item *
182
c2e23569 183After years of trying the suidperl is considered to be too complex to
184ever be considered truly secure. The suidperl functionality is likely
185to be removed in a future release.
186
187=item *
188
189The long deprecated uppercase aliases for the string comparison
190operators (EQ, NE, LT, LE, GE, GT) have now been removed.
191
192=item *
193
194The tr///C and tr///U features have been removed and will not return;
195the interface was a mistake. Sorry about that. For similar
196functionality, see pack('U0', ...) and pack('C0', ...).
f39f21d8 197
198=back
199
61947107 200=head1 Core Enhancements
201
77c8cf41 202=head2 PerlIO is Now The Default
f39f21d8 203
204=over 4
205
206=item *
207
77c8cf41 208IO is now by default done via PerlIO rather than system's "stdio".
209PerlIO allows "layers" to be "pushed" onto a file handle to alter the
210handle's behaviour. Layers can be specified at open time via 3-arg
211form of open:
f39f21d8 212
77c8cf41 213 open($fh,'>:crlf :utf8', $path) || ...
f39f21d8 214
77c8cf41 215or on already opened handles via extended C<binmode>:
f39f21d8 216
77c8cf41 217 binmode($fh,':encoding(iso-8859-7)');
f39f21d8 218
77c8cf41 219The built-in layers are: unix (low level read/write), stdio (as in
220previous Perls), perlio (re-implementation of stdio buffering in a
221portable manner), crlf (does CRLF <=> "\n" translation as on Win32,
222but available on any platform). A mmap layer may be available if
223platform supports it (mostly UNIXes).
f39f21d8 224
77c8cf41 225Layers to be applied by default may be specified via the 'open' pragma.
226
227See L</"Installation and Configuration Improvements"> for the effects
228of PerlIO on your architecture name.
f39f21d8 229
230=item *
231
77c8cf41 232File handles can be marked as accepting Perl's internal encoding of Unicode
233(UTF-8 or UTF-EBCDIC depending on platform) by a pseudo layer ":utf8" :
f39f21d8 234
77c8cf41 235 open($fh,">:utf8","Uni.txt");
f39f21d8 236
77c8cf41 237Note for EBCDIC users: the pseudo layer ":utf8" is erroneously named
238for you since it's not UTF-8 what you will be getting but instead
239UTF-EBCDIC. See L<perlunicode>, L<utf8>, and
240http://www.unicode.org/unicode/reports/tr16/ for more information.
241In future releases this naming may change.
f39f21d8 242
243=item *
244
77c8cf41 245File handles can translate character encodings from/to Perl's internal
246Unicode form on read/write via the ":encoding()" layer.
f39f21d8 247
248=item *
249
77c8cf41 250File handles can be opened to "in memory" files held in Perl scalars via:
251
252 open($fh,'>', \$variable) || ...
f39f21d8 253
254=item *
255
77c8cf41 256Anonymous temporary files are available without need to
257'use FileHandle' or other module via
f39f21d8 258
77c8cf41 259 open($fh,"+>", undef) || ...
f39f21d8 260
77c8cf41 261That is a literal undef, not an undefined value.
f39f21d8 262
263=item *
264
77c8cf41 265The list form of C<open> is now implemented for pipes (at least on UNIX):
f39f21d8 266
77c8cf41 267 open($fh,"-|", 'cat', '/etc/motd')
f39f21d8 268
77c8cf41 269creates a pipe, and runs the equivalent of exec('cat', '/etc/motd') in
270the child process.
f39f21d8 271
e1f170bd 272=back
f39f21d8 273
e1f170bd 274=head2 Signals Are Now Safe
f39f21d8 275
e1f170bd 276Perl used to be fragile in that signals arriving at inopportune moments
277could corrupt Perl's internal state. Now Perl postpones handling of
278signals until it's safe.
f39f21d8 279
e1f170bd 280=head2 Unicode Overhaul
f39f21d8 281
e1f170bd 282Unicode in general should be now much more usable than in Perl 5.6.0
283(or even in 5.6.1). Unicode can be used in hash keys, Unicode in
284regular expressions should work now, Unicode in tr/// should work now,
285Unicode in I/O should work now.
f39f21d8 286
e1f170bd 287=over 4
f39f21d8 288
289=item *
290
e1f170bd 291The Unicode Character Database coming with Perl has been upgraded
292to Unicode 3.1.1. For more information, see http://www.unicode.org/.
f39f21d8 293
294=item *
295
77c8cf41 296For developers interested in enhancing Perl's Unicode capabilities:
297almost all the UCD files are included with the Perl distribution in
e1f170bd 298the lib/unicore subdirectory. The most notable omission, for space
77c8cf41 299considerations, is the Unihan database.
f39f21d8 300
301=item *
302
77c8cf41 303The Unicode character classes \p{Blank} and \p{SpacePerl} have been
304added. "Blank" is like C isblank(), that is, it contains only
305"horizontal whitespace" (the space character is, the newline isn't),
306and the "SpacePerl" is the Unicode equivalent of C<\s> (\p{Space}
307isn't, since that includes the vertical tabulator character, whereas
308C<\s> doesn't.)
f39f21d8 309
310=back
311
77c8cf41 312=head2 Understanding of Numbers
313
314In general a lot of fixing has happened in the area of Perl's
315understanding of numbers, both integer and floating point. Since in
316many systems the standard number parsing functions like C<strtoul()>
317and C<atof()> seem to have bugs, Perl tries to work around their
318deficiencies. This results hopefully in more accurate numbers.
f39f21d8 319
e1f170bd 320Perl now tries internally to use integer values in numeric conversions
321and basic arithmetics (+ - * /) if the arguments are integers, and
322tries also to keep the results stored internally as integers.
057b7f2b 323This change leads to often slightly faster and always less lossy
e1f170bd 324arithmetics. (Previously Perl always preferred floating point numbers
325in its math.)
326
327=head2 Miscellaneous Enhancements
328
f39f21d8 329=over 4
330
331=item *
332
e1f170bd 333AUTOLOAD is now lvaluable, meaning that you can add the :lvalue attribute
334to AUTOLOAD subroutines and you can assign to the AUTOLOAD return value.
335
336=item *
337
61947107 338C<perl -d:Module=arg,arg,arg> now works (previously one couldn't pass
339in multiple arguments.)
f39f21d8 340
341=item *
342
61947107 343END blocks are now run even if you exit/die in a BEGIN block.
344Internally, the execution of END blocks is now controlled by
345PL_exit_flags & PERL_EXIT_DESTRUCT_END. This enables the new
346behaviour for Perl embedders. This will default in 5.10. See
347L<perlembed>.
f39f21d8 348
349=item *
350
e1f170bd 351Formats now support zero-padded decimal fields.
f39f21d8 352
353=item *
354
77c8cf41 355Lvalue subroutines can now return C<undef> in list context.
f39f21d8 356
357=item *
358
61947107 359A new special regular expression variable has been introduced:
360C<$^N>, which contains the most-recently closed group (submatch).
f39f21d8 361
362=item *
363
61947107 364C<no Module;> now works even if there is no "sub unimport" in the Module.
f39f21d8 365
366=item *
367
61947107 368The numerical comparison operators return C<undef> if either operand
369is a NaN. Previously the behaviour was unspecified.
f39f21d8 370
371=item *
372
e1f170bd 373The following builtin functions are now overridable: each(), keys(),
374pop(), push(), shift(), splice(), unshift().
375
376=item *
377
61947107 378C<pack('U0a*', ...)> can now be used to force a string to UTF8.
f39f21d8 379
380=item *
381
61947107 382my __PACKAGE__ $obj now works.
f39f21d8 383
384=item *
385
e1f170bd 386The printf() and sprintf() now support parameter reordering using the
387C<%\d+\$> and C<*\d+\$> syntaxes. For example
388
389 print "%2\$s %1\$s\n", "foo", "bar";
390
391will print "bar foo\n"; This feature helps in writing
392internationalised software.
f39f21d8 393
394=item *
395
e1f170bd 396prototype(\&) is now available.
61947107 397
398=item *
399
e1f170bd 400prototype(\[$@%&]) is now available to implicitly create references
401(useful for example if you want to emulate the tie() interface).
61947107 402
403=item *
404
e1f170bd 405UNTIE method is now recognised.
61947107 406
407=item *
408
409L<utime> now supports C<utime undef, undef, @files> to change the
410file timestamps to the current time.
411
412=item *
413
e1f170bd 414The rules for allowing underscores (underbars) in numeric constants
415have been relaxed and simplified: now you can have an underscore
416simply B<between digits>.
f39f21d8 417
418=back
419
77c8cf41 420=head1 Modules and Pragmata
f39f21d8 421
1e13d81f 422=head2 New Modules and Pragmata
f39f21d8 423
424=over 4
425
426=item *
427
61947107 428C<Attribute::Handlers> allows a class to define attribute handlers.
f39f21d8 429
61947107 430 package MyPack;
431 use Attribute::Handlers;
432 sub Wolf :ATTR(SCALAR) { print "howl!\n" }
f39f21d8 433
61947107 434 # later, in some package using or inheriting from MyPack...
f39f21d8 435
61947107 436 my MyPack $Fluffy : Wolf; # the attribute handler Wolf will be called
ba370e9b 437
61947107 438Both variables and routines can have attribute handlers. Handlers can
439be specific to type (SCALAR, ARRAY, HASH, or CODE), or specific to the
440exact compilation phase (BEGIN, CHECK, INIT, or END).
f39f21d8 441
61947107 442=item *
f39f21d8 443
61947107 444B<B::Concise> is a new compiler backend for walking the Perl syntax
445tree, printing concise info about ops, from Stephen McCamant. The
446output is highly customisable. See L<B::Concise>.
f39f21d8 447
448=item *
449
61947107 450C<Class::ISA> for reporting the search path for a class's ISA tree,
451by Sean Burke, has been added. See L<Class::ISA>.
f39f21d8 452
453=item *
454
61947107 455C<Cwd> has now a split personality: if possible, an XS extension is
456used, (this will hopefully be faster, more secure, and more robust)
457but if not possible, the familiar Perl implementation is used.
f39f21d8 458
459=item *
460
e1f170bd 461C<Devel::PPPort>, originally from Kenneth Albanowski and now
462maintained by Paul Marquess, has been added. It is primarily used
463by C<h2xs> to enhance portability of of XS modules between different
464versions of Perl.
1e13d81f 465
466=item *
467
61947107 468C<Digest>, frontend module for calculating digests (checksums), from
469Gisle Aas, has been added. See L<Digest>.
f39f21d8 470
471=item *
472
61947107 473C<Digest::MD5> for calculating MD5 digests (checksums) as defined in
474RFC 1321, from Gisle Aas, has been added. See L<Digest::MD5>.
f39f21d8 475
476 use Digest::MD5 'md5_hex';
477
478 $digest = md5_hex("Thirsty Camel");
479
480 print $digest, "\n"; # 01d19d9d2045e005c3f1b80e8b164de1
481
61947107 482NOTE: the C<MD5> backward compatibility module is deliberately not
e1f170bd 483included since its further use is discouraged.
f39f21d8 484
f39f21d8 485=item *
486
61947107 487C<Encode>, by Nick Ing-Simmons, provides a mechanism to translate
f39f21d8 488between different character encodings. Support for Unicode,
489ISO-8859-*, ASCII, CP*, KOI8-R, and three variants of EBCDIC are
490compiled in to the module. Several other encodings (like Japanese,
491Chinese, and MacIntosh encodings) are included and will be loaded at
61947107 492runtime. See L<Encode>.
f39f21d8 493
494Any encoding supported by Encode module is also available to the
495":encoding()" layer if PerlIO is used.
496
61947107 497=item *
498
499C<I18N::Langinfo> can be use to query locale information.
500See L<I18N::Langinfo>.
f39f21d8 501
502=item *
503
61947107 504C<I18N::LangTags> has functions for dealing with RFC3066-style
bea4d472 505language tags, by Sean Burke. See L<I18N::LangTags>.
61947107 506
507=item *
508
509C<ExtUtils::Constant> is a new tool for extension writers for
510generating XS code to import C header constants, by Nicholas Clark.
511See L<ExtUtils::Constant>.
512
513=item *
514
515C<Filter::Simple> is an easy-to-use frontend to Filter::Util::Call,
516from Damian Conway. See L<Filter::Simple>.
f39f21d8 517
518 # in MyFilter.pm:
519
520 package MyFilter;
521
522 use Filter::Simple sub {
523 while (my ($from, $to) = splice @_, 0, 2) {
524 s/$from/$to/g;
525 }
526 };
527
528 1;
529
530 # in user's code:
531
532 use MyFilter qr/red/ => 'green';
533
534 print "red\n"; # this code is filtered, will print "green\n"
535 print "bored\n"; # this code is filtered, will print "bogreen\n"
536
537 no MyFilter;
538
539 print "red\n"; # this code is not filtered, will print "red\n"
540
61947107 541=item *
542
543C<File::Temp> allows one to create temporary files and directories in
544an easy, portable, and secure way, by Tim Jenness. See L<File::Temp>.
545
546=item *
547
548C<Filter::Util::Call> provides you with the framework to write
549I<Source Filters> in Perl, from Paul Marquess. For most uses the
550frontend Filter::Simple is to be preferred. See L<Filter::Util::Call>.
551
552=item *
553
554L<libnet> is a collection of perl5 modules related to network
555programming, from Graham Barr. See L<Net::FTP>, L<Net::NNTP>,
556L<Net::Ping>, L<Net::POP3>, L<Net::SMTP>, and L<Net::Time>.
557
558Perl installation leaves libnet unconfigured, use F<libnetcfg> to configure.
f39f21d8 559
560=item *
561
61947107 562C<List::Util> is a selection of general-utility list subroutines, like
bea4d472 563sum(), min(), first(), and shuffle(), by Graham Barr. See L<List::Util>.
f39f21d8 564
565=item *
566
61947107 567C<Locale::Constants>, C<Locale::Country>, C<Locale::Currency>, and
568C<Locale::Language>, from Neil Bowers, have been added. They provide the
569codes for various locale standards, such as "fr" for France, "usd" for
570US Dollar, and "jp" for Japanese.
f39f21d8 571
572 use Locale::Country;
573
574 $country = code2country('jp'); # $country gets 'Japan'
575 $code = country2code('Norway'); # $code gets 'no'
576
577See L<Locale::Constants>, L<Locale::Country>, L<Locale::Currency>,
61947107 578and L<Locale::Language>.
579
580=item *
581
582C<Locale::Maketext> is localization framework from Sean Burke. See
583L<Locale::Maketext>, and L<Locale::Maketext::TPJ13>. The latter is an
584article about software localization, originally published in The Perl
585Journal #13, republished here with kind permission.
586
587=item *
588
589C<Memoize> can make your functions faster by trading space for time,
590from Mark-Jason Dominus. See L<Memoize>.
f39f21d8 591
592=item *
593
61947107 594C<MIME::Base64> allows you to encode data in base64, from Gisle Aas,
595as defined in RFC 2045 - I<MIME (Multipurpose Internet Mail
596Extensions)>.
f39f21d8 597
598 use MIME::Base64;
599
600 $encoded = encode_base64('Aladdin:open sesame');
601 $decoded = decode_base64($encoded);
602
603 print $encoded, "\n"; # "QWxhZGRpbjpvcGVuIHNlc2FtZQ=="
604
61947107 605See L<MIME::Base64>.
f39f21d8 606
607=item *
608
61947107 609C<MIME::QuotedPrint> allows you to encode data in quoted-printable
610encoding, as defined in RFC 2045 - I<MIME (Multipurpose Internet Mail
611Extensions)>, from Gisle Aas.
f39f21d8 612
613 use MIME::QuotedPrint;
614
615 $encoded = encode_qp("Smiley in Unicode: \x{263a}");
616 $decoded = decode_qp($encoded);
617
618 print $encoded, "\n"; # "Smiley in Unicode: =263A"
619
620MIME::QuotedPrint has been enhanced to provide the basic methods
621necessary to use it with PerlIO::Via as in :
622
623 use MIME::QuotedPrint;
057b7f2b 624 open($fh,">Via(MIME::QuotedPrint)",$path);
f39f21d8 625
61947107 626See L<MIME::QuotedPrint>.
f39f21d8 627
628=item *
629
61947107 630C<NEXT> is pseudo-class for method redispatch, from Damian Conway.
631See L<NEXT>.
f39f21d8 632
633=item *
634
1e13d81f 635C<open> is a new pragma for setting the default I/O disciplines
636for open().
637
638=item *
639
61947107 640C<PerlIO::Scalar> provides the implementation of IO to "in memory"
641Perl scalars as discussed above, from Nick Ing-Simmons. It also
642serves as an example of a loadable PerlIO layer. Other future
643possibilities include PerlIO::Array and PerlIO::Code.
644See L<PerlIO::Scalar>.
645
646=item *
647
648C<PerlIO::Via> acts as a PerlIO layer and wraps PerlIO layer
649functionality provided by a class (typically implemented in perl
650code), from Nick Ing-Simmons.
f39f21d8 651
652 use MIME::QuotedPrint;
057b7f2b 653 open($fh,">Via(MIME::QuotedPrint)",$path);
f39f21d8 654
655This will automatically convert everything output to C<$fh>
61947107 656to Quoted-Printable. See L<PerlIO::Via>.
f39f21d8 657
658=item *
659
1e13d81f 660C<Pod::ParseLink>, by Russ Allbery, has been added,
e1f170bd 661to parse L&lt;&gt; links in pods as described in the new
1e13d81f 662perlpodspec.
663
664=item *
665
61947107 666C<Pod::Text::Overstrike>, by Joe Smith, has been added.
f39f21d8 667It converts POD data to formatted overstrike text.
61947107 668See L<Pod::Text::Overstrike>.
f39f21d8 669
670=item *
671
61947107 672C<Scalar::Util> is a selection of general-utility scalar subroutines,
673like blessed(), reftype(), and tainted(). See L<Scalar::Util>.
674
675=item *
676
1e13d81f 677C<sort> is a new pragma for controlling the behaviour of sort().
678
679=item *
680
61947107 681C<Storable> gives persistence to Perl data structures by allowing the
682storage and retrieval of Perl data to and from files in a fast and
683compact binary format, from Raphael Manfredi. See L<Storable>.
684
685=item *
686
687C<Switch>, from Damian Conway, has been added. Just by saying
f39f21d8 688
689 use Switch;
690
691you have C<switch> and C<case> available in Perl.
692
693 use Switch;
694
695 switch ($val) {
696
697 case 1 { print "number 1" }
698 case "a" { print "string a" }
699 case [1..10,42] { print "number in list" }
700 case (@array) { print "number in list" }
701 case /\w+/ { print "pattern" }
702 case qr/\w+/ { print "pattern" }
703 case (%hash) { print "entry in hash" }
704 case (\%hash) { print "entry in hash" }
705 case (\&sub) { print "arg to subroutine" }
706 else { print "previous case not true" }
707 }
708
61947107 709See L<Switch>.
710
711=item *
712
713C<Test::More> is yet another framework for writing test scripts,
714more extensive than Test::Simple, by Michael Schwern. See L<Test::More>.
715
716=item *
717
aecce728 718C<Test::Simple> has basic utilities for writing tests, by Michael
61947107 719Schwern. See L<Test::Simple>.
77c8cf41 720
721=item *
722
61947107 723C<Text::Balanced> has been added, for extracting delimited text
724sequences from strings, from Damian Conway.
77c8cf41 725
726 use Text::Balanced 'extract_delimited';
727
728 ($a, $b) = extract_delimited("'never say never', he never said", "'", '');
729
730$a will be "'never say never'", $b will be ', he never said'.
731
732In addition to extract_delimited() there are also extract_bracketed(),
733extract_quotelike(), extract_codeblock(), extract_variable(),
734extract_tagged(), extract_multiple(), gen_delimited_pat(), and
735gen_extract_tagged(). With these you can implement rather advanced
61947107 736parsing algorithms. See L<Text::Balanced>.
77c8cf41 737
738=item *
739
c2e23569 740C<threads> is an interface to interpreter threads, by Arthur Bergman.
61947107 741Interpreter threads (ithreads) is the new thread model introduced in
c2e23569 742Perl 5.6 but only available as an internal interface for extension
743writers (and for Win32 Perl for C<fork()> emulation). See L<threads>.
77c8cf41 744
745=item *
746
61947107 747C<threads::shared> allows data sharing for interpreter threads, from
748Arthur Bergman. In the ithreads model any data sharing between
749threads must be explicit, as opposed to the old 5.005 thread model
750where data sharing was implicit. See L<threads::shared>.
77c8cf41 751
752=item *
753
61947107 754C<Tie::RefHash::Nestable>, by Edward Avis, allows storing hash
ba370e9b 755references (unlike the standard Tie::RefHash) The module is contained
756within Tie::RefHash, see L<Tie::RefHash>.
77c8cf41 757
758=item *
759
61947107 760C<Time::HiRes> provides high resolution timing (ualarm, usleep,
761and gettimeofday), from Douglas E. Wegscheid. See L<Time::HiRes>.
77c8cf41 762
763=item *
764
61947107 765C<Unicode::UCD> offers a querying interface to the Unicode Character
766Database. See L<Unicode::UCD>.
77c8cf41 767
768=item *
769
61947107 770C<Unicode::Collate> implements the UCA (Unicode Collation Algorithm)
771for sorting Unicode strings, by SADAHIRO Tomoyuki. See L<Unicode::Collate>.
77c8cf41 772
773=item *
774
61947107 775C<Unicode::Normalize> implements the various Unicode normalization
776forms, by SADAHIRO Tomoyuki. See L<Unicode::Normalize>.
77c8cf41 777
778=item *
779
61947107 780C<XS::Typemap>, by Tim Jenness, is a test extension that exercises XS
781typemaps. Nothing gets installed but for extension writers the code
782is worth studying.
77c8cf41 783
784=back
785
786=head2 Updated And Improved Modules and Pragmata
787
788=over 4
789
790=item *
791
61947107 792The following independently supported modules have been updated to the
793newest versions from CPAN: CGI, CPAN, DB_File, File::Spec, File::Temp,
794Getopt::Long, Math::BigFloat, Math::BigInt, the podlators bundle
795(Pod::Man, Pod::Text), Pod::LaTeX, Pod::Parser, Storable,
796Term::ANSIColor, Test, Text-Tabs+Wrap.
77c8cf41 797
798=item *
799
61947107 800The attributes::reftype() now works on tied arguments.
77c8cf41 801
802=item *
803
057b7f2b 804AutoLoader can now be disabled with C<no AutoLoader;>.
77c8cf41 805
806=item *
807
1e13d81f 808B::Deparse has been significantly enhanced. It now can deparse almost
809all of the standard test suite (so that the tests still succeed).
810There is a make target "test.deparse" for trying this out.
77c8cf41 811
812=item *
813
1e13d81f 814Class::Struct can now define the classes in compile time.
77c8cf41 815
816=item *
817
1e13d81f 818Class::Struct now assigns the array/hash element if the accessor
819is called with an array/hash element as the B<sole> argument.
77c8cf41 820
821=item *
822
1e13d81f 823Data::Dumper has now an option to sort hashes.
77c8cf41 824
825=item *
826
1e13d81f 827Data::Dumper has now an option to dump code references
828using B::Deparse.
77c8cf41 829
830=item *
831
1e13d81f 832The English module can now be used without the infamous performance
833hit by saying
77c8cf41 834
1e13d81f 835 use English '-no_performance_hit';
77c8cf41 836
1e13d81f 837(Assuming, of course, that one doesn't need the troublesome variables
838C<$`>, C<$&>, or C<$'>.) Also, introduced C<@LAST_MATCH_START> and
839C<@LAST_MATCH_END> English aliases for C<@-> and C<@+>.
77c8cf41 840
841=item *
842
1e13d81f 843Fcntl, Socket, and Sys::Syslog have been rewritten to use the
844new-style constant dispatch section (see L<ExtUtils::Constant>).
845This means that they will be more robust and hopefully faster.
77c8cf41 846
847=item *
848
1e13d81f 849File::Find now has pre- and post-processing callbacks. It also
850correctly changes directories when chasing symbolic links. Callbacks
851(naughtily) exiting with "next;" instead of "return;" now work.
61947107 852
853=item *
854
1e13d81f 855File::Find is now (again) reentrant. It also has been made
856more portable.
77c8cf41 857
61947107 858=item *
859
1e13d81f 860File::Glob::glob() renamed to File::Glob::bsd_glob() to avoid
861prototype mismatch with CORE::glob().
61947107 862
863=item *
864
865File::Glob now supports C<GLOB_LIMIT> constant to limit the size of
866the returned list of filenames.
77c8cf41 867
868=item *
869
870Devel::Peek now has an interface for the Perl memory statistics
871(this works only if you are using perl's malloc, and if you have
872compiled with debugging).
873
874=item *
875
1e13d81f 876IPC::Open3 now allows the use of numeric file descriptors.
877
878=item *
879
77c8cf41 880IO::Socket has now atmark() method, which returns true if the socket
881is positioned at the out-of-band mark. The method is also exportable
882as a sockatmark() function.
883
884=item *
885
886IO::Socket::INET has support for ReusePort option (if your platform
887supports it). The Reuse option now has an alias, ReuseAddr. For clarity
888you may want to prefer ReuseAddr.
889
890=item *
891
61947107 892IO::Socket::INET now supports C<LocalPort> of zero (usually meaning
893that the operating system will make one up.)
77c8cf41 894
895=item *
896
1e13d81f 897use lib now works identically to @INC. Removing directories
898with 'no lib' now works.
899
900=item *
901
902Math::BigFloat and Math::BigInt have undergone a full rewrite.
903They are now magnitudes faster, and they support various
61947107 904bignum libraries such as GMP and PARI as their backends.
f39f21d8 905
906=item *
907
61947107 908Net::Ping has been enhanced. There is now "external" protocol which
909uses Net::Ping::External module which runs external ping(1) and parses
910the output. An alpha version of Net::Ping::External is available in
911CPAN and in 5.7.2 the Net::Ping::External may be integrated to Perl.
f39f21d8 912
77c8cf41 913=item *
f39f21d8 914
c2e23569 915C<POSIX::sigaction()> is now much more flexible and robust.
61947107 916You can now install coderef handlers, 'DEFAULT', and 'IGNORE'
917handlers, installing new handlers was not atomic.
f39f21d8 918
919=item *
920
76663d67 921In C<Safe> the C<%INC> now localised in a Safe compartment so that
922use/require work.
923
924=item *
925
926In C<Search::Dict> one can now have a pre-processing hook for the
927lines being searched.
1e13d81f 928
929=item *
930
931The Shell module now has an OO interface.
932
933=item *
934
61947107 935The Test module has been significantly enhanced.
f39f21d8 936
937=item *
938
61947107 939The C<vars> pragma now supports declaring fully qualified variables.
77c8cf41 940(Something that C<our()> does not and will not support.)
f39f21d8 941
888aee59 942=item *
943
61947107 944The utf8:: name space (as in the pragma) provides various
945Perl-callable functions to provide low level access to Perl's
946internal Unicode representation. At the moment only length()
947has been implemented.
888aee59 948
f39f21d8 949=back
950
77c8cf41 951=head1 Utility Changes
f39f21d8 952
953=over 4
954
955=item *
956
61947107 957Emacs perl mode (emacs/cperl-mode.el) has been updated to version
77c8cf41 9584.31.
f39f21d8 959
960=item *
961
61947107 962F<emacs/e2ctags.pl> is now much faster.
f39f21d8 963
964=item *
965
1e13d81f 966C<h2ph> now supports C trigraphs.
967
968=item *
969
970C<h2xs> now produces a template README.
f39f21d8 971
77c8cf41 972=item *
973
1e13d81f 974C<h2xs> now uses C<Devel::PPort> for better portability between
975different versions of Perl.
f39f21d8 976
977=item *
978
1e13d81f 979C<h2xs> uses the new L<ExtUtils::Constant> module which will affect
61947107 980newly created extensions that define constants. Since the new code is
981more correct (if you have two constants where the first one is a
982prefix of the second one, the first constant B<never> gets defined),
983less lossy (it uses integers for integer constant, as opposed to the
984old code that used floating point numbers even for integer constants),
985and slightly faster, you might want to consider regenerating your
986extension code (the new scheme makes regenerating easy).
987L<h2xs> now also supports C trigraphs.
f39f21d8 988
989=item *
990
1e13d81f 991C<libnetcfg> has been added to configure the libnet.
f39f21d8 992
993=item *
994
1e13d81f 995C<perlbug> is now much more robust. It also sends the bug report to
61947107 996perl.org, not perl.com.
f39f21d8 997
998=item *
999
1e13d81f 1000C<perlcc> has been rewritten and its user interface (that is,
61947107 1001command line) is much more like that of the UNIX C compiler, cc.
f39f21d8 1002
1003=item *
1004
aecce728 1005C<perlivp> is a new Installation Verification Procedure utility
1006for running any time after installing Perl.
f39f21d8 1007
1008=item *
1009
1e13d81f 1010C<pod2html> now allows specifying a cache directory.
f39f21d8 1011
1012=item *
1013
1e13d81f 1014C<s2p> has been completely rewritten in Perl. (It is in fact a full
1015implementation of sed in Perl: you can use the sed functionality by
1016using the C<psed> utility.)
61947107 1017
1018=item *
1019
1e13d81f 1020C<xsubpp> now understands POD documentation embedded in the *.xs files.
f39f21d8 1021
1022=item *
1023
1e13d81f 1024C<xsubpp> now supports OUT keyword.
f39f21d8 1025
1026=back
1027
77c8cf41 1028=head1 New Documentation
f39f21d8 1029
1030=over 4
1031
1032=item *
1033
77c8cf41 1034perl56delta details the changes between the 5.005 release and the
10355.6.0 release.
f39f21d8 1036
1037=item *
1038
61947107 1039perlclib documents the internal replacements for standard C library
1040functions. (Interesting only for extension writers and Perl core
1041hackers.)
1042
1043=item *
1044
77c8cf41 1045perldebtut is a Perl debugging tutorial.
f39f21d8 1046
77c8cf41 1047=item *
f39f21d8 1048
77c8cf41 1049perlebcdic contains considerations for running Perl on EBCDIC platforms.
f39f21d8 1050
77c8cf41 1051=item *
1052
888aee59 1053perlintro is a gentle introduction to Perl.
1054
1055=item *
1056
61947107 1057perliol documents the internals of PerlIO with layers.
1058
1059=item *
1060
888aee59 1061perlmodstyle is a style guide for writing modules.
1062
1063=item *
1064
77c8cf41 1065perlnewmod tells about writing and submitting a new module.
f39f21d8 1066
1067=item *
1068
34babc16 1069perlpacktut is a pack() tutorial.
1070
1071=item *
1072
888aee59 1073perlpod has been rewritten to be clearer and to record the best
1074practices gathered over the years.
1075
1076=item *
1077
057b7f2b 1078perlpodspec is a more formal specification of the pod format,
888aee59 1079mainly of interest for writers of pod applications, not to
1080people writing in pod.
1081
1082=item *
1083
77c8cf41 1084perlretut is a regular expression tutorial.
f39f21d8 1085
1086=item *
1087
77c8cf41 1088perlrequick is a regular expressions quick-start guide.
1089Yes, much quicker than perlretut.
f39f21d8 1090
77c8cf41 1091=item *
f39f21d8 1092
61947107 1093perltodo has been updated.
1094
1095=item *
1096
888aee59 1097perltootc has been renamed as perltooc (to not to conflict
61947107 1098with perltoot in filesystems restricted to "8.3" names)
888aee59 1099
1100=item *
1101
1102perluniintro is an introduction to using Unicode in Perl
1103(perlunicode is more of a reference)
1104
1105=item *
1106
77c8cf41 1107perlutil explains the command line utilities packaged with the Perl
1108distribution.
1109
1110=back
f39f21d8 1111
61947107 1112The following platform-specific documents are available before
1113the installation as README.I<platform>, and after the installation
1114as perlI<platform>:
f39f21d8 1115
61947107 1116 perlaix perlamiga perlapollo perlbeos perlbs2000
1117 perlce perlcygwin perldgux perldos perlepoc perlhpux
1118 perlhurd perlmachten perlmacos perlmint perlmpeix
1119 perlnetware perlos2 perlos390 perlplan9 perlqnx perlsolaris
1120 perltru64 perluts perlvmesa perlvms perlvos perlwin32
77c8cf41 1121
1122=over 4
1123
1124=item *
1125
61947107 1126The documentation for the POSIX-BC platform is called "BS2000", to avoid
1127confusion with the Perl POSIX module.
77c8cf41 1128
1129=item *
1130
61947107 1131The documentation for the WinCE platform is called "CE", to avoid
1132confusion with the perlwin32 documentation on 8.3-restricted filesystems.
77c8cf41 1133
1134=back
1135
1136=head1 Performance Enhancements
1137
1138=over 4
1139
1140=item *
1141
1142map() that changes the size of the list should now work faster.
1143
1144=item *
1145
e1f170bd 1146sort() has been changed to use primarily mergesort internally as
1147opposed to the earlier quicksort. For very small lists this may
1148result in slightly slower sorting times, but in general the speedup
1149should be at least 20%. Additional bonuses are that the worst case
1150behaviour of sort() is now better (in computer science terms it now
1151runs in time O(N log N), as opposed to quicksort's Theta(N**2)
1152worst-case run time behaviour), and that sort() is now stable
1153(meaning that elements with identical keys will stay ordered as they
1154were before the sort). See the C<sort> pragma for information.
77c8cf41 1155
05e25c75 1156The story in more detail: suppose you want to serve yourself a little
1157slice of Pi.
1158
1159 @digits = ( 3,1,4,1,5,9 );
1160
1161A numerical sort of the digits will yield (1,1,3,4,5,9), as expected.
1162Which C<1> comes first is hard to know, since one C<1> looks pretty
1163much like any other. You can regard this as totally trivial,
1164or somewhat profound. However, if you just want to sort the even
1165digits ahead of the odd ones, then what will
1166
1167 sort { ($a % 2) <=> ($b % 2) } @digits;
1168
1169yield? The only even digit, C<4>, will come first. But how about
1170the odd numbers, which all compare equal? With the quicksort algorithm
1171used to implement Perl 5.6 and earlier, the order of ties is left up
1172to the sort. So, as you add more and more digits of Pi, the order
1173in which the sorted even and odd digits appear will change.
1174and, for sufficiently large slices of Pi, the quicksort algorithm
1175in Perl 5.8 won't return the same results even if reinvoked with the
1176same input. The justification for this rests with quicksort's
1177worst case behavior. If you run
1178
1179 sort { $a <=> $b } ( 1 .. $N , 1 .. $N );
1180
1181(something you might approximate if you wanted to merge two sorted
1182arrays using sort), doubling $N doesn't just double the quicksort time,
1183it I<quadruples> it. Quicksort has a worst case run time that can
1184grow like N**2, so-called I<quadratic> behaviour, and it can happen
1185on patterns that may well arise in normal use. You won't notice this
1186for small arrays, but you I<will> notice it with larger arrays,
1187and you may not live long enough for the sort to complete on arrays
1188of a million elements. So the 5.8 quicksort scrambles large arrays
1189before sorting them, as a statistical defence against quadratic behaviour.
1190But that means if you sort the same large array twice, ties may be
1191broken in different ways.
1192
1193Because of the unpredictability of tie-breaking order, and the quadratic
1194worst-case behaviour, quicksort was I<almost> replaced completely with
1195a stable mergesort. I<Stable> means that ties are broken to preserve
1196the original order of appearance in the input array. So
1197
1198 sort { ($a % 2) <=> ($b % 2) } (3,1,4,1,5,9);
1199
1200will yield (4,3,1,1,5,9), guaranteed. The even and odd numbers
1201appear in the output in the same order they appeared in the input.
1202Mergesort has worst case O(NlogN) behaviour, the best value
1203attainable. And, ironically, this mergesort does particularly
1204well where quicksort goes quadratic: mergesort sorts (1..$N, 1..$N)
1205in O(N) time. But quicksort was rescued at the last moment because
1206it is faster than mergesort on certain inputs and platforms.
1207For example, if you really I<don't> care about the order of even
1208and odd digits, quicksort will run in O(N) time; it's very good
1209at sorting many repetitions of a small number of distinct elements.
1210The quicksort divide and conquer strategy works well on platforms
1211with relatively small, very fast, caches. Eventually, the problem gets
1212whittled down to one that fits in the cache, from which point it
1213benefits from the increased memory speed.
1214
1215Quicksort was rescued by implementing a sort pragma to control aspects
1216of the sort. The B<stable> subpragma forces stable behaviour,
1217regardless of algorithm. The B<_quicksort> and B<_mergesort>
1218subpragmas are heavy-handed ways to select the underlying implementation.
1219The leading C<_> is a reminder that these subpragmas may not survive
1220beyond 5.8. More appropriate mechanisms for selecting the implementation
1221exist, but they wouldn't have arrived in time to save quicksort.
1222
77c8cf41 1223=item *
1224
1225Hashes now use Bob Jenkins "One-at-a-Time" hashing key algorithm
1226(http://burtleburtle.net/bob/hash/doobs.html). This algorithm is
1227reasonably fast while producing a much better spread of values than
1228the old hashing algorithm (originally by Chris Torek, later tweaked by
1229Ilya Zakharevich). Hash values output from the algorithm on a hash of
1230all 3-char printable ASCII keys comes much closer to passing the
1231DIEHARD random number generation tests. According to perlbench, this
1232change has not affected the overall speed of Perl.
1233
1234=item *
1235
1236unshift() should now be noticeably faster.
1237
1238=back
1239
1240=head1 Installation and Configuration Improvements
1241
1242=head2 Generic Improvements
1243
1244=over 4
1245
1246=item *
1247
1248INSTALL now explains how you can configure Perl to use 64-bit
1249integers even on non-64-bit platforms.
1250
1251=item *
1252
1253Policy.sh policy change: if you are reusing a Policy.sh file
1254(see INSTALL) and you use Configure -Dprefix=/foo/bar and in the old
1255Policy $prefix eq $siteprefix and $prefix eq $vendorprefix, all of
1256them will now be changed to the new prefix, /foo/bar. (Previously
1257only $prefix changed.) If you do not like this new behaviour,
1258specify prefix, siteprefix, and vendorprefix explicitly.
1259
1260=item *
1261
1262A new optional location for Perl libraries, otherlibdirs, is available.
1263It can be used for example for vendor add-ons without disturbing Perl's
1264own library directories.
1265
1266=item *
1267
1268In many platforms the vendor-supplied 'cc' is too stripped-down to
1269build Perl (basically, 'cc' doesn't do ANSI C). If this seems
1270to be the case and 'cc' does not seem to be the GNU C compiler
1271'gcc', an automatic attempt is made to find and use 'gcc' instead.
1272
1273=item *
1274
1275gcc needs to closely track the operating system release to avoid
1276build problems. If Configure finds that gcc was built for a different
1277operating system release than is running, it now gives a clearly visible
1278warning that there may be trouble ahead.
1279
1280=item *
1281
1282If binary compatibility with the 5.005 release is not wanted, Configure
1283no longer suggests including the 5.005 modules in @INC.
1284
1285=item *
1286
1287Configure C<-S> can now run non-interactively.
1288
1289=item *
1290
1291configure.gnu now works with options with whitespace in them.
f39f21d8 1292
77c8cf41 1293=item *
f39f21d8 1294
77c8cf41 1295installperl now outputs everything to STDERR.
f39f21d8 1296
77c8cf41 1297=item *
1298
1299$Config{byteorder} is now computed dynamically (this is more robust
1300with "fat binaries" where an executable image contains binaries for
1301more than one binary platform.)
f39f21d8 1302
1303=item *
1304
1305Because PerlIO is now the default on most platforms, "-perlio" doesn't
1306get appended to the $Config{archname} (also known as $^O) anymore.
1307Instead, if you explicitly choose not to use perlio (Configure command
1308line option -Uuseperlio), you will get "-stdio" appended.
1309
1310=item *
1311
1312Another change related to the architecture name is that "-64all"
1313(-Duse64bitall, or "maximally 64-bit") is appended only if your
1314pointers are 64 bits wide. (To be exact, the use64bitall is ignored.)
1315
1316=item *
1317
77c8cf41 1318In AFS installations one can configure the root of the AFS to be
1319somewhere else than the default F</afs> by using the Configure
1320parameter C<-Dafsroot=/some/where/else>.
1321
1322=item *
1323
61947107 1324APPLLIB_EXP, a less-know configuration-time definition, has been
1325documented. It can be used to prepend site-specific directories
1326to Perl's default search path (@INC), see INSTALL for information.
1327
1328=item *
1329
77c8cf41 1330The version of Berkeley DB used when the Perl (and, presumably, the
1331DB_File extension) was built is now available as
1332C<@Config{qw(db_version_major db_version_minor db_version_patch)}>
1333from Perl and as C<DB_VERSION_MAJOR_CFG DB_VERSION_MINOR_CFG
1334DB_VERSION_PATCH_CFG> from C.
1335
1336=item *
1337
61947107 1338Building Berkeley DB3 for compatibility modes for DB, NDBM, and ODBM
1339has been documented in INSTALL.
77c8cf41 1340
1341=item *
1342
61947107 1343If you have CPAN access (either network or a local copy such as a
1344CD-ROM) you can during specify extra modules to Configure to build and
1345install with Perl using the -Dextras=... option. See INSTALL for
1346more details.
f39f21d8 1347
61947107 1348=item *
f39f21d8 1349
61947107 1350In addition to config.over a new override file, config.arch, is
1351available. That is supposed to be used by hints file writers for
1352architecture-wide changes (as opposed to config.over which is for
1353site-wide changes).
f39f21d8 1354
1355=item *
1356
e1f170bd 1357If your file system supports symbolic links you can build Perl outside
1358of the source directory by
1359
1360 mkdir /tmp/perl/build/directory
1361 cd /tmp/perl/build/directory
1362 sh /path/to/perl/source/Configure -Dmksymlinks ...
1363
1364This will create in /tmp/perl/build/directory a tree of symbolic links
1365pointing to files in /path/to/perl/source. The original files are left
1366unaffected. After Configure has finished you can just say
1367
1368 make all test
1369
1370and Perl will be built and tested, all in /tmp/perl/build/directory.
1371
1372=item *
1373
61947107 1374For Perl developers several new make targets for profiling
1375and debugging have been added, see L<perlhack>.
1376
1377=over 8
f39f21d8 1378
1379=item *
1380
61947107 1381Use of the F<gprof> tool to profile Perl has been documented in
1382L<perlhack>. There is a make target called "perl.gprof" for
1383generating a gprofiled Perl executable.
f39f21d8 1384
1385=item *
1386
61947107 1387If you have GCC 3, there is a make target called "perl.gcov" for
1388creating a gcoved Perl executable for coverage analysis. See
1389L<perlhack>.
f39f21d8 1390
1391=item *
1392
61947107 1393If you are on IRIX or Tru64 platforms, new profiling/debugging options
1394have been added, see L<perlhack> for more information about pixie and
1395Third Degree.
1396
1397=back
f39f21d8 1398
1399=item *
1400
61947107 1401Guidelines of how to construct minimal Perl installations have
1402been added to INSTALL.
f39f21d8 1403
1404=item *
1405
61947107 1406The Thread extension is now not built at all under ithreads
1407(C<Configure -Duseithreads>) because it wouldn't work anyway (the
1408Thread extension requires being Configured with C<-Duse5005threads>).
f39f21d8 1409
61947107 1410But note that the Thread.pm interface is now shared by both
1411thread models.
f39f21d8 1412
61947107 1413=back
f39f21d8 1414
61947107 1415=head2 New Or Improved Platforms
f39f21d8 1416
61947107 1417For the list of platforms known to support Perl,
1418see L<perlport/"Supported Platforms">.
1419
1420=over 4
f39f21d8 1421
1422=item *
1423
61947107 1424AIX dynamic loading should be now better supported.
f39f21d8 1425
f39f21d8 1426=item *
1427
77c8cf41 1428AIX should now work better with gcc, threads, and 64-bitness. Also the
1429long doubles support in AIX should be better now. See L<perlaix>.
f39f21d8 1430
1431=item *
1432
61947107 1433After a long pause, AmigaOS has been verified to be happy with Perl.
1434
1435=item *
1436
77c8cf41 1437AtheOS (http://www.atheos.cx/) is a new platform.
f39f21d8 1438
77c8cf41 1439=item *
f39f21d8 1440
77c8cf41 1441DG/UX platform now supports the 5.005-style threads. See L<perldgux>.
f39f21d8 1442
1443=item *
1444
77c8cf41 1445DYNIX/ptx platform (a.k.a. dynixptx) is supported at or near osvers 4.5.2.
f39f21d8 1446
1447=item *
1448
61947107 1449EBCDIC platforms (z/OS, also known as OS/390, POSIX-BC, and VM/ESA)
1450have been regained. Many test suite tests still fail and the
1451co-existence of Unicode and EBCDIC isn't quite settled, but the
1452situation is much better than with Perl 5.6. See L<perlos390>,
1453L<perlbs2000> (for POSIX-BC), and L<perlvmesa> for more information.
f39f21d8 1454
1455=item *
1456
61947107 1457Building perl with -Duseithreads or -Duse5005threads now works under
1458HP-UX 10.20 (previously it only worked under 10.30 or later). You will
1459need a thread library package installed. See README.hpux.
f39f21d8 1460
77c8cf41 1461=item *
f39f21d8 1462
61947107 1463MacOS Classic (MacPerl has of course been available since
1464perl 5.004 but now the source code bases of standard Perl
1465and MacPerl have been synchronised)
f39f21d8 1466
77c8cf41 1467=item *
f39f21d8 1468
61947107 1469MacOS X (or Darwin) should now be able to build Perl even on HFS+
1470filesystems. (The case-insensitivity confused the Perl build process.)
f39f21d8 1471
888aee59 1472=item *
1473
61947107 1474NCR MP-RAS is now supported.
888aee59 1475
1476=item *
1477
61947107 1478NetWare from Novell is now supported. See L<perlnetware>.
888aee59 1479
1480=item *
1481
61947107 1482NonStop-UX is now supported.
888aee59 1483
1484=item *
1485
61947107 1486Amdahl UTS UNIX mainframe platform is now supported.
888aee59 1487
1488=item *
1489
61947107 1490WinCE is now supported. See L<perlce>.
1491
1492=item *
1493
1494z/OS (formerly known as OS/390, formerly known as MVS OE) has now
1495support for dynamic loading. This is not selected by default,
1496however, you must specify -Dusedl in the arguments of Configure.
888aee59 1497
f39f21d8 1498=back
1499
1500=head1 Selected Bug Fixes
1501
e1f170bd 1502Numerous memory leaks and uninitialized memory accesses have been
1503hunted down. Most importantly anonymous subs used to leak quite
1504a bit.
ba370e9b 1505
f39f21d8 1506=over 4
1507
1508=item *
1509
e1f170bd 1510The autouse pragma didn't work for Multi::Part::Function::Names.
f39f21d8 1511
1512=item *
1513
e1f170bd 1514chop(@list) in list context returned the characters chopped in
1515reverse order. This has been reversed to be in the right order.
f39f21d8 1516
1517=item *
1518
e1f170bd 1519Configure no longer includes the DBM libraries (dbm, gdbm, db, ndbm)
1520when building the Perl binary. The only exception to this is SunOS 4.x,
1521which needs them.
f39f21d8 1522
1523=item *
1524
e1f170bd 1525The behaviour of non-decimal but numeric string constants such as
1526"0x23" was platform-dependent: in some platforms that was seen as 35,
1527in some as 0, in some as a floating point number (don't ask). This
1528was caused by Perl using the operating system libraries in a situation
1529where the result of the string to number conversion is undefined: now
1530Perl consistently handles such strings as zero in numeric contexts.
f39f21d8 1531
1532=item *
1533
e1f170bd 1534The order of DESTROYs has been made more predictable.
f39f21d8 1535
1536=item *
1537
e1f170bd 1538Several debugger fixes: exit code now reflects the script exit code,
1539condition C<"0"> now treated correctly, the C<d> command now checks
1540line number, the C<$.> no longer gets corrupted, all debugger output now
1541goes correctly to the socket if RemotePort is set.
f39f21d8 1542
1543=item *
1544
e1f170bd 1545L<dprofpp> -R didn't work.
f39f21d8 1546
1547=item *
1548
e1f170bd 1549C<*foo{FORMAT}> now works.
f39f21d8 1550
1551=item *
1552
e1f170bd 1553UNIVERSAL::isa no longer caches methods incorrectly. (This broke
1554the Tk extension with 5.6.0.)
f39f21d8 1555
1556=item *
1557
e1f170bd 1558Lexicals I: lexicals outside an eval "" weren't resolved
1559correctly inside a subroutine definition inside the eval "" if they
1560were not already referenced in the top level of the eval""ed code.
f39f21d8 1561
1562=item *
1563
e1f170bd 1564Lexicals II: lexicals leaked at file scope into subroutines that
1565were declared before the lexicals.
f39f21d8 1566
1567=item *
1568
e1f170bd 1569Lexical warnings now propagating correctly between scopes.
f39f21d8 1570
1571=item *
1572
e1f170bd 1573Line renumbering with eval and C<#line> now works.
f39f21d8 1574
1575=item *
1576
e1f170bd 1577Fixed numerous memory leaks, especially in eval "".
f39f21d8 1578
1579=item *
1580
e1f170bd 1581mkdir() now ignores trailing slashes in the directory name,
1582as mandated by POSIX.
f39f21d8 1583
1584=item *
1585
e1f170bd 1586Some versions of glibc have a broken modfl(). This affects builds
1587with C<-Duselongdouble>. This version of Perl detects this brokenness
1588and has a workaround for it. The glibc release 2.2.2 is known to have
1589fixed the modfl() bug.
f39f21d8 1590
1591=item *
1592
e1f170bd 1593Modulus of unsigned numbers now works (4063328477 % 65535 used to
1594return 27406, instead of 27047).
f39f21d8 1595
1596=item *
1597
e1f170bd 1598Some "not a number" warnings introduced in 5.6.0 eliminated to be
1599more compatible with 5.005. Infinity is now recognised as a number.
f39f21d8 1600
77c8cf41 1601=item *
f39f21d8 1602
e1f170bd 1603Attributes (like :shared) didn't work with our().
f39f21d8 1604
1605=item *
1606
e1f170bd 1607our() variables will not cause "will not stay shared" warnings.
f39f21d8 1608
1609=item *
1610
e1f170bd 1611pack "Z" now correctly terminates the string with "\0".
f39f21d8 1612
1613=item *
1614
e1f170bd 1615Fix password routines which in some shadow password platforms
1616(e.g. HP-UX) caused getpwent() to return every other entry.
f39f21d8 1617
77c8cf41 1618=item *
f39f21d8 1619
e1f170bd 1620The PERL5OPT environment variable (for passing command line arguments
1621to Perl) didn't work for more than a single group of options.
f39f21d8 1622
77c8cf41 1623=item *
f39f21d8 1624
e1f170bd 1625PERL5OPT with embedded spaces didn't work.
f39f21d8 1626
77c8cf41 1627=item *
f39f21d8 1628
e1f170bd 1629printf() no longer resets the numeric locale to "C".
f39f21d8 1630
77c8cf41 1631=item *
f39f21d8 1632
e1f170bd 1633C<q(a\\b)> now parses correctly as C<'a\\b'>.
f39f21d8 1634
77c8cf41 1635=item *
f39f21d8 1636
e1f170bd 1637Printing quads (64-bit integers) with printf/sprintf now works
1638without the q L ll prefixes (assuming you are on a quad-capable platform).
f39f21d8 1639
77c8cf41 1640=item *
f39f21d8 1641
e1f170bd 1642Regular expressions on references and overloaded scalars now work.
f39f21d8 1643
ba370e9b 1644=item *
1645
e1f170bd 1646Right-hand side magic (GMAGIC) could in many cases such as string
1647concatenation be invoked too many times.
ba370e9b 1648
1649=item *
1650
e1f170bd 1651scalar() now forces scalar context even when used in void context.
ba370e9b 1652
1653=item *
1654
e1f170bd 1655SOCKS support is now much more robust.
ba370e9b 1656
1657=item *
1658
e1f170bd 1659sort() arguments are now compiled in the right wantarray context
1660(they were accidentally using the context of the sort() itself).
ba370e9b 1661
1662=item *
1663
e1f170bd 1664Changed the POSIX character class C<[[:space:]]> to include the (very
c2e23569 1665rarely used) vertical tab character. Added a new POSIX-ish character
1666class C<[[:blank:]]> which stands for horizontal whitespace
1667(currently, the space and the tab).
ba370e9b 1668
1669=item *
1670
1671The tainting behaviour of sprintf() has been rationalized. It does
1672not taint the result of floating point formats anymore, making the
1673behaviour consistent with that of string interpolation.
1674
1675=item *
1676
c2e23569 1677The regular expression captured submatches ($1, $2, ...) are now
1678more consistently unset if the match fails, instead of leaving false
1679data lying around in them.
1680
1681=item *
1682
1683C<Sys::Syslog> ignored the C<LOG_AUTH> constant.
ba370e9b 1684
1685=item *
1686
e1f170bd 1687All but the first argument of the IO syswrite() method are now optional.
ba370e9b 1688
1689=item *
1690
e1f170bd 1691$AUTOLOAD, sort(), lock(), and spawning subprocesses
1692in multiple threads simultaneously are now thread-safe.
ba370e9b 1693
1694=item *
1695
e1f170bd 1696Tie::ARRAY SPLICE method was broken.
ba370e9b 1697
1698=item *
1699
e1f170bd 1700Allow read-only string on left hand side of non-modifying tr///.
ba370e9b 1701
1702=item *
1703
e1f170bd 1704Several Unicode fixes.
ba370e9b 1705
1706=over 8
1707
1708=item *
1709
e1f170bd 1710BOMs (byte order marks) in the beginning of Perl files
1711(scripts, modules) should now be transparently skipped.
1712UTF-16 (UCS-2) encoded Perl files should now be read correctly.
ba370e9b 1713
1714=item *
1715
e1f170bd 1716The character tables have been updated to Unicode 3.1.1.
ba370e9b 1717
1718=item *
1719
e1f170bd 1720Comparing with utf8 data does not magically upgrade non-utf8 data
1721into utf8.
ba370e9b 1722
1723=item *
1724
e1f170bd 1725C<IsAlnum>, C<IsAlpha>, and C<IsWord> now match titlecase.
f39f21d8 1726
77c8cf41 1727=item *
f39f21d8 1728
e1f170bd 1729Concatenation with the C<.> operator or via variable interpolation,
1730C<eq>, C<substr>, C<reverse>, C<quotemeta>, the C<x> operator,
1731substitution with C<s///>, single-quoted UTF8, should now work.
f39f21d8 1732
77c8cf41 1733=item *
f39f21d8 1734
e1f170bd 1735The C<tr///> operator now works. Note that the C<tr///CU>
1736functionality has been removed (but see pack('U0', ...)).
f39f21d8 1737
77c8cf41 1738=item *
f39f21d8 1739
e1f170bd 1740C<eval "v200"> now works.
f39f21d8 1741
77c8cf41 1742=item *
f39f21d8 1743
e1f170bd 1744Zero entries were missing from the Unicode classes like C<IsDigit>.
f39f21d8 1745
e1f170bd 1746=back
f39f21d8 1747
77c8cf41 1748=back
f39f21d8 1749
77c8cf41 1750=head2 Platform Specific Changes and Fixes
f39f21d8 1751
1752=over 4
1753
1754=item *
1755
77c8cf41 1756BSDI 4.*
f39f21d8 1757
77c8cf41 1758Perl now works on post-4.0 BSD/OSes.
f39f21d8 1759
1760=item *
1761
77c8cf41 1762All BSDs
f39f21d8 1763
057b7f2b 1764Setting C<$0> now works (as much as possible; see L<perlvar> for details).
f39f21d8 1765
1766=item *
1767
77c8cf41 1768Cygwin
f39f21d8 1769
77c8cf41 1770Numerous updates; currently synchronised with Cygwin 1.1.4.
f39f21d8 1771
1772=item *
1773
e1f170bd 1774Previously DYNIX/ptx had problems in its Configure probe for non-blocking I/O.
1775
1776=item *
1777
77c8cf41 1778EPOC
f39f21d8 1779
77c8cf41 1780EPOC update after Perl 5.6.0. See README.epoc.
f39f21d8 1781
1782=item *
1783
77c8cf41 1784FreeBSD 3.*
f39f21d8 1785
77c8cf41 1786Perl now works on post-3.0 FreeBSDs.
f39f21d8 1787
1788=item *
1789
77c8cf41 1790HP-UX
1791
1792README.hpux updated; C<Configure -Duse64bitall> now almost works.
f39f21d8 1793
1794=item *
1795
77c8cf41 1796IRIX
f39f21d8 1797
77c8cf41 1798Numerous compilation flag and hint enhancements; accidental mixing
1799of 32-bit and 64-bit libraries (a doomed attempt) made much harder.
f39f21d8 1800
77c8cf41 1801=item *
f39f21d8 1802
77c8cf41 1803Linux
f39f21d8 1804
e1f170bd 1805=over 8
1806
1807=item *
1808
77c8cf41 1809Long doubles should now work (see INSTALL).
f39f21d8 1810
1811=item *
1812
e1f170bd 1813Linux previously had problems related to sockaddrlen when using
1814accept(), revcfrom() (in Perl: recv()), getpeername(), and getsockname().
1815
1816=back
1817
1818=item *
1819
77c8cf41 1820MacOS Classic
f39f21d8 1821
77c8cf41 1822Compilation of the standard Perl distribution in MacOS Classic should
1823now work if you have the Metrowerks development environment and
1824the missing Mac-specific toolkit bits. Contact the macperl mailing
1825list for details.
f39f21d8 1826
1827=item *
1828
77c8cf41 1829MPE/iX
f39f21d8 1830
77c8cf41 1831MPE/iX update after Perl 5.6.0. See README.mpeix.
f39f21d8 1832
1833=item *
1834
77c8cf41 1835NetBSD/sparc
f39f21d8 1836
77c8cf41 1837Perl now works on NetBSD/sparc.
f39f21d8 1838
1839=item *
1840
77c8cf41 1841OS/2
f39f21d8 1842
77c8cf41 1843Now works with usethreads (see INSTALL).
f39f21d8 1844
1845=item *
1846
77c8cf41 1847Solaris
f39f21d8 1848
77c8cf41 184964-bitness using the Sun Workshop compiler now works.
f39f21d8 1850
1851=item *
1852
77c8cf41 1853Tru64 (aka Digital UNIX, aka DEC OSF/1)
f39f21d8 1854
77c8cf41 1855The operating system version letter now recorded in $Config{osvers}.
1856Allow compiling with gcc (previously explicitly forbidden). Compiling
1857with gcc still not recommended because buggy code results, even with
1858gcc 2.95.2.
f39f21d8 1859
1860=item *
1861
77c8cf41 1862Unicos
1863
1864Fixed various alignment problems that lead into core dumps either
1865during build or later; no longer dies on math errors at runtime;
1866now using full quad integers (64 bits), previously was using
1867only 46 bit integers for speed.
f39f21d8 1868
1869=item *
1870
77c8cf41 1871VMS
1872
1873chdir() now works better despite a CRT bug; now works with MULTIPLICITY
1874(see INSTALL); now works with Perl's malloc.
f39f21d8 1875
1876=item *
1877
77c8cf41 1878Windows
f39f21d8 1879
77c8cf41 1880=over 8
f39f21d8 1881
1882=item *
1883
77c8cf41 1884accept() no longer leaks memory.
f39f21d8 1885
1886=item *
1887
e1f170bd 1888Borland C++ v5.5 is now a supported compiler that can build Perl.
1889However, the generated binaries continue to be incompatible with those
1890generated by the other supported compilers (GCC and Visual C++).
1891
1892=item *
1893
77c8cf41 1894Better chdir() return value for a non-existent directory.
f39f21d8 1895
77c8cf41 1896=item *
f39f21d8 1897
e1f170bd 1898Duping socket handles with open(F, ">&MYSOCK") now works under Windows 9x.
1899
1900=item *
1901
77c8cf41 1902New %ENV entries now propagate to subprocesses.
f39f21d8 1903
1904=item *
1905
77c8cf41 1906$ENV{LIB} now used to search for libs under Visual C.
1907
1908=item *
1909
e1f170bd 1910Win32::GetCwd() correctly returns C:\ instead of C: when at the drive root.
1911Other bugs in chdir() and Cwd::cwd() have also been fixed.
1912
1913=item *
1914
77c8cf41 1915A failed (pseudo)fork now returns undef and sets errno to EAGAIN.
f39f21d8 1916
1917=item *
1918
e1f170bd 1919HTML files will be installed in c:\perl\html instead of c:\perl\lib\pod\html
1920
1921=item *
1922
1923The makefiles now provide a single switch to bulk-enable all the features
1924enabled in ActiveState ActivePerl (a popular Win32 binary distribution).
1925
1926=item *
1927
77c8cf41 1928Allow REG_EXPAND_SZ keys in the registry.
f39f21d8 1929
1930=item *
1931
77c8cf41 1932Can now send() from all threads, not just the first one.
f39f21d8 1933
1934=item *
1935
77c8cf41 1936Fake signal handling reenabled, bugs and all.
f39f21d8 1937
1938=item *
1939
77c8cf41 1940Less stack reserved per thread so that more threads can run
1941concurrently. (Still 16M per thread.)
f39f21d8 1942
1943=item *
1944
c2e23569 1945C<File::Spec-&gt;tmpdir()> now prefers C:/temp over /tmp
77c8cf41 1946(works better when perl is running as service).
f39f21d8 1947
1948=item *
1949
77c8cf41 1950Better UNC path handling under ithreads.
f39f21d8 1951
1952=item *
1953
77c8cf41 1954wait() and waitpid() now work much better.
f39f21d8 1955
1956=item *
1957
77c8cf41 1958winsock handle leak fixed.
f39f21d8 1959
1960=back
1961
77c8cf41 1962=back
f39f21d8 1963
77c8cf41 1964=head1 New or Changed Diagnostics
f39f21d8 1965
ba370e9b 1966=over 4
1967
1968=item *
1969
77c8cf41 1970All regular expression compilation error messages are now hopefully
1971easier to understand both because the error message now comes before
1972the failed regex and because the point of failure is now clearly
ba370e9b 1973marked by a C<E<lt>-- HERE> marker.
1974
1975=item *
f39f21d8 1976
77c8cf41 1977The various "opened only for", "on closed", "never opened" warnings
1978drop the C<main::> prefix for filehandles in the C<main> package,
bea4d472 1979for example C<STDIN> instead of C<main::STDIN>.
f39f21d8 1980
ba370e9b 1981=item *
1982
77c8cf41 1983The "Unrecognized escape" warning has been extended to include C<\8>,
1984C<\9>, and C<\_>. There is no need to escape any of the C<\w> characters.
f39f21d8 1985
ba370e9b 1986=item *
f39f21d8 1987
77c8cf41 1988Two new debugging options have been added: if you have compiled your
1989Perl with debugging, you can use the -DT and -DR options to trace
1990tokenising and to add reference counts to displaying variables,
1991respectively.
f39f21d8 1992
1993=item *
1994
77c8cf41 1995If an attempt to use a (non-blessed) reference as an array index
1996is made, a warning is given.
f39f21d8 1997
1998=item *
1999
77c8cf41 2000C<push @a;> and C<unshift @a;> (with no values to push or unshift)
2001now give a warning. This may be a problem for generated and evaled
2002code.
f39f21d8 2003
ba370e9b 2004=item *
2005
2006If you try to L<perlfunc/pack> a number less than 0 or larger than 255
2007using the C<"C"> format you will get an optional warning. Similarly
2008for the C<"c"> format and a number less than -128 or more than 127.
2009
2010=item *
2011
2012Certain regex modifiers such as C<(?o)> make sense only if applied to
2013the entire regex. You will an optional warning if you try to do otherwise.
2014
2015=item *
2016
c2e23569 2017Using arrays or hashes as references (e.g. C<< %foo-&gt;{bar} >>
2018has been deprecated for a while. Now you will get an optional warning.
ba370e9b 2019
f39f21d8 2020=back
2021
77c8cf41 2022=head1 Changed Internals
f39f21d8 2023
2024=over 4
2025
2026=item *
2027
77c8cf41 2028perlapi.pod (a companion to perlguts) now attempts to document the
2029internal API.
f39f21d8 2030
2031=item *
2032
77c8cf41 2033You can now build a really minimal perl called microperl.
2034Building microperl does not require even running Configure;
2035C<make -f Makefile.micro> should be enough. Beware: microperl makes
2036many assumptions, some of which may be too bold; the resulting
2037executable may crash or otherwise misbehave in wondrous ways.
2038For careful hackers only.
f39f21d8 2039
2040=item *
2041
c2e23569 2042Added rsignal(), whichsig(), do_join(), op_clear, op_null,
2043ptr_table_clear(), ptr_table_free(), sv_setref_uv(), and several UTF-8
2044interfaces to the publicised API. For the full list of the available
2045APIs see L<perlapi>.
f39f21d8 2046
2047=item *
2048
77c8cf41 2049Made possible to propagate customised exceptions via croak()ing.
f39f21d8 2050
77c8cf41 2051=item *
f39f21d8 2052
77c8cf41 2053Now xsubs can have attributes just like subs.
f39f21d8 2054
2055=item *
2056
77c8cf41 2057dTHR and djSP have been obsoleted; the former removed (because it's
2058a no-op) and the latter replaced with dSP.
f39f21d8 2059
2060=item *
2061
61947107 2062PERL_OBJECT has been completely removed.
2063
2064=item *
2065
ba370e9b 2066The MAGIC constants (e.g. C<'P'>) have been macrofied
2067(e.g. C<PERL_MAGIC_TIED>) for better source code readability
2068and maintainability.
2069
2070=item *
2071
2072The regex compiler now maintains a structure that identifies nodes in
2073the compiled bytecode with the corresponding syntactic features of the
2074original regex expression. The information is attached to the new
2075C<offsets> member of the C<struct regexp>. See L<perldebguts> for more
2076complete information.
2077
2078=item *
2079
2080The C code has been made much more C<gcc -Wall> clean. Some warning
2081messages still remain in some platforms, so if you are compiling with
2082gcc you may see some warnings about dubious practices. The warnings
2083are being worked on.
2084
2085=item *
2086
2087F<perly.c>, F<sv.c>, and F<sv.h> have now been extensively commented.
2088
2089=item *
2090
61947107 2091Documentation on how to use the Perl source repository has been added
2092to F<Porting/repository.pod>.
f39f21d8 2093
888aee59 2094=item *
2095
c2e23569 2096There are now several profiling make targets.
888aee59 2097
77c8cf41 2098=back
f39f21d8 2099
77c8cf41 2100=head1 Security Vulnerability Closed
f39f21d8 2101
77c8cf41 2102(This change was already made in 5.7.0 but bears repeating here.)
f39f21d8 2103
77c8cf41 2104A potential security vulnerability in the optional suidperl component
2105of Perl was identified in August 2000. suidperl is neither built nor
2106installed by default. As of November 2001 the only known vulnerable
2107platform is Linux, most likely all Linux distributions. CERT and
2108various vendors and distributors have been alerted about the vulnerability.
2109See http://www.cpan.org/src/5.0/sperl-2000-08-05/sperl-2000-08-05.txt
2110for more information.
f39f21d8 2111
77c8cf41 2112The problem was caused by Perl trying to report a suspected security
2113exploit attempt using an external program, /bin/mail. On Linux
2114platforms the /bin/mail program had an undocumented feature which
2115when combined with suidperl gave access to a root shell, resulting in
2116a serious compromise instead of reporting the exploit attempt. If you
2117don't have /bin/mail, or if you have 'safe setuid scripts', or if
2118suidperl is not installed, you are safe.
f39f21d8 2119
77c8cf41 2120The exploit attempt reporting feature has been completely removed from
2121Perl 5.8.0 (and the maintenance release 5.6.1, and it was removed also
2122from all the Perl 5.7 releases), so that particular vulnerability
2123isn't there anymore. However, further security vulnerabilities are,
ba370e9b 2124unfortunately, always possible. The suidperl functionality is most
2125probably going to be removed in Perl 5.10. In any case, suidperl
2126should only be used by security experts who know exactly what they are
2127doing and why they are using suidperl instead of some other solution
2128such as sudo (see http://www.courtesan.com/sudo/).
77c8cf41 2129
2130=head1 New Tests
2131
76663d67 2132Several new tests have been added, especially for the F<lib>
2133subsection. There are now about 34 000 individual tests (spread over
2134about 530 test scripts), in the regression suite (5.6.1 has about
213511700 tests, in 258 test scripts) Many of the new tests are introduced
2136by the new modules, but still in general Perl is now more thoroughly
2137tested.
2138
2139Because of the large number of tests, running the regression suite
2140will take considerably longer time than it used to: expect the suite
2141to take up to 4-5 times longer to run than in perl 5.6. In a really
2142fast machine you can hope to finish the suite in about 5 minutes
2143(wallclock time).
77c8cf41 2144
2145The tests are now reported in a different order than in earlier Perls.
2146(This happens because the test scripts from under t/lib have been moved
2147to be closer to the library/extension they are testing.)
2148
f39f21d8 2149=head1 Known Problems
2150
2151Note that unlike other sections in this document (which describe
2152changes since 5.7.0) this section is cumulative containing known
2153problems for all the 5.7 releases.
2154
2155=head2 AIX
2156
2157=over 4
2158
2159=item *
2160
2161In AIX 4.2 Perl extensions that use C++ functions that use statics
2162may have problems in that the statics are not getting initialized.
2163In newer AIX releases this has been solved by linking Perl with
2164the libC_r library, but unfortunately in AIX 4.2 the said library
2165has an obscure bug where the various functions related to time
2166(such as time() and gettimeofday()) return broken values, and
2167therefore in AIX 4.2 Perl is not linked against the libC_r.
2168
2169=item *
2170
2171vac 5.0.0.0 May Produce Buggy Code For Perl
2172
2173The AIX C compiler vac version 5.0.0.0 may produce buggy code,
2174resulting in few random tests failing, but when the failing tests
2175are run by hand, they succeed. We suggest upgrading to at least
2176vac version 5.0.1.0, that has been known to compile Perl correctly.
2177"lslpp -L|grep vac.C" will tell you the vac version.
2178
2179=back
2180
2181=head2 Amiga Perl Invoking Mystery
2182
2183One cannot call Perl using the C<volume:> syntax, that is, C<perl -v>
057b7f2b 2184works, but for example C<bin:perl -v> doesn't. The exact reason isn't
f39f21d8 2185known but the current suspect is the F<ixemul> library.
2186
2187=head2 lib/ftmp-security tests warn 'system possibly insecure'
2188
2189Don't panic. Read INSTALL 'make test' section instead.
2190
2191=head2 Cygwin intermittent failures of lib/Memoize/t/expire_file 11 and 12
2192
2193The subtests 11 and 12 sometimes fail and sometimes work.
2194
2195=head2 HP-UX lib/io_multihomed Fails When LP64-Configured
2196
2197The lib/io_multihomed test may hang in HP-UX if Perl has been
2198configured to be 64-bit. Because other 64-bit platforms do not hang in
2199this test, HP-UX is suspect. All other tests pass in 64-bit HP-UX. The
2200test attempts to create and connect to "multihomed" sockets (sockets
2201which have multiple IP addresses).
2202
2203=head2 HP-UX lib/posix Subtest 9 Fails When LP64-Configured
2204
2205If perl is configured with -Duse64bitall, the successful result of the
2206subtest 10 of lib/posix may arrive before the successful result of the
2207subtest 9, which confuses the test harness so much that it thinks the
2208subtest 9 failed.
2209
2210=head2 Linux With Sfio Fails op/misc Test 48
2211
2212No known fix.
2213
2214=head2 OS/390
2215
2216OS/390 has rather many test failures but the situation is actually
2217better than it was in 5.6.0, it's just that so many new modules and
2218tests have been added.
2219
2220 Failed Test Stat Wstat Total Fail Failed List of Failed
2221 -----------------------------------------------------------------------------
2222 ../ext/B/Deparse.t 14 1 7.14% 14
2223 ../ext/B/Showlex.t 1 1 100.00% 1
2224 ../ext/Encode/Encode/Tcl.t 610 13 2.13% 592 594 596 598
2225 600 602 604-610
2226 ../ext/IO/lib/IO/t/io_unix.t 113 28928 5 3 60.00% 3-5
2227 ../ext/POSIX/POSIX.t 29 1 3.45% 14
2228 ../ext/Storable/t/lock.t 255 65280 5 3 60.00% 3-5
2229 ../lib/locale.t 129 33024 117 19 16.24% 99-117
2230 ../lib/warnings.t 434 1 0.23% 75
2231 ../lib/ExtUtils.t 27 1 3.70% 25
2232 ../lib/Math/BigInt/t/bigintpm.t 1190 1 0.08% 1145
2233 ../lib/Unicode/UCD.t 81 48 59.26% 1-16 49-64 66-81
2234 ../lib/User/pwent.t 9 1 11.11% 4
2235 op/pat.t 660 6 0.91% 242-243 424-425
2236 626-627
2237 op/split.t 0 9 ?? ?? % ??
2238 op/taint.t 174 3 1.72% 156 162 168
2239 op/tr.t 70 3 4.29% 50 58-59
2240 Failed 16/422 test scripts, 96.21% okay. 105/23251 subtests failed, 99.55% okay.
2241
2242=head2 op/sprintf tests 129 and 130
2243
2244The op/sprintf tests 129 and 130 are known to fail on some platforms.
2245Examples include any platform using sfio, and Compaq/Tandem's NonStop-UX.
2246The failing platforms do not comply with the ANSI C Standard, line
224719ff on page 134 of ANSI X3.159 1989 to be exact. (They produce
2248something other than "1" and "-1" when formatting 0.6 and -0.6 using
2249the printf format "%.0f", most often they produce "0" and "-0".)
2250
2251=head2 Failure of Thread tests
2252
2253B<Note that support for 5.005-style threading remains experimental.>
2254
2255The following tests are known to fail due to fundamental problems in
2256the 5.005 threading implementation. These are not new failures--Perl
22575.005_0x has the same bugs, but didn't have these tests.
2258
2259 lib/autouse.t 4
2260 t/lib/thr5005.t 19-20
2261
2262=head2 UNICOS
2263
2264=over 4
2265
2266=item *
2267
2268ext/POSIX/sigaction subtests 6 and 13 may fail.
2269
2270=item *
2271
2272lib/ExtUtils may spuriously claim that subtest 28 failed,
2273which is interesting since the test only has 27 tests.
2274
2275=item *
2276
2277Numerous numerical test failures
2278
2279 op/numconvert 209,210,217,218
2280 op/override 7
2281 ext/Time/HiRes/HiRes 9
2282 lib/Math/BigInt/t/bigintpm 1145
2283 lib/Math/Trig 25
2284
2285These tests fail because of yet unresolved floating point inaccuracies.
2286
2287=back
2288
2289=head2 UTS
2290
2291There are a few known test failures, see L<perluts>.
2292
2293=head2 VMS
2294
057b7f2b 2295Rather a lot of tests are failing in VMS, but actually more tests
2296succeed in VMS than they used to; it's just that there are many,
f39f21d8 2297many more tests than there used to be.
2298
2299Here are the known failures from some compiler/platform combinations.
2300
aecce728 2301Compaq C V6.2-009 on OpenVMS Alpha V7.3
2302
2303 [.run]switches..........................FAILED on test 1
2304 [-.ext.posix.t]posix....................FAILED on test 10
2305 [-.ext.time.hires]hires.................FAILED on test 17
2306 [-.lib]db...............................FAILED on test 24
2307 [-.lib.net]hostent......................FAILED on test 5
2308 [-.lib.pod.t]basic......................FAILED on test 10
2309
f39f21d8 2310=head2 Win32
2311
2312In multi-CPU boxes there are some problems with the I/O buffering:
2313some output may appear twice.
2314
2315=head2 Localising a Tied Variable Leaks Memory
2316
2317 use Tie::Hash;
2318 tie my %tie_hash => 'Tie::StdHash';
2319
2320 ...
2321
2322 local($tie_hash{Foo}) = 1; # leaks
2323
2324Code like the above is known to leak memory every time the local()
2325is executed.
2326
aecce728 2327=head2 Localising Tied Arrays and Hashes Is Broken
2328
2329 local %tied_array;
2330
2331doesn't work as one would expect: the old value is restored
2332incorrectly.
2333
f39f21d8 2334=head2 Self-tying of Arrays and Hashes Is Forbidden
2335
2336Self-tying of arrays and hashes is broken in rather deep and
2337hard-to-fix ways. As a stop-gap measure to avoid people from getting
2338frustrated at the mysterious results (core dumps, most often) it is
2339for now forbidden (you will get a fatal error even from an attempt).
2340
2341=head2 Variable Attributes are not Currently Usable for Tieing
2342
2343This limitation will hopefully be fixed in future. (Subroutine
2344attributes work fine for tieing, see L<Attribute::Handlers>).
2345
aecce728 2346One way to run into this limitation is to have a loop variable with
2347attributes within a loop: the tie is called only once, not for each
2348iteration of the loop.
2349
f39f21d8 2350=head2 Building Extensions Can Fail Because Of Largefiles
2351
2352Some extensions like mod_perl are known to have issues with
2353`largefiles', a change brought by Perl 5.6.0 in which file offsets
2354default to 64 bits wide, where supported. Modules may fail to compile
2355at all or compile and work incorrectly. Currently there is no good
2356solution for the problem, but Configure now provides appropriate
2357non-largefile ccflags, ldflags, libswanted, and libs in the %Config
2358hash (e.g., $Config{ccflags_nolargefiles}) so the extensions that are
2359having problems can try configuring themselves without the
2360largefileness. This is admittedly not a clean solution, and the
2361solution may not even work at all. One potential failure is whether
2362one can (or, if one can, whether it's a good idea) link together at
2363all binaries with different ideas about file offsets, all this is
2364platform-dependent.
2365
aecce728 2366=head2 Unicode Support on EBCDIC Still Spotty
2367
2368Though mostly working, Unicode support still has problem spots on
2369EBCDIC platforms. One such known spot are the C<\p{}> and C<\P{}>
2370regular expression constructs for code points less than 256: the
2371pP are testing for Unicode code points, not knowing about EBCDIC.
2372
f39f21d8 2373=head2 The Compiler Suite Is Still Experimental
2374
2375The compiler suite is slowly getting better but is nowhere near
2376working order yet.
2377
2378=head2 The Long Double Support is Still Experimental
2379
2380The ability to configure Perl's numbers to use "long doubles",
2381floating point numbers of hopefully better accuracy, is still
2382experimental. The implementations of long doubles are not yet
2383widespread and the existing implementations are not quite mature
2384or standardised, therefore trying to support them is a rare
2385and moving target. The gain of more precision may also be offset
2386by slowdown in computations (more bits to move around, and the
2387operations are more likely to be executed by less optimised
2388libraries).
33a87e58 2389
cc0fca54 2390=head1 Reporting Bugs
2391
d4ad863d 2392If you find what you think is a bug, you might check the articles
2393recently posted to the comp.lang.perl.misc newsgroup and the perl
2394bug database at http://bugs.perl.org. There may also be
2395information at http://www.perl.com/perl/, the Perl Home Page.
cc0fca54 2396
2397If you believe you have an unreported bug, please run the B<perlbug>
2398program included with your release. Be sure to trim your bug down
2399to a tiny but sufficient test case. Your bug report, along with the
d4ad863d 2400output of C<perl -V>, will be sent off to perlbug@perl.org to be
cc0fca54 2401analysed by the Perl porting team.
2402
2403=head1 SEE ALSO
2404
2405The F<Changes> file for exhaustive details on what changed.
2406
2407The F<INSTALL> file for how to build Perl.
2408
2409The F<README> file for general stuff.
2410
2411The F<Artistic> and F<Copying> files for copyright information.
2412
2413=head1 HISTORY
2414
d468ca04 2415Written by Jarkko Hietaniemi <F<jhi@iki.fi>>.
cc0fca54 2416
2417=cut