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