This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perldelta: wrap a few weirdly-wrapped lines
[perl5.git] / Porting / perl5160delta.pod
1 =encoding utf8
2
3 =head1 NAME
4
5 perl5160delta - what is new for perl v5.16.0
6
7 =head1 DESCRIPTION
8
9 This document describes differences between the 5.14.0 release and
10 the 5.16.0 release.
11
12 If you are upgrading from an earlier release such as 5.12.0, first read
13 L<perl5140delta>, which describes differences between 5.12.0 and
14 5.14.0.
15
16 =head1 Notice
17
18 As described in L<perlpolicy>, the release of Perl 5.16.0 marks the
19 official end of support for Perl 5.12.  Users of Perl 5.12 or earlier
20 should consider upgrading to a more recent release of Perl.
21
22 =head1 Core Enhancements
23
24 =head2 C<use I<VERSION>>
25
26 As of this release, version declarations like C<use v5.16> now disable
27 all features before enabling the new feature bundle.  This means that
28 the following holds true:
29
30     use 5.016;
31     # only 5.16 features enabled here
32     use 5.014;
33     # only 5.14 features enabled here (not 5.16)
34
35 C<use v5.12> and higher continue to enable strict, but explicit C<use
36 strict> and C<no strict> now override the version declaration, even
37 when they come first:
38
39     no strict;
40     use 5.012;
41     # no strict here
42
43 There is a new ":default" feature bundle that represents the set of
44 features enabled before any version declaration or C<use feature> has
45 been seen.  Version declarations below 5.10 now enable the ":default"
46 feature set.  This does not actually change the behaviour of C<use
47 v5.8>, because features added to the ":default" set are those that were
48 traditionally enabled by default, before they could be turned off.
49
50 C<< no feature >> now resets to the default feature set.  To disable all
51 features (which is likely to be a pretty special-purpose request, since
52 it presumably won't match any named set of semantics) you can now  
53 write C<< no feature ':all' >>.
54
55 C<$[> is now disabled under C<use v5.16>.  It is part of the default
56 feature set and can be turned on or off explicitly with C<use feature
57 'array_base'>.
58
59 =head2 C<__SUB__>
60
61 The new C<__SUB__> token, available under the C<current_sub> feature
62 (see L<feature>) or C<use v5.16>, returns a reference to the current
63 subroutine, making it easier to write recursive closures.
64
65 =head2 New and Improved Built-ins
66
67 =head3 More consistent C<eval>
68
69 The C<eval> operator sometimes treats a string argument as a sequence of
70 characters and sometimes as a sequence of bytes, depending on the
71 internal encoding.  The internal encoding is not supposed to make any
72 difference, but there is code that relies on this inconsistency.
73
74 The new C<unicode_eval> and C<evalbytes> features (enabled under C<use
75 5.16.0>) resolve this.  The C<unicode_eval> feature causes C<eval
76 $string> to treat the string always as Unicode.  The C<evalbytes>
77 features provides a function, itself called C<evalbytes>, which
78 evaluates its argument always as a string of bytes.
79
80 These features also fix oddities with source filters leaking to outer
81 dynamic scopes.
82
83 See L<feature> for more detail.
84
85 =head3 C<substr> lvalue revamp
86
87 =for comment Does this belong here, or under Incomptable Changes?
88
89 When C<substr> is called in lvalue or potential lvalue context with two
90 or three arguments, a special lvalue scalar is returned that modifies
91 the original string (the first argument) when assigned to.
92
93 Previously, the offsets (the second and third arguments) passed to
94 C<substr> would be converted immediately to match the string, negative
95 offsets being translated to positive and offsets beyond the end of the
96 string being truncated.
97
98 Now, the offsets are recorded without modification in the special
99 lvalue scalar that is returned, and the original string is not even
100 looked at by C<substr> itself, but only when the returned lvalue is
101 read or modified.
102
103 These changes result in an incompatible change:
104
105 If the original string changes length after the call to C<substr> but
106 before assignment to its return value, negative offsets will remember
107 their position from the end of the string, affecting code like this:
108
109     my $string = "string";
110     my $lvalue = \substr $string, -4, 2;
111     print $lvalue, "\n"; # prints "ri"
112     $string = "bailing twine";
113     print $lvalue, "\n"; # prints "wi"; used to print "il"
114
115 The same thing happens with an omitted third argument.  The returned
116 lvalue will always extend to the end of the string, even if the string
117 becomes longer.
118
119 Since this change also allowed many bugs to be fixed (see
120 L</Fixes to the C<substr> operator>), and since the behaviour
121 of negative offsets has never been specified, so the
122 change was deemed acceptable.
123
124 =head3 Return value of C<tied>
125
126 The value returned by C<tied> on a tied variable is now the actual
127 scalar that holds the object to which the variable is tied.  This
128 allows ties to be weakened with C<Scalar::Util::weaken(tied
129 $tied_variable)>.
130
131 =head2 Unicode Support
132
133 =head3 Supports (I<almost>) Unicode 6.1
134
135 Besides the addition of whole new scripts, and new characters in
136 existing scripts, this new version of Unicode, as always, makes some
137 changes to existing characters.  One change that may trip up some
138 applications is that the General Category of two characters in the
139 Latin-1 range, PILCROW SIGN and SECTION SIGN, has been changed from
140 Other_Symbol to Other_Punctuation.  The same change has been made for
141 a character in each of Tibetan, Ethiopic, and Aegean.
142 The code points U+3248..U+324F (CIRCLED NUMBER TEN ON BLACK SQUARE
143 through CIRCLED NUMBER EIGHTY ON BLACK SQUARE) have had their General
144 Category changed from Other_Symbol to Other_Numeric.  The Line Break
145 property has changes for Hebrew and Japanese; and as a consequence of
146 other changes in 6.1, the Perl regular expression construct C<\X> now
147 works differently for some characters in Thai and Lao.
148
149 New aliases (synonyms) have been defined for many property values;
150 these, along with the previously existing ones, are all cross-indexed in
151 L<perluniprops>.
152
153 The return value of C<charnames::viacode()> is affected by other
154 changes:
155
156  Code point      Old Name             New Name
157    U+000A    LINE FEED (LF)        LINE FEED
158    U+000C    FORM FEED (FF)        FORM FEED
159    U+000D    CARRIAGE RETURN (CR)  CARRIAGE RETURN
160    U+0085    NEXT LINE (NEL)       NEXT LINE
161    U+008E    SINGLE-SHIFT 2        SINGLE-SHIFT-2
162    U+008F    SINGLE-SHIFT 3        SINGLE-SHIFT-3
163    U+0091    PRIVATE USE 1         PRIVATE USE-1
164    U+0092    PRIVATE USE 2         PRIVATE USE-2
165    U+2118    SCRIPT CAPITAL P      WEIERSTRASS ELLIPTIC FUNCTION
166
167 Perl will accept any of these names as input, but
168 C<charnames::viacode()> now returns the new name of each pair.  The
169 change for U+2118 is considered by Unicode to be a correction, that is
170 the original name was a mistake (but again, it will remain forever valid
171 to use it to refer to U+2118).  But most of these changes are the
172 fallout of the mistake Unicode 6.0 made in naming a character used in
173 Japanese cell phones to be "BELL", which conflicts with the longstanding
174 industry use of (and Unicode's recommendation to use) that name
175 to mean the ASCII control character at U+0007.  As a result, that name
176 has been deprecated in Perl since v5.14; and any use of it will raise a
177 warning message (unless turned off).  The name "ALERT" is now the
178 preferred name for this code point, with "BEL" being an acceptable short
179 form.  The name for the new cell phone character, at code point U+1F514,
180 remains undefined in this version of Perl (hence we don't quite
181 implement all of Unicode 6.1), but starting in v5.18, BELL will mean
182 this character, and not U+0007.
183
184 Unicode has taken steps to make sure that this sort of mistake does not
185 happen again.  The Standard now includes all the generally accepted
186 names and abbreviations for control characters, whereas previously it
187 didn't (though there were recommended names for most of them, which Perl
188 used).  This means that most of those recommended names are now
189 officially in the Standard.  Unicode did not recommend names for the
190 four code points listed above between U+008E and U+008F, and in
191 standardizing them Unicode subtly changed the names that Perl had
192 previously given them, by replacing the final blank in each name by a
193 hyphen.  Unicode also officially accepts names that Perl had deprecated,
194 such as FILE SEPARATOR.  Now the only deprecated name is BELL.
195 Finally, Perl now uses the new official names instead of the old
196 (now considered obsolete) names for the first four code points in the
197 list above (the ones which have the parentheses in them).
198
199 Now that the names have been placed in the Unicode standard, these kinds
200 of changes should not happen again, though corrections, such as to
201 U+2118, are still possible.
202
203 Unicode also added some name abbreviations, which Perl now accepts:
204 SP for SPACE;
205 TAB for CHARACTER TABULATION;
206 NEW LINE, END OF LINE, NL, and EOL for LINE FEED;
207 LOCKING-SHIFT ONE for SHIFT OUT;
208 LOCKING-SHIFT ZERO for SHIFT IN;
209 and ZWNBSP for ZERO WIDTH NO-BREAK SPACE.
210
211 More details on this version of Unicode are provided in
212 L<http://www.unicode.org/versions/Unicode6.1.0/>.
213
214 =head3 C<use charnames> is no longer needed for C<\N{I<name>}>
215
216 When C<\N{I<name>}> is encountered, the C<charnames> module is now
217 automatically loaded when needed as if the C<:full> and C<:short>
218 options had been specified.  See L<charnames> for more information.
219
220 =head3 C<\N{...}> can now have Unicode loose name matching
221
222 This is described in the C<charnames> item in
223 L</Updated Modules and Pragmata> below.
224
225 =head3 Unicode Symbol Names
226
227 Perl now has proper support for Unicode in symbol names.  It used to be
228 that C<*{$foo}> would ignore the internal UTF8 flag and use the bytes of
229 the underlying representation to look up the symbol.  That meant that
230 C<*{"\x{100}"}> and C<*{"\xc4\x80"}> would return the same thing.  All
231 these parts of Perl have been fixed to account for Unicode:
232
233 =over
234
235 =item *
236
237 Method names (including those passed to C<use overload>)
238
239 =item *
240
241 Typeglob names (including names of variables, subroutines and filehandles)
242
243 =item *
244
245 Package names
246
247 =item *
248
249 C<goto>
250
251 =item *
252
253 Symbolic dereferencing
254
255 =item *
256
257 Second argument to C<bless()> and C<tie()>
258
259 =item *
260
261 Return value of C<ref()>
262
263 =item *
264
265 Subroutine prototypes
266
267 =item *
268
269 Attributes
270
271 =item *
272
273 Various warnings and error messages that mention variable names or values,
274 methods, etc.
275
276 =back
277
278 In addition, a parsing bug has been fixed that prevented C<*{é}> from
279 implicitly quoting the name, but instead interpreted it as C<*{+é}>, which
280 would cause a strict violation.
281
282 C<*{"*a::b"}> automatically strips off the * if it is followed by an ASCII
283 letter.  That has been extended to all Unicode identifier characters.
284
285 One-character non-ASCII non-punctuation variables (like C<$é>) are now
286 subject to "Used only once" warnings.  They used to be exempt, as they
287 was treated as punctuation variables.
288
289 Also, single-character Unicode punctuation variables (like $‰) are now
290 supported [perl #69032].
291
292 =head3 Improved ability to mix locales and Unicode, including UTF-8 locales
293
294 An optional parameter has been added to C<use locale>
295
296  use locale ':not_characters';
297
298 which tells Perl to use all but the C<LC_CTYPE> and C<LC_COLLATE>
299 portions of the current locale.  Instead, the character set is assumed
300 to be Unicode.  This allows locales and Unicode to be seamlessly mixed,
301 including the increasingly frequent UTF-8 locales.  When using this
302 hybrid form of locales, the C<:locale> layer to the L<open> pragma can
303 be used to interface with the file system, and there are CPAN modules
304 available for ARGV and environment variable conversions.
305
306 Full details are in L<perllocale>.
307
308 =head3 New function C<fc> and corresponding escape sequence C<\F> for Unicode foldcase
309
310 Unicode foldcase is an extension to lowercase that gives better results
311 when comparing two strings case-insensitively.  It has long been used
312 internally in regular expression C</i> matching.  Now it is available
313 explicitly through the new C<fc> function call (enabled by
314 S<C<"use feature 'fc'">>, or C<use v5.16>, or explicitly callable via
315 C<CORE::fc>) or through the new C<\F> sequence in double-quotish
316 strings.
317
318 Full details are in L<perlfunc/fc>.
319
320 =head3 The Unicode C<Script_Extensions> property is now supported.
321
322 New in Unicode 6.0, this is an improved C<Script> property.  Details
323 are in L<perlunicode/Scripts>.
324
325 =head2 XS Changes
326
327 =head3 Improved typemaps for Some Builtin Types
328
329 Most XS authors will be aware that there is a longstanding bug in the
330 OUTPUT typemap for T_AVREF (C<AV*>), T_HVREF (C<HV*>), T_CVREF (C<CV*>),
331 and T_SVREF (C<SVREF> or C<\$foo>) that requires manually decrementing
332 the reference count of the return value instead of the typemap taking
333 care of this.  For backwards-compatibility, this cannot be changed in the
334 default typemaps.  But we now provide additional typemaps
335 C<T_AVREF_REFCOUNT_FIXED>, etc. that do not exhibit this bug.  Using
336 them in your extension is as simple as having one line in your
337 C<TYPEMAP> section:
338
339   HV*   T_HVREF_REFCOUNT_FIXED
340
341 =head3 C<is_utf8_char()>
342
343 The XS-callable function C<is_utf8_char()>, when presented with
344 malformed UTF-8 input, can read up to 12 bytes beyond the end of the
345 string.  This cannot be fixed without changing its API.  It is not
346 called from CPAN.  The documentation now describes how to use it
347 safely.
348
349 =head3 Added C<is_utf8_char_buf()>
350
351 This function is designed to replace the deprecated L</is_utf8_char()>
352 function.  It includes an extra parameter to make sure it doesn't read
353 past the end of the input buffer.
354
355 =head3 Other C<is_utf8_foo()> functions, as well as C<utf8_to_foo()>, etc.
356
357 Most of the other XS-callable functions that take UTF-8 encoded input
358 implicitly assume that the UTF-8 is valid (not malformed) in regards to
359 buffer length.  Do not do things such as change a character's case or
360 see if it is alphanumeric without first being sure that it is valid
361 UTF-8.  This can be safely done for a whole string by using one of the
362 functions C<is_utf8_string()>, C<is_utf8_string_loc()>, and
363 C<is_utf8_string_loclen()>.
364
365 =head3 New Pad API
366
367 Many new functions have been added to the API for manipulating lexical
368 pads.  See L<perlapi/Pad Data Structures> for more information.
369
370 =head2 Changes to Special Variables
371
372 =head3 C<$$> can be assigned to
373
374 C<$$> was made read-only in Perl 5.8.0.  But only sometimes: C<local $$>
375 would make it writable again.  Some CPAN modules were using C<local $$> or
376 XS code to bypass the read-only check, so there is no reason to keep C<$$>
377 read-only.  (This change also allowed a bug to be fixed while maintaining
378 backward compatibility.)
379
380 =head3 C<$^X> converted to an absolute path on FreeBSD, OS X and Solaris
381
382 C<$^X> is now converted to an absolute path on OS X, FreeBSD (without
383 needing F</proc> mounted) and Solaris 10 and 11.  This augments the
384 previous approach of using F</proc> on Linux, FreeBSD and NetBSD
385 (in all cases, where mounted).
386
387 This makes relocatable perl installations more useful on these platforms.
388 (See "Relocatable @INC" in F<INSTALL>)
389
390 =head2 Debugger Changes
391
392 =head3 Features inside the debugger
393
394 The current Perl's L<feature> bundle is now enabled for commands entered
395 in the interactive debugger.
396
397 =head3 New option for the debugger's B<t> command
398
399 The B<t> command in the debugger, which toggles tracing mode, now
400 accepts a numeric argument that determines how many levels of subroutine
401 calls to trace.
402
403 =head3 C<enable> and C<disable>
404
405 The debugger now has C<disable> and C<enable> commands for disabling
406 existing breakpoints and re-enabling them.  See L<perldebug>.
407
408 =head3 Breakpoints with file names
409
410 The debugger's "b" command for setting breakpoints now allows a line
411 number to be prefixed with a file name.  See
412 L<perldebug/"b [file]:[line] [condition]">.
413
414 =head2 The C<CORE> Namespace
415
416 =head3 The C<CORE::> prefix
417
418 The C<CORE::> prefix can now be used on keywords enabled by
419 L<feature.pm|feature>, even outside the scope of C<use feature>.
420
421 =head3 Subroutines in the C<CORE> namespace
422
423 Many Perl keywords are now available as subroutines in the CORE namespace.
424 This allows them to be aliased:
425
426     BEGIN { *entangle = \&CORE::tie }
427     entangle $variable, $package, @args;
428
429 And for prototypes to be bypassed:
430
431     sub mytie(\[%$*@]$@) {
432         my ($ref, $pack, @args) = @_;
433         ... do something ...
434         goto &CORE::tie;
435     }
436
437 Some of these cannot be called through references or via C<&foo> syntax,
438 but must be called as barewords.
439
440 See L<CORE> for details.
441
442 =head2 Other Changes
443
444 =head3 Anonymous handles
445
446 Automatically generated file handles are now named __ANONIO__ when the
447 variable name cannot be determined, rather than $__ANONIO__.
448
449 =head3 Autoloaded sort Subroutines
450
451 Custom sort subroutines can now be autoloaded [perl #30661]:
452
453     sub AUTOLOAD { ... }
454     @sorted = sort foo @list; # uses AUTOLOAD
455
456 =head3 C<continue> no longer requires the "switch" feature
457
458 The C<continue> keyword has two meanings.  It can introduce a C<continue>
459 block after a loop, or it can exit the current C<when> block.  Up till now,
460 the latter meaning was only valid with the "switch" feature enabled, and
461 was a syntax error otherwise.  Since the main purpose of feature.pm is to
462 avoid conflicts with user-defined subroutines, there is no reason for
463 C<continue> to depend on it.
464
465 =head3 DTrace probes for interpreter phase change
466
467 The C<phase-change> probes will fire when the interpreter's phase
468 changes, which tracks the C<${^GLOBAL_PHASE}> variable.  C<arg0> is
469 the new phase name; C<arg1> is the old one.  This is useful mostly
470 for limiting your instrumentation to one or more of: compile time,
471 run time, destruct time.
472
473 =head3 C<__FILE__()> Syntax
474
475 The C<__FILE__>, C<__LINE__> and C<__PACKAGE__> tokens can now be written
476 with an empty pair of parentheses after them.  This makes them parse the
477 same way as C<time>, C<fork> and other built-in functions.
478
479 =head3 The C<\$> prototype accepts any scalar lvalue
480
481 The C<\$> and C<\[$]> subroutine prototypes now accept any scalar lvalue
482 argument.  Previously they only accepted scalars beginning with C<$> and
483 hash and array elements.  This change makes them consistent with the way
484 the built-in C<read> and C<recv> functions (among others) parse their
485 arguments.  This means that one can override the built-in functions with
486 custom subroutines that parse their arguments the same way.
487
488 =head3 C<_> in subroutine prototypes
489
490 The C<_> character in subroutine prototypes is now allowed before C<@> or
491 C<%>.
492
493 =head1 Security
494
495 =head2 Use C<is_utf8_char_buf()> and not C<is_utf8_char()>
496
497 The latter function is now deprecated because its API is insufficient to
498 guarantee that it doesn't read (up to 12 bytes in the worst case) beyond
499 the end of its input string.  See
500 L<is_utf8_char_buf()|/Added is_utf8_char_buf()>.
501
502 =head2 C<File::Glob::bsd_glob()> memory error with GLOB_ALTDIRFUNC (CVE-2011-2728).
503
504 Calling C<File::Glob::bsd_glob> with the unsupported flag
505 GLOB_ALTDIRFUNC would cause an access violation / segfault.  A Perl
506 program that accepts a flags value from an external source could expose
507 itself to denial of service or arbitrary code execution attacks.  There
508 are no known exploits in the wild.  The problem has been corrected by
509 explicitly disabling all unsupported flags and setting unused function
510 pointers to null.  Bug reported by Clément Lecigne.
511
512 =head2 Privileges are now set correctly when assigning to C<$(>
513
514 A hypothetical bug (probably non-exploitable in practice) due to the
515 incorrect setting of the effective group ID while setting C<$(> has been
516 fixed.  The bug would only have affected systems that have C<setresgid()>
517 but not C<setregid()>, but no such systems are known of.
518
519 =head1 Deprecations
520
521 =head2 Don't read the Unicode data base files in F<lib/unicore>
522
523 It is now deprecated to directly read the Unicode data base files.
524 These are stored in the F<lib/unicore> directory.  Instead, you should
525 use the new functions in L<Unicode::UCD>.  These provide a stable API,
526 and give complete information.
527
528 Perl may at some point in the future change or remove the files.  The
529 file most likely for applications to have used is
530 F<lib/unicore/ToDigit.pl>.  L<Unicode::UCD/prop_invmap()> can be used to
531 get at its data instead.
532
533 =head2 C<is_utf8_char()>
534
535 This function is deprecated because it could read beyond the end of the
536 input string.  Use the new L<is_utf8_char_buf()|/Added is_utf8_char_buf()>
537 instead.
538
539 =head1 Future Deprecations
540
541 This section serves as a notice of features that are I<likely> to be
542 removed or L<deprecated|perlpolicy/deprecated> in the next release of
543 perl (5.18.0).  If your code depends on these features, you should
544 contact the Perl 5 Porters via the L<mailing
545 list|http://lists.perl.org/list/perl5-porters.html> or L<perlbug> to
546 explain your use case and inform the deprecation process.
547
548 =head2 Core Modules
549
550 These modules may be marked as deprecated I<from the core>.  This only
551 means that they will no longer be installed by default with the core
552 distribution, but will remain available on the CPAN.
553
554 =over
555
556 =item *
557
558 CPANPLUS
559
560 =item *
561
562 Filter::Simple
563
564 =item *
565
566 PerlIO::mmap
567
568 =item *
569
570 Pod::Parser, Pod::LaTeX
571
572 =item *
573
574 SelfLoader
575
576 =item *
577
578 Text::Soundex
579
580 =item *
581
582 Thread.pm
583
584 =back
585
586 =head2 Platforms with no supporting programmers:
587
588 These platforms will probably have their
589 special build support removed during the
590 5.17.0 development series.
591
592 =over
593
594 =item *
595
596 BeOS
597
598 =item *
599
600 djgpp
601
602 =item *
603
604 dgux
605
606 =item *
607
608 EPOC
609
610 =item *
611
612 MPE/iX
613
614 =item *
615
616 Rhapsody
617
618 =item *
619
620 UTS
621
622 =item *
623
624 VM/ESA
625
626 =back
627
628 =head2 Other Future Deprecations
629
630 =over
631
632 =item *
633
634 Swapping of $< and $>
635
636 For more information about this future deprecation, see L<the relevant RT
637 ticket|https://rt.perl.org/rt3/Ticket/Display.html?id=96212>.
638
639 =item *
640
641 sfio, stdio
642
643 =item *
644
645 Unescaped literal C<< "{" >> in regular expressions.
646
647 It is planned starting in v5.20 to require a literal C<"{"> to be
648 escaped by, for example, preceding it with a backslash.  In v5.18, a
649 deprecated warning message will be emitted for all such uses.  Note that
650 this only affects patterns which are to match a literal C<"{">.  Other
651 uses of this character, such as part of a quantifier or sequence like in
652 the ones below are completely unaffected:
653
654     /foo{3,5}/
655     /\p{Alphabetic}/
656     /\N{DIGIT ZERO}
657
658 The removal of this will allow extensions to pattern syntax, and better
659 error checking of existing syntax.  See L<perlre/Quantifiers> for an
660 example.
661
662 =back
663
664 =head1 Incompatible Changes
665
666 =head2 Special blocks called in void context
667
668 Special blocks (C<BEGIN>, C<CHECK>, C<INIT>, C<UNITCHECK>, C<END>) are now
669 called in void context.  This avoids wasteful copying of the result of the
670 last statement [perl #108794].
671
672 =head2 The C<overloading> pragma and regexp objects
673
674 With C<no overloading>, regular expression objects returned by C<qr//> are
675 now stringified as "Regexp=REGEXP(0xbe600d)" instead of the regular
676 expression itself [perl #108780].
677
678 =head2 Two XS typemap Entries removed
679
680 Two presumably unused XS typemap entries have been removed from the
681 core typemap: T_DATAUNIT and T_CALLBACK.  If you are, against all odds,
682 a user of these, please see the instructions on how to regain them
683 in L<perlxstypemap>.
684
685 =head2 Unicode 6.1 has incompatibilities with Unicode 6.0
686
687 These are detailed in L</Supports (almost) Unicode 6.1> above.
688 You can compile this version of Perl to use Unicode 6.0.  See
689 L<perlunicode/Hacking Perl to work on earlier Unicode versions (for very serious hackers only)>.
690
691 =head2 Borland compiler
692
693 All support for the Borland compiler has been dropped.  The code had not
694 worked for a long time anyway.
695
696 =head2 Certain deprecated Unicode properties are no longer supported by default
697
698 Perl should never have exposed certain Unicode properties that are used
699 by Unicode internally and not meant to be publicly available.  Use of
700 these has generated deprecated warning messages since Perl 5.12.  The
701 removed properties are Other_Alphabetic,
702 Other_Default_Ignorable_Code_Point, Other_Grapheme_Extend,
703 Other_ID_Continue, Other_ID_Start, Other_Lowercase, Other_Math, and
704 Other_Uppercase.
705
706 Perl may be recompiled to include any or all of them; instructions are
707 given in
708 L<perluniprops/Unicode character properties that are NOT accepted by Perl>.
709
710 =head2 Dereferencing IO thingies as typeglobs
711
712 The C<*{...}> operator, when passed a reference to an IO thingy (as in
713 C<*{*STDIN{IO}}>), creates a new typeglob containing just that IO object.
714 Previously, it would stringify as an empty string, but some operators would
715 treat it as undefined, producing an "uninitialized" warning.
716 Now it stringifies as __ANONIO__ [perl #96326].
717
718 =head2 User-defined case changing operations.
719
720 This feature was deprecated in Perl 5.14, and has now been removed.
721 The CPAN module L<Unicode::Casing> provides better functionality without
722 the drawbacks that this feature had, as are detailed in the 5.14
723 documentation:
724 L<http://perldoc.perl.org/5.14.0/perlunicode.html#User-Defined-Case-Mappings-%28for-serious-hackers-only%29>
725
726 =head2 XSUBs are now 'static'
727
728 XSUB C functions are now 'static', that is, they are not visible from
729 outside the compilation unit.  Users can use the new C<XS_EXTERNAL(name)>
730 and C<XS_INTERNAL(name)> macros to pick the desired linking behaviour.
731 The ordinary C<XS(name)> declaration for XSUBs will continue to declare
732 non-'static' XSUBs for compatibility, but the XS compiler,
733 C<ExtUtils::ParseXS> (C<xsubpp>) will emit 'static' XSUBs by default.
734 C<ExtUtils::ParseXS>'s behaviour can be reconfigured from XS using the
735 C<EXPORT_XSUB_SYMBOLS> keyword.  See L<perlxs> for details.
736
737 =head2 Weakening read-only references
738
739 Weakening read-only references is no longer permitted.  It should never
740 have worked anyway, and in some cases could result in crashes.
741
742 =head2 Tying scalars that hold typeglobs
743
744 Attempting to tie a scalar after a typeglob was assigned to it would
745 instead tie the handle in the typeglob's IO slot.  This meant that it was
746 impossible to tie the scalar itself.  Similar problems affected C<tied> and
747 C<untie>: C<tied $scalar> would return false on a tied scalar if the last
748 thing returned was a typeglob, and C<untie $scalar> on such a tied scalar
749 would do nothing.
750
751 We fixed this problem before Perl 5.14.0, but it caused problems with some
752 CPAN modules, so we put in a deprecation cycle instead.
753
754 Now the deprecation has been removed and this bug has been fixed.  So
755 C<tie $scalar> will always tie the scalar, not the handle it holds.  To tie
756 the handle, use C<tie *$scalar> (with an explicit asterisk).  The same
757 applies to C<tied *$scalar> and C<untie *$scalar>.
758
759 =head2 IPC::Open3 no longer provides C<xfork()>, C<xclose_on_exec()>
760 and C<xpipe_anon()>
761
762 All three functions were private, undocumented and unexported.  They do
763 not appear to be used by any code on CPAN.  Two have been inlined and one
764 deleted entirely.
765
766 =head2 C<$$> no longer caches PID
767
768 Previously, if one called fork(3) from C, Perl's
769 notion of C<$$> could go out of sync with what getpid() returns.  By always
770 fetching the value of C<$$> via getpid(), this potential bug is eliminated.
771 Code that depends on the caching behavior will break.  As described in
772 L<Core Enhancements|/C<$$> can be assigned to>,
773 C<$$> is now writable, but it will be reset during a
774 fork.
775
776 =head2 C<$$> and C<getppid()> no longer emulate POSIX semantics under LinuxThreads
777
778 The POSIX emulation of C<$$> and C<getppid()> under the obsolete
779 LinuxThreads implementation has been removed.
780 This only impacts users of Linux 2.4 and
781 users of Debian GNU/kFreeBSD up to and including 6.0, not the vast
782 majority of Linux installations that use NPTL threads.
783
784 This means that C<getppid()>, like C<$$>, is now always guaranteed to
785 return the OS's idea of the current state of the process, not perl's
786 cached version of it.
787
788 See the documentation for L<$$|perlvar/$$> for details.
789
790 =head2 C<< $< >>, C<< $> >>, C<$(> and C<$)> are no longer cached
791
792 Similarly to the changes to C<$$> and C<getppid()>, the internal
793 caching of C<< $< >>, C<< $> >>, C<$(> and C<$)> has been removed.
794
795 When we cached these values our idea of what they were would drift out
796 of sync with reality if someone (e.g., someone embedding perl) called
797 C<sete?[ug]id()> without updating C<PL_e?[ug]id>.  Having to deal with
798 this complexity wasn't worth it given how cheap the C<gete?[ug]id()>
799 system call is.
800
801 This change will break a handful of CPAN modules that use the XS-level
802 C<PL_uid>, C<PL_gid>, C<PL_euid> or C<PL_egid> variables.
803
804 The fix for those breakages is to use C<PerlProc_gete?[ug]id()> to
805 retrieve them (e.g. C<PerlProc_getuid()>), and not to assign to
806 C<PL_e?[ug]id> if you change the UID/GID/EUID/EGID.  There is no longer
807 any need to do so since perl will always retrieve the up-to-date
808 version of those values from the OS.
809
810 =head2 Which Non-ASCII characters get quoted by C<quotemeta> and C<\Q> has changed
811
812 This is unlikely to result in a real problem, as Perl does not attach
813 special meaning to any non-ASCII character, so it is currently
814 irrelevant which are quoted or not.  This change fixes bug [perl #77654] and
815 bring Perl's behavior more into line with Unicode's recommendations.
816 See L<perlfunc/quotemeta>.
817
818 =head1 Performance Enhancements
819
820 =over
821
822 =item *
823
824 Improved performance for Unicode properties in regular expressions
825
826 =for comment Can this be compacted some? -- rjbs, 2012-02-20
827
828 Matching a code point against a Unicode property is now done via a
829 binary search instead of linear.  This means for example that the worst
830 case for a 1000 item property is 10 probes instead of 1000.  This
831 inefficiency has been compensated for in the past by permanently storing
832 in a hash the results of a given probe plus the results for the adjacent
833 64 code points, under the theory that near-by code points are likely to
834 be searched for.  A separate hash was used for each mention of a Unicode
835 property in each regular expression.  Thus, C<qr/\p{foo}abc\p{foo}/>
836 would generate two hashes.  Any probes in one instance would be unknown
837 to the other, and the hashes could expand separately to be quite large
838 if the regular expression were used on many different widely-separated
839 code points.  This can lead to running out of memory in extreme cases.
840 Now, however, there is just one hash shared by all instances of a given
841 property.  This means that if C<\p{foo}> is matched against "A" in one
842 regular expression in a thread, the result will be known immediately to
843 all regular expressions, and the relentless march of using up memory is
844 slowed considerably.
845
846 =item *
847
848 Version declarations with the C<use> keyword (e.g., C<use 5.012>) are now
849 faster, as they enable features without loading F<feature.pm>.
850
851 =item *
852
853 C<local $_> is faster now, as it no longer iterates through magic that it
854 is not going to copy anyway.
855
856 =item *
857
858 Perl 5.12.0 sped up the destruction of objects whose classes define
859 empty C<DESTROY> methods (to prevent autoloading), by simply not
860 calling such empty methods.  This release takes this optimisation a
861 step further, by not calling any C<DESTROY> method that begins with a
862 C<return> statement.  This can be useful for destructors that are only
863 used for debugging:
864
865     use constant DEBUG => 1;
866     sub DESTROY { return unless DEBUG; ... }
867
868 Constant-folding will reduce the first statement to C<return;> if DEBUG
869 is set to 0, triggering this optimisation.
870
871 =item *
872
873 Assigning to a variable that holds a typeglob or copy-on-write scalar
874 is now much faster.  Previously the typeglob would be stringified or
875 the copy-on-write scalar would be copied before being clobbered.
876
877 =item *
878
879 Assignment to C<substr> in void context is now more than twice its
880 previous speed.  Instead of creating and returning a special lvalue
881 scalar that is then assigned to, C<substr> modifies the original string
882 itself.
883
884 =item *
885
886 C<substr> no longer calculates a value to return when called in void
887 context.
888
889 =item *
890
891 Due to changes in L<File::Glob>, Perl's C<glob> function and its C<<
892 <...> >> equivalent are now much faster.  The splitting of the pattern
893 into words has been rewritten in C, resulting in speed-ups of 20% in
894 some cases.
895
896 This does not affect C<glob> on VMS, as it does not use File::Glob.
897
898 =item *
899
900 The short-circuiting operators C<&&>, C<||>, and C<//>, when chained
901 (such as C<$a || $b || $c>), are now considerably faster to short-circuit,
902 due to reduced optree traversal.
903
904 =item *
905
906 The implementation of C<s///r> makes one fewer copy of the scalar's value.
907
908 =item *
909
910 C<study> is now a no-op.
911
912 =item *
913
914 Recursive calls to lvalue subroutines in lvalue scalar context use less
915 memory.
916
917 =back
918
919 =head1 Modules and Pragmata
920
921 =head2 Deprecated Modules
922
923 =over
924
925 =item L<Version::Requirements>
926
927 Version::Requirements is now DEPRECATED, use L<CPAN::Meta::Requirements>,
928 which is a drop-in replacement.  It will be deleted from perl.git blead
929 in v5.17.0.
930
931 =back
932
933 =head2 New Modules and Pragmata
934
935 =over 4
936
937 =item *
938
939 L<arybase> -- this new module implements the C<$[> variable.
940
941 =item *
942
943 C<PerlIO::mmap> 0.010 has been added to the Perl core.
944
945 The C<mmap> PerlIO layer is no longer implemented by perl itself, but has
946 been moved out into the new L<PerlIO::mmap> module.
947
948 =back
949
950 =head2 Updated Modules and Pragmata
951
952 =over 4
953
954 =item *
955
956 L<XXX> has been upgraded from version 0.69 to version 0.70.
957
958 =back
959
960 =head2 Removed Modules and Pragmata
961
962 As promised in Perl 5.14.0's release notes, the following modules have
963 been removed from the core distribution, and if needed should be installed
964 from CPAN instead.
965
966 =over
967
968 =item *
969
970 C<Devel::DProf> has been removed from the Perl core.  Prior version was
971 20110228.00.
972
973 =item *
974
975 C<Shell> has been removed from the Perl core.  Prior version was 0.72_01.
976
977 =back
978
979 =head1 Documentation
980
981 =head2 New Documentation
982
983 =head3 L<perldtrace>
984
985 L<perldtrace> describes Perl's DTrace support, listing the provided probes
986 and gives examples of their use.
987
988 =head3 L<perlexperiment>
989
990 This document is intended to provide a list of experimental features in
991 Perl.  It is still a work in progress.
992
993 =head3 L<perlootut>
994
995 This a new OO tutorial.  It focuses on basic OO concepts, and then recommends
996 that readers choose an OO framework from CPAN.
997
998 =head3 L<perlxstypemap>
999
1000 The new manual describes the XS typemapping mechanism in unprecedented
1001 detail and combines new documentation with information extracted from
1002 L<perlxs> and the previously unofficial list of all core typemaps.
1003
1004 =head2 Changes to Existing Documentation
1005
1006 =head3 L<perlapi>
1007
1008 =over 4
1009
1010 =item *
1011
1012 The HV API has long accepted negative lengths to indicate that the key is
1013 in UTF8.  Now this is documented.
1014
1015 =item *
1016
1017 The C<boolSV()> macro is now documented.
1018
1019 =back
1020
1021 =head3 L<perlfunc>
1022
1023 =over 4
1024
1025 =item *
1026
1027 C<dbmopen> treats a 0 mode as a special case, that prevents a nonexistent
1028 file from being created.  This has been the case since Perl 5.000, but was
1029 never documented anywhere.  Now the perlfunc entry mentions it
1030 [perl #90064].
1031
1032 =item *
1033
1034 As an accident of history, C<open $fh, "<:", ...> applies the default
1035 layers for the platform (C<:raw> on Unix, C<:crlf> on Windows), ignoring
1036 whatever is declared by L<open.pm|open>.  This seems such a useful feature
1037 it has been documented in L<perlfunc|perlfunc/open> and L<open>.
1038
1039 =item *
1040
1041 The entry for C<split> has been rewritten.  It is now far clearer than
1042 before.
1043
1044 =back
1045
1046 =head3 L<perlguts>
1047
1048 =over 4
1049
1050 =item *
1051
1052 A new section, L<Autoloading with XSUBs|perlguts/Autoloading with XSUBs>,
1053 has been added, which explains the two APIs for accessing the name of the
1054 autoloaded sub.
1055
1056 =item *
1057
1058 Some of the function descriptions in L<perlguts> were confusing, as it was
1059 not clear whether they referred to the function above or below the
1060 description.  This has been clarified [perl #91790].
1061
1062 =back
1063
1064 =head3 L<perlobj>
1065
1066 =over 4
1067
1068 =item *
1069
1070 This document has been rewritten from scratch, and its coverage of various OO
1071 concepts has been expanded.
1072
1073 =back
1074
1075 =head3 L<perlop>
1076
1077 =over 4
1078
1079 =item *
1080
1081 Documentation of the smartmatch operator has been reworked and moved from
1082 perlsyn to perlop where it belongs.
1083
1084 It has also been corrected for the case of C<undef> on the left-hand
1085 side.  The list of different smart match behaviours had an item in the
1086 wrong place.
1087
1088 =item *
1089
1090 Documentation of the ellipsis statement (C<...>) has been reworked and
1091 moved from perlop to perlsyn.
1092
1093 =item *
1094
1095 The explanation of bitwise operators has been expanded to explain how they
1096 work on Unicode strings (5.14.1).
1097
1098 =item *
1099
1100 More examples for C<m//g> have been added (5.14.1).
1101
1102 =item *
1103
1104 The C<<< <<\FOO >>> here-doc syntax has been documented (5.14.1).
1105
1106 =back
1107
1108 =head3 L<perlpragma>
1109
1110 =over 4
1111
1112 =item *
1113
1114 There is now a standard convention for naming keys in the C<%^H>,
1115 documented under L<Key naming|perlpragma/Key naming>.
1116
1117 =back
1118
1119 =head3 L<perlsec/Laundering and Detecting Tainted Data>
1120
1121 =over 4
1122
1123 =item *
1124
1125 The example function for checking for taintedness contained a subtle
1126 error.  C<$@> needs to be localized to prevent its changing this
1127 global's value outside the function.  The preferred method to check for
1128 this remains L<Scalar::Util/tainted>.
1129
1130 =back
1131
1132 =head3 L<perllol>
1133
1134 =over
1135
1136 =item *
1137
1138 L<perllol> has been expanded with examples using the new C<push $scalar>
1139 syntax introduced in Perl 5.14.0 (5.14.1).
1140
1141 =back
1142
1143 =head3 L<perlmod>
1144
1145 =over
1146
1147 =item *
1148
1149 L<perlmod> now states explicitly that some types of explicit symbol table
1150 manipulation are not supported.  This codifies what was effectively already
1151 the case [perl #78074].
1152
1153 =back
1154
1155 =head3 L<perlpodstyle>
1156
1157 =over 4
1158
1159 =item *
1160
1161 The tips on which formatting codes to use have been corrected and greatly
1162 expanded.
1163
1164 =item *
1165
1166 There are now a couple of example one-liners for previewing POD files after
1167 they have been edited.
1168
1169 =back
1170
1171 =head3 L<perlre>
1172
1173 =over
1174
1175 =item *
1176
1177 The C<(*COMMIT)> directive is now listed in the right section
1178 (L<Verbs without an argument|perlre/Verbs without an argument>).
1179
1180 =back
1181
1182 =head3 L<perlrun>
1183
1184 =over
1185
1186 =item *
1187
1188 L<perlrun> has undergone a significant clean-up.  Most notably, the
1189 B<-0x...> form of the B<-0> flag has been clarified, and the final section
1190 on environment variables has been corrected and expanded (5.14.1).
1191
1192 =back
1193
1194 =head3 L<perlsub>
1195
1196 =over
1197
1198 =item *
1199
1200 The ($;) prototype syntax, which has existed for rather a long time, is now
1201 documented in L<perlsub>.  It allows a unary function to have the same
1202 precedence as a list operator.
1203
1204 =back
1205
1206 =head3 L<perltie>
1207
1208 =over
1209
1210 =item *
1211
1212 The required syntax for tying handles has been documented.
1213
1214 =back
1215
1216 =head3 L<perlvar>
1217
1218 =over
1219
1220 =item *
1221
1222 The documentation for L<$!|perlvar/$!> has been corrected and clarified.
1223 It used to state that $! could be C<undef>, which is not the case.  It was
1224 also unclear as to whether system calls set C's C<errno> or Perl's C<$!>
1225 [perl #91614].
1226
1227 =item *
1228
1229 Documentation for L<$$|perlvar/$$> has been amended with additional
1230 cautions regarding changing the process ID.
1231
1232 =back
1233
1234 =head3 Other Changes
1235
1236 =over 4
1237
1238 =item *
1239
1240 L<perlxs> was extended with documentation on inline typemaps.
1241
1242 =item *
1243
1244 L<perlref> has a new L<Circular References|perlref/Circular References>
1245 section explaining how circularities may not be freed and how to solve that
1246 with weak references.
1247
1248 =item *
1249
1250 Parts of L<perlapi> were clarified, and Perl equivalents of some C
1251 functions have been added as an additional mode of exposition.
1252
1253 =item *
1254
1255 A few parts of L<perlre> and L<perlrecharclass> were clarified.
1256
1257 =back
1258
1259 =head2 Removed Documentation
1260
1261 =head3 Old OO Documentation
1262
1263 All the old OO tutorials, perltoot, perltooc, and perlboot, have been
1264 removed.  The perlbot (bag of object tricks) document has been removed
1265 as well.
1266
1267 =head3 Development Deltas
1268
1269 The perldelta files for development releases are no longer packaged with
1270 perl.  These can still be found in the perl source code repository.
1271
1272 =head1 Diagnostics
1273
1274 The following additions or changes have been made to diagnostic output,
1275 including warnings and fatal error messages.  For the complete list of
1276 diagnostic messages, see L<perldiag>.
1277
1278 =head2 New Diagnostics
1279
1280 =head3 New Errors
1281
1282 =over 4
1283
1284 =item *
1285
1286 L<Cannot set tied @DB::args|perldiag/"Cannot set tied @DB::args">
1287
1288 This error occurs when C<caller> tries to set C<@DB::args> but finds it
1289 tied.  Before this error was added, it used to crash instead.
1290
1291 =item *
1292
1293 L<Cannot tie unreifiable array|perldiag/"Cannot tie unreifiable array">
1294
1295 This error is part of a safety check that the C<tie> operator does before
1296 tying a special array like C<@_>.  You should never see this message.
1297
1298 =item *
1299
1300 L<&CORE::%s cannot be called directly|perldiag/"&CORE::%s cannot be called directly">
1301
1302 This occurs when a subroutine in the C<CORE::> namespace is called
1303 with C<&foo> syntax or through a reference.  Some subroutines
1304 in this package cannot yet be called that way, but must be
1305 called as barewords.  See L</Subroutines in the C<CORE> namespace>, above.
1306
1307 =item *
1308
1309 L<Source filters apply only to byte streams|perldiag/"Source filters apply only to byte streams">
1310
1311 This new error occurs when you try to activate a source filter (usually by
1312 loading a source filter module) within a string passed to C<eval> under the
1313 C<unicode_eval> feature.
1314
1315 =back
1316
1317 =head3 New Warnings
1318
1319 =over 4
1320
1321 =item *
1322
1323 L<defined(@array) is deprecated|perldiag/"defined(@array) is deprecated">
1324
1325 The long-deprecated C<defined(@array)> now also warns for package variables.
1326 Previously it only issued a warning for lexical variables.
1327
1328 =item *
1329
1330 L<length() used on %s|perldiag/length() used on %s>
1331
1332 This new warning occurs when C<length> is used on an array or hash, instead
1333 of C<scalar(@array)> or C<scalar(keys %hash)>.
1334
1335 =item *
1336
1337 L<lvalue attribute %s already-defined subroutine|perldiag/"lvalue attribute %s already-defined subroutine">
1338
1339 L<attributes.pm|attributes> now emits this warning when the :lvalue
1340 attribute is applied to a Perl subroutine that has already been defined, as
1341 doing so can have unexpected side-effects.
1342
1343 =item *
1344
1345 L<overload arg '%s' is invalid|perldiag/"overload arg '%s' is invalid">
1346
1347 This warning, in the "overload" category, is produced when the overload
1348 pragma is given an argument it doesn't recognize, presumably a mistyped
1349 operator.
1350
1351 =item *
1352
1353 L<$[ used in %s (did you mean $] ?)|perldiag/"$[ used in %s (did you mean $] ?)">
1354
1355 This new warning exists to catch the mistaken use of C<$[> in version
1356 checks.  C<$]>, not C<$[>, contains the version number.
1357
1358 =item *
1359
1360 L<Useless assignment to a temporary|perldiag/"Useless assignment to a temporary">
1361
1362 Assigning to a temporary scalar returned
1363 from an lvalue subroutine now produces this
1364 warning [perl #31946].
1365
1366 =item *
1367
1368 L<Useless use of \E|perldiag/"Useless use of \E">
1369
1370 C<\E> does nothing unless preceded by C<\Q>, C<\L> or C<\U>.
1371
1372 =back
1373
1374 =head2 Removed Errors
1375
1376 =over
1377
1378 =item *
1379
1380 "sort is now a reserved word"
1381
1382 This error used to occur when C<sort> was called without arguments,
1383 followed by C<;> or C<)>.  (E.g., C<sort;> would die, but C<{sort}> was
1384 OK.)  This error message was added in Perl 3 to catch code like
1385 C<close(sort)> which would no longer work.  More than two decades later,
1386 this message is no longer appropriate.  Now C<sort> without arguments is
1387 always allowed, and returns an empty list, as it did in those cases
1388 where it was already allowed [perl #90030].
1389
1390 =back
1391
1392 =head2 Changes to Existing Diagnostics
1393
1394 =over 4
1395
1396 =item *
1397
1398 The "Applying pattern match..." or similar warning produced when an
1399 array or hash is on the left-hand side of the C<=~> operator now
1400 mentions the name of the variable.
1401
1402 =item *
1403
1404 The "Attempt to free non-existent shared string" has had the spelling
1405 of "non-existent" corrected to "nonexistent".  It was already listed
1406 with the correct spelling in L<perldiag>.
1407
1408 =item *
1409
1410 The error messages for using C<default> and C<when> outside of a
1411 topicalizer have been standardised to match the messages for C<continue>
1412 and loop controls.  They now read 'Can't "default" outside a
1413 topicalizer' and 'Can't "when" outside a topicalizer'.  They both used
1414 to be 'Can't use when() outside a topicalizer' [perl #91514].
1415
1416 =item *
1417
1418 The message, "Code point 0x%X is not Unicode, no properties match it;
1419 all inverse properties do" has been changed to "Code point 0x%X is not
1420 Unicode, all \p{} matches fail; all \P{} matches succeed".
1421
1422 =item *
1423
1424 Redefinition warnings for constant subroutines used to be mandatory,
1425 even occurring under C<no warnings>.  Now they respect the L<warnings>
1426 pragma.
1427
1428 =item *
1429
1430 The "glob failed" warning message is now suppressible via C<no warnings>
1431 [perl #111656].
1432
1433 =item *
1434
1435 The L<Invalid version format|perldiag/"Invalid version format (%s)">
1436 error message now says "negative version number" within the parentheses,
1437 rather than "non-numeric data", for negative numbers.
1438
1439 =item *
1440
1441 The two warnings
1442 L<Possible attempt to put comments in qw() list|perldiag/"Possible attempt to put comments in qw() list">
1443 and
1444 L<Possible attempt to separate words with commas|perldiag/"Possible attempt to separate words with commas">
1445 are no longer mutually exclusive: the same C<qw> construct may produce
1446 both.
1447
1448 =item *
1449
1450 The uninitialized warning for C<y///r> when C<$_> is implicit and
1451 undefined now mentions the variable name, just like the non-/r variation
1452 of the operator.
1453
1454 =item *
1455
1456 The 'Use of "foo" without parentheses is ambiguous' warning has been
1457 extended to apply also to user-defined subroutines with a (;$)
1458 prototype, and not just to built-in functions.
1459
1460 =item *
1461
1462 Warnings that mention the names of lexical (C<my>) variables with
1463 Unicode characters in them now respect the presence or absence of the
1464 C<:utf8> layer on the output handle, instead of outputting UTF8
1465 regardless.  Also, the correct names are included in the strings passed
1466 to C<$SIG{__WARN__}> handlers, rather than the raw UTF8 bytes.
1467
1468 =back
1469
1470 =head1 Utility Changes
1471
1472 =head3 L<h2ph>
1473
1474 =over 4
1475
1476 =item *
1477
1478 L<h2ph> used to generate code of the form
1479
1480   unless(defined(&FOO)) {
1481     sub FOO () {42;}
1482   }
1483
1484 But the subroutine is a compile-time declaration, and is hence unaffected
1485 by the condition.  It has now been corrected to emit a string C<eval>
1486 around the subroutine [perl #99368].
1487
1488 =back
1489
1490 =head3 L<splain>
1491
1492 =over 4
1493
1494 =item *
1495
1496 F<splain> no longer emits backtraces with the first line number repeated.
1497
1498 This:
1499
1500     Uncaught exception from user code:
1501             Cannot fwiddle the fwuddle at -e line 1.
1502      at -e line 1
1503             main::baz() called at -e line 1
1504             main::bar() called at -e line 1
1505             main::foo() called at -e line 1
1506
1507 has become this:
1508
1509     Uncaught exception from user code:
1510             Cannot fwiddle the fwuddle at -e line 1.
1511             main::baz() called at -e line 1
1512             main::bar() called at -e line 1
1513             main::foo() called at -e line 1
1514
1515 =item *
1516
1517 Some error messages consist of multiple lines that are listed as separate
1518 entries in L<perldiag>.  splain has been taught to find the separate
1519 entries in these cases, instead of simply failing to find the message.
1520
1521 =back
1522
1523 =head3 L<zipdetails>
1524
1525 =over 4
1526
1527 =item *
1528
1529 This is a new utility, included as part of an
1530 L<IO::Compress::Base> upgrade.
1531
1532 L<zipdetails> displays information about the internal record structure
1533 of the zip file.  It is not concerned with displaying any details of
1534 the compressed data stored in the zip file.
1535
1536 =back
1537
1538 =head1 Configuration and Compilation
1539
1540 =over 4
1541
1542 =item *
1543
1544 The C<-Dusesitecustomize> and C<-Duserelocatableinc> options now work
1545 together properly.
1546
1547 =item *
1548
1549 F<regexp.h> has been modified for compatibility with GCC's B<-Werror>
1550 option, as used by some projects that include perl's header files (5.14.1).
1551
1552 =item *
1553
1554 C<USE_LOCALE{,_COLLATE,_CTYPE,_NUMERIC}> have been added the output of perl -V
1555 as they have affect the behaviour of the interpreter binary (albeit only
1556 in a small area).
1557
1558 =item *
1559
1560 The code and tests for L<IPC::Open2> have been moved from F<ext/IPC-Open2>
1561 into F<ext/IPC-Open3>, as C<IPC::Open2::open2()> is implemented as a thin
1562 wrapper around C<IPC::Open3::_open3()>, and hence is very tightly coupled to
1563 it.
1564
1565 =item *
1566
1567 The magic types and magic vtables are now generated from data in a new script
1568 F<regen/mg_vtable.pl>, instead of being
1569 maintained by hand.  As different EBCDIC
1570 variants can't agree on the code point for '~', the character to code point
1571 conversion is done at build time by F<generate_uudmap> to a new generated header
1572 F<mg_data.h>.  C<PL_vtbl_bm> and C<PL_vtbl_fm> are now defined by the
1573 pre-processor as C<PL_vtbl_regexp>, instead of being distinct C variables.
1574 C<PL_vtbl_sig> has been removed.
1575
1576 =item *
1577
1578 Building with C<-DPERL_GLOBAL_STRUCT>
1579 works again.  This configuration is not
1580 generally used.
1581
1582 =item *
1583
1584 Perl configured with I<MAD> now correctly frees C<MADPROP> structures when
1585 OPs are freed.  C<MADPROP>s are now allocated with
1586 C<PerlMemShared_malloc()>
1587
1588 =back
1589
1590 =head1 Platform Support
1591
1592 =head2 Platform-Specific Notes
1593
1594 =head3 Cygwin
1595
1596 =over 4
1597
1598 =item *
1599
1600 Since version 1.7, Cygwin supports native UTF-8 paths.  If Perl is built
1601 under that environment, directory and filenames will be UTF-8 encoded.
1602
1603 Cygwin does not initialize all original Win32 environment variables.  See
1604 F<README.cygwin> for a discussion of the newly-added
1605 C<Cygwin::sync_winenv()> function [perl #110190] and for
1606 further links.
1607
1608 =back
1609
1610 =head3 VMS
1611
1612 =over 4
1613
1614 =item *
1615
1616 Remove unnecessary includes, fix miscellaneous compiler warnings and
1617 close some unclosed comments on F<vms/vms.c>.
1618
1619 Remove sockadapt layer from the VMS build.
1620
1621 =item *
1622
1623 Explicit support for VMS versions prior to v7.0 and DEC C versions
1624 prior to v6.0 has been removed.
1625
1626 =item *
1627
1628 Since Perl 5.10.1, the home-grown C<stat> wrapper has been unable to
1629 distinguish between a directory name containing an underscore and an
1630 otherwise-identical filename containing a dot in the same position
1631 (e.g., t/test_pl as a directory and t/test.pl as a file).  This problem
1632 has been corrected.
1633
1634 =item *
1635
1636 The build on VMS now allows names of the resulting symbols in C code for
1637 Perl longer than 31 characters.  Symbols like
1638 C<Perl__it_was_the_best_of_times_it_was_the_worst_of_times> can now be
1639 created freely without causing the VMS linker to seize up.
1640
1641 =back
1642
1643 =head3 GNU/Hurd
1644
1645 Numerous build and test failures on GNU/Hurd have been resolved with hints
1646 for building DBM modules, detection of the library search path, and enabling
1647 of large file support.
1648
1649 =head3 OpenVOS
1650
1651 Perl is now built with dynamic linking on OpenVOS, the minimum supported
1652 version of which is now Release 17.1.0.
1653
1654 =head3 SunOS
1655
1656 The CC workshop C++ compiler is now detected and used on systems that ship
1657 without cc.
1658
1659 =head1 Internal Changes
1660
1661 =over 4
1662
1663 =item *
1664
1665 There are now feature bundle hints in C<PL_hints> (C<$^H>) that version
1666 declarations use, to avoid having to load F<feature.pm>.  One setting of
1667 the hint bits indicates a "custom" feature bundle, which means that the
1668 entries in C<%^H> still apply.  F<feature.pm> uses that.
1669
1670 The C<HINT_FEATURE_MASK> macro is defined in F<perl.h> along with other
1671 hints.  Other macros for setting and testing features and bundles are in
1672 the new F<feature.h>.  C<FEATURE_IS_ENABLED> (which has moved to
1673 F<feature.h>) is no longer used throughout the codebase, but more specific
1674 macros, e.g., C<FEATURE_SAY_IS_ENABLED>, that are defined in F<feature.h>.
1675
1676 =item *
1677
1678 F<lib/feature.pm> is now a generated file, created by the new
1679 F<regen/feature.pl> script, which also generates F<feature.h>.
1680
1681 =item *
1682
1683 Tied arrays are now always C<AvREAL>.  If C<@_> or C<DB::args> is tied, it
1684 is reified first, to make sure this is always the case.
1685
1686 =item *
1687
1688 The C<is_gv_magical_sv> function has been eliminated and merged with
1689 C<gv_fetchpvn_flags>.  It used to be called to determine whether a GV
1690 should be autovivified in rvalue context.  Now it has been replaced with a
1691 new C<GV_ADDMG> flag (not part of the API).
1692
1693 =item *
1694
1695 Padlists are now marked C<AvREAL>; i.e., reference-counted.  They have
1696 always been reference-counted, but were not marked real, because F<pad.c>
1697 did its own clean-up, instead of using the usual clean-up code in F<sv.c>.
1698 That caused problems in thread cloning, so now the C<AvREAL> flag is on,
1699 but is turned off in F<pad.c> right before the padlist is freed (after
1700 F<pad.c> has done its custom freeing of the pads).
1701
1702 =item *
1703
1704 All the C files that make up the Perl core have been converted to UTF-8.
1705
1706 =back
1707
1708 =head1 Selected Bug Fixes
1709
1710 =head2 Regular expressions
1711
1712 =for comment Is it possible to merge some of these items?
1713
1714 =over 4
1715
1716 =item *
1717
1718 C</[[:ascii:]]/> and C</[[:blank:]]/> now use locale rules under
1719 C<use locale> when the platform supports that.  Previously, they used
1720 the platform's native character set.
1721
1722 =item *
1723
1724 C<m/[[:ascii:]]/i> and C</\p{ASCII}/i> now match identically (when not
1725 under a differing locale).  This fixes a regression introduced in 5.14
1726 in which the first expression could match characters outside of ASCII,
1727 such as the KELVIN SIGN.
1728
1729 =item *
1730
1731 C</.*/g> would sometimes refuse to match at the end of a string that ends
1732 with "\n".  This has been fixed [perl #109206].
1733
1734 =item *
1735
1736 Starting with 5.12.0, Perl used to get its internal bookkeeping muddled up
1737 after assigning C<${ qr// }> to a hash element and locking it with
1738 L<Hash::Util>.  This could result in double frees, crashes or erratic
1739 behaviour.
1740
1741 =item *
1742
1743 The new (in 5.14.0) regular expression modifier C</a> when repeated like
1744 C</aa> forbids the characters outside the ASCII range that match
1745 characters inside that range from matching under C</i>.  This did not
1746 work under some circumstances, all involving alternation, such as:
1747
1748  "\N{KELVIN SIGN}" =~ /k|foo/iaa;
1749
1750 succeeded inappropriately.  This is now fixed.
1751
1752 =item *
1753
1754 5.14.0 introduced some memory leaks in regular expression character
1755 classes such as C<[\w\s]>, which have now been fixed. (5.14.1)
1756
1757 =item *
1758
1759 An edge case in regular expression matching could potentially loop.
1760 This happened only under C</i> in bracketed character classes that have
1761 characters with multi-character folds, and the target string to match
1762 against includes the first portion of the fold, followed by another
1763 character that has a multi-character fold that begins with the remaining
1764 portion of the fold, plus some more.
1765
1766  "s\N{U+DF}" =~ /[\x{DF}foo]/i
1767
1768 is one such case.  C<\xDF> folds to C<"ss">. (5.14.1)
1769
1770 =item *
1771
1772 A few characters in regular expression pattern matches did not
1773 match correctly in some circumstances, all involving C</i>.  The
1774 affected characters are:
1775 COMBINING GREEK YPOGEGRAMMENI,
1776 GREEK CAPITAL LETTER IOTA,
1777 GREEK CAPITAL LETTER UPSILON,
1778 GREEK PROSGEGRAMMENI,
1779 GREEK SMALL LETTER IOTA WITH DIALYTIKA AND OXIA,
1780 GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS,
1781 GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND OXIA,
1782 GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS,
1783 LATIN SMALL LETTER LONG S,
1784 LATIN SMALL LIGATURE LONG S T,
1785 and
1786 LATIN SMALL LIGATURE ST.
1787
1788 =item *
1789
1790 A memory leak regression in regular expression compilation
1791 under threading has been fixed.
1792
1793 =item *
1794
1795 A regression introduced in 5.13.6 has
1796 been fixed.  This involved an inverted
1797 bracketed character class in a regular expression that consisted solely
1798 of a Unicode property.  That property wasn't getting inverted outside the
1799 Latin1 range.
1800
1801 =item *
1802
1803 Three problematic Unicode characters now work better in regex pattern matching under C</i>
1804
1805 In the past, three Unicode characters:
1806 LATIN SMALL LETTER SHARP S,
1807 GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS,
1808 and
1809 GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS,
1810 along with the sequences that they fold to
1811 (including "ss" in the case of LATIN SMALL LETTER SHARP S),
1812 did not properly match under C</i>.  5.14.0 fixed some of these cases,
1813 but introduced others, including a panic when one of the characters or
1814 sequences was used in the C<(?(DEFINE)> regular expression predicate.
1815 The known bugs that were introduced in 5.14 have now been fixed; as well
1816 as some other edge cases that have never worked until now.  All these
1817 involve using the characters and sequences outside bracketed character
1818 classes under C</i>.  This closes [perl #98546].
1819
1820 There remain known problems when using certain characters with
1821 multi-character folds inside bracketed character classes, including such
1822 constructs as C<qr/[\N{LATIN SMALL LETTER SHARP}a-z]/i>.  These
1823 remaining bugs are addressed in [perl #89774].
1824
1825 =item *
1826
1827 RT #78266: The regex engine has been leaking memory when accessing
1828 named captures that weren't matched as part of a regex ever since 5.10
1829 when they were introduced, e.g. this would consume over a hundred MB of
1830 memory:
1831
1832     for (1..10_000_000) {
1833         if ("foo" =~ /(foo|(?<capture>bar))?/) {
1834             my $capture = $+{capture}
1835         }
1836     }
1837     system "ps -o rss $$"'
1838
1839 =item *
1840
1841 In 5.14, C</[[:lower:]]/i> and C</[[:upper:]]/i> no longer matched the
1842 opposite case.  This has been fixed [perl #101970].
1843
1844 =item *
1845
1846 A regular expression match with an overloaded object on the right-hand side
1847 would in some cases stringify the object too many times.
1848
1849 =item *
1850
1851 A regression has been fixed that was introduced in 5.14, in C</i>
1852 regular expression matching, in which a match improperly fails if the
1853 pattern is in UTF-8, the target string is not, and a Latin-1 character
1854 precedes a character in the string that should match the pattern.
1855 [perl #101710]
1856
1857 =item *
1858
1859 In case-insensitive regular expression pattern matching, no longer on
1860 UTF-8 encoded strings does the scan for the start of match only look at
1861 the first possible position.  This caused matches such as
1862 C<"f\x{FB00}" =~ /ff/i> to fail.
1863
1864 =item *
1865
1866 The regexp optimiser no longer crashes on debugging builds when merging
1867 fixed-string nodes with inconvenient contents.
1868
1869 =item *
1870
1871 A panic involving the combination of the regular expression modifiers
1872 C</aa> and the C<\b> escape sequence introduced in 5.14.0 has been
1873 fixed [perl #95964].
1874
1875 =item *
1876
1877 The combination of the regular expression modifiers C</aa> and the C<\b>
1878 and C<\B> escape sequences did not work properly on UTF-8 encoded
1879 strings.  All non-ASCII characters under C</aa> should be treated as
1880 non-word characters, but what was happening was that Unicode rules were
1881 used to determine wordness/non-wordness for non-ASCII characters.  This
1882 is now fixed [perl #95968].
1883
1884 =item *
1885
1886 C<< (?foo: ...) >> no longer loses passed in character set.
1887
1888 =item *
1889
1890 The trie optimisation used to have problems with alternations containing
1891 an empty C<(?:)>, causing C<< "x" =~ /\A(?>(?:(?:)A|B|C?x))\z/ >> not to
1892 match, whereas it should [perl #111842].
1893
1894 =item *
1895
1896 Use of lexical (C<my>) variables in code blocks embedded in regular
1897 expressions will no longer result in memory corruption or crashes.
1898
1899 Nevertheless, these code blocks are still experimental, as there are still
1900 problems with the wrong variables being closed over (in loops for instance)
1901 and with abnormal exiting (e.g., C<die>) causing memory corruption.
1902
1903 =item *
1904
1905 The C<\h>, C<\H>, C<\v> and C<\V> regular expression metacharacters used to
1906 cause a panic error message when attempting to match at the end of the
1907 string [perl #96354].
1908
1909 =item *
1910
1911 The abbreviations for four C1 control characters C<MW> C<PM>, C<RI>, and
1912 C<ST> were previously unrecognized by C<\N{}>, vianame(), and
1913 string_vianame().
1914
1915 =item *
1916
1917 Mentioning a variable named "&" other than C<$&> (i.e., C<@&> or C<%&>) no
1918 longer stops C<$&> from working.  The same applies to variables named "'"
1919 and "`" [perl #24237].
1920
1921 =item *
1922
1923 Creating a C<UNIVERSAL::AUTOLOAD> sub no longer stops C<%+>, C<%-> and
1924 C<%!> from working some of the time [perl #105024].
1925
1926 =back
1927
1928 =head2 Formats
1929
1930 =over
1931
1932 =item *
1933
1934 A number of edge cases have been fixed with formats and C<formline>;
1935 in particular, where the format itself is potentially variable (such as
1936 with ties and overloading), and where the format and data differ in their
1937 encoding.  In both these cases, it used to possible for the output to be
1938 corrupted [perl #91032].
1939
1940 =item *
1941
1942 C<formline> no longer converts its argument into a string in-place.  So
1943 passing a reference to C<formline> no longer destroys the reference
1944 [perl #79532].
1945
1946 =item *
1947
1948 Assignment to C<$^A> (the format output accumulator) now recalculates
1949 the number of lines output.
1950
1951 =back
1952
1953 =head2 Copy-on-write scalars
1954
1955 Copy-on-write or shared hash key scalars
1956 were introduced in 5.8.0, but most Perl code
1957 did not encounter them (they were used mostly internally).  Perl
1958 5.10.0 extended them, such that assigning C<__PACKAGE__> or a
1959 hash key to a scalar would make it copy-on-write.  Several parts
1960 of Perl were not updated to account for them, but have now been fixed.
1961
1962 =over
1963
1964 =item *
1965
1966 C<utf8::decode> had a nasty bug that would modify copy-on-write scalars'
1967 string buffers in place (i.e., skipping the copy).  This could result in
1968 hashes having two elements with the same key [perl #91834].
1969
1970 =item *
1971
1972 Lvalue subroutines were not allowing COW scalars to be returned.  This was
1973 fixed for lvalue scalar context in Perl 5.12.3 and 5.14.0, but list context
1974 was not fixed until this release.
1975
1976 =item *
1977
1978 Elements of restricted hashes (see the L<fields> pragma) containing
1979 copy-on-write values couldn't be deleted, nor could such hashes be cleared
1980 (C<%hash = ()>).
1981
1982 =item *
1983
1984 Localising a tied variable used to make it read-only if it contained a
1985 copy-on-write string.
1986
1987 =item *
1988
1989 Assigning a copy-on-write string to a stash
1990 element no longer causes a double free.  Regardless of this change, the
1991 results of such assignments are still undefined.
1992
1993 =item *
1994
1995 Assigning a copy-on-write string to a tied variable no longer stops that
1996 variable from being tied if it happens to be a PVMG or PVLV internally.
1997
1998 =item *
1999
2000 Doing a substitution on a tied variable returning a copy-on-write
2001 scalar used to cause an assertion failure or an "Attempt to free
2002 nonexistent shared string" warning.
2003
2004 =item *
2005
2006 This one is a regression from 5.12: In 5.14.0, the bitwise assignment
2007 operators C<|=>, C<^=> and C<&=> started leaving the left-hand side
2008 undefined if it happened to be a copy-on-write string [perl #108480].
2009
2010 =item *
2011
2012 L<Storable>, L<Devel::Peek> and L<PerlIO::scalar> had similar problems.
2013 See L</Updated Modules and Pragmata>, above.
2014
2015 =back
2016
2017 =head2 Lvalue subroutines
2018
2019 =over
2020
2021 =item *
2022
2023 Explicit return now returns the actual argument passed to return, instead
2024 of copying it [perl #72724, #72706].
2025
2026 =item *
2027
2028 Lvalue subroutines used to enforce lvalue syntax (i.e., whatever can go on
2029 the left-hand side of C<=>) for the last statement and the arguments to
2030 return.  Since lvalue subroutines are not always called in lvalue context,
2031 this restriction has been lifted.
2032
2033 =item *
2034
2035 Lvalue subroutines are less restrictive as to what values can be returned.
2036 It used to croak on values returned by C<shift> and C<delete> and from
2037 other subroutines, but no longer does so [perl #71172].
2038
2039 =item *
2040
2041 Empty lvalue subroutines (C<sub :lvalue {}>) used to return C<@_> in list
2042 context.  In fact, all subroutines used to, but regular subs were fixed in
2043 Perl 5.8.2.  Now lvalue subroutines have been likewise fixed.
2044
2045 =item *
2046
2047 Autovivification now works on values returned from lvalue subroutines
2048 [perl #7946], as does returning C<keys> in lvalue context.
2049
2050 =item *
2051
2052 Lvalue subroutines used to copy their return values in rvalue context.  Not
2053 only was this a waste of CPU cycles, but it also caused bugs.  A C<($)>
2054 prototype would cause an lvalue sub to copy its return value [perl #51408],
2055 and C<while(lvalue_sub() =~ m/.../g) { ... }> would loop endlessly
2056 [perl #78680].
2057
2058 =item *
2059
2060 When called in potential lvalue context
2061 (e.g., subroutine arguments or a list
2062 passed to C<for>), lvalue subroutines used to copy
2063 any read-only value that was returned.  E.g., C< sub :lvalue { $] } >
2064 would not return C<$]>, but a copy of it.
2065
2066 =item *
2067
2068 When called in potential lvalue context, an lvalue subroutine returning
2069 arrays or hashes used to bind the arrays or hashes to scalar variables,
2070 resulting in bugs.  This was fixed in 5.14.0 if an array were the first
2071 thing returned from the subroutine (but not for C<$scalar, @array> or
2072 hashes being returned).  Now a more general fix has been applied
2073 [perl #23790].
2074
2075 =item *
2076
2077 Method calls whose arguments were all surrounded with C<my()> or C<our()>
2078 (as in C<< $object->method(my($a,$b)) >>) used to force lvalue context on
2079 the subroutine.  This would prevent lvalue methods from returning certain
2080 values.
2081
2082 =item *
2083
2084 Lvalue sub calls that are not determined to be such at compile time
2085 (C<&$name> or &{"name"}) are no longer exempt from strict refs if they
2086 occur in the last statement of an lvalue subroutine [perl #102486].
2087
2088 =item *
2089
2090 Sub calls whose subs are not visible at compile time, if
2091 they occurred in the last statement of an lvalue subroutine,
2092 would reject non-lvalue subroutines and die with "Can't modify non-lvalue
2093 subroutine call" [perl #102486].
2094
2095 Non-lvalue sub calls whose subs I<are> visible at compile time exhibited
2096 the opposite bug.  If the call occurred in the last statement of an lvalue
2097 subroutine, there would be no error when the lvalue sub was called in
2098 lvalue context.  Perl would blindly assign to the temporary value returned
2099 by the non-lvalue subroutine.
2100
2101 =item *
2102
2103 C<AUTOLOAD> routines used to take precedence over the actual sub being
2104 called (i.e., when autoloading wasn't needed), for sub calls in lvalue or
2105 potential lvalue context, if the subroutine was not visible at compile
2106 time.
2107
2108 =item *
2109
2110 Applying the C<:lvalue> attribute to an XSUB or to an aliased subroutine
2111 stub with C<< sub foo :lvalue; >> syntax stopped working in Perl 5.12.
2112 This has been fixed.
2113
2114 =item *
2115
2116 Applying the :lvalue attribute to subroutine that is already defined does
2117 not work properly, as the attribute changes the way the sub is compiled.
2118 Hence, Perl 5.12 began warning when an attempt is made to apply the
2119 attribute to an already defined sub.  In such cases, the attribute is
2120 discarded.
2121
2122 But the change in 5.12 missed the case where custom attributes are also
2123 present: that case still silently and ineffectively applied the attribute.
2124 That omission has now been corrected.  C<sub foo :lvalue :Whatever> (when
2125 C<foo> is already defined) now warns about the :lvalue attribute, and does
2126 not apply it.
2127
2128 =item *
2129
2130 A bug affecting lvalue context propagation through nested lvalue subroutine
2131 calls has been fixed.  Previously, returning a value in nested rvalue
2132 context would be treated as lvalue context by the inner subroutine call,
2133 resulting in some values (such as read-only values) being rejected.
2134
2135 =back
2136
2137 =head2 Compile-time hints
2138
2139 =over
2140
2141 =item *
2142
2143 Tying C<%^H> no longer causes perl to crash or ignore the contents of
2144 C<%^H> when entering a compilation scope [perl #106282].
2145
2146 =item *
2147
2148 C<eval $string> and C<require> used not to
2149 localise C<%^H> during compilation if it
2150 was empty at the time the C<eval> call itself was compiled.  This could
2151 lead to scary side effects, like C<use re "/m"> enabling other flags that
2152 the surrounding code was trying to enable for its caller [perl #68750].
2153
2154 =item *
2155
2156 C<eval $string> and C<require> no longer localise hints (C<$^H> and C<%^H>)
2157 at run time, but only during compilation of the $string or required file.
2158 This makes C<BEGIN { $^H{foo}=7 }> equivalent to
2159 C<BEGIN { eval '$^H{foo}=7' }> [perl #70151].
2160
2161 =item *
2162
2163 Creating a BEGIN block from XS code (via C<newXS> or C<newATTRSUB>) would,
2164 on completion, make the hints of the current compiling code the current
2165 hints.  This could cause warnings to occur in a non-warning scope.
2166
2167 =back
2168
2169 =head2 Fixes related to hashes and arrays
2170
2171 =over
2172
2173 =item *
2174
2175 A bug has been fixed that would cause a "Use of freed value in iteration"
2176 error if the next two hash elements that would be iterated over are
2177 deleted [perl #85026]. (5.14.1)
2178
2179 =item *
2180
2181 Deleting the current hash iterator (the hash element that would be returend
2182 by the next call to C<each>) in void context used not to free it
2183 [perl #85026].
2184
2185 =item *
2186
2187 Deletion of methods via C<delete $Class::{method}> syntax used to update
2188 method caches if called in void context, but not scalar or list context.
2189
2190 =item *
2191
2192 When hash elements are deleted in void context, the internal hash entry is
2193 now freed before the value is freed, to prevent destructors called by that
2194 latter freeing from seeing the hash in an inconsistent state.  It was
2195 possible to cause double-frees if the destructor freed the hash itself
2196 [perl #100340].
2197
2198 =item *
2199
2200 A C<keys> optimisation in Perl 5.12.0 to make it faster on empty hashes
2201 caused C<each> not to reset the iterator if called after the last element
2202 was deleted.
2203
2204 =item *
2205
2206 Freeing deeply nested hashes no longer crashes [perl #44225].
2207
2208 =item *
2209
2210 It is possible from XS code to create hashes with elements that have no
2211 values.  The hash element and slice operators used to crash
2212 when handling these in lvalue context.  They now
2213 produce a "Modification of non-creatable hash value attempted" error
2214 message.
2215
2216 =item *
2217
2218 If list assignment to a hash or array triggered destructors that freed the
2219 hash or array itself, a crash would ensue.  This is no longer the case
2220 [perl #107440].
2221
2222 =item *
2223
2224 It used to be possible to free the typeglob of a localised array or hash
2225 (e.g., C<local @{"x"}; delete $::{x}>), resulting in a crash on scope exit.
2226
2227 =item *
2228
2229 Some core bugs affecting L<Hash::Util> have been fixed: locking a hash
2230 element that is a glob copy no longer causes subsequent assignment to it to
2231 corrupt the glob, and unlocking a hash element that holds a copy-on-write
2232 scalar no longer causes modifications to that scalar to modify other
2233 scalars that were sharing the same string buffer.
2234
2235 =back
2236
2237 =head2 Weak references
2238
2239 =over
2240
2241 =item *
2242
2243 Weakening the first argument to an automatically-invoked C<DESTROY> method
2244 could result in erroneous "DESTROY created new reference" errors or
2245 crashes.  Now it is an error to weaken a read-only reference.
2246
2247 =item *
2248
2249 Weak references to lexical hashes going out of scope were not going stale
2250 (becoming undefined), but continued to point to the hash.
2251
2252 =item *
2253
2254 Weak references to lexical variables going out of scope are now broken
2255 before any magical methods (e.g., DESTROY on a tie object) are called.
2256 This prevents such methods from modifying the variable that will be seen
2257 the next time the scope is entered.
2258
2259 =item *
2260
2261 Creating a weak reference to an @ISA array or accessing the array index
2262 (C<$#ISA>) could result in confused internal bookkeeping for elements
2263 subsequently added to the @ISA array.  For instance, creating a weak
2264 reference to the element itself could push that weak reference on to @ISA;
2265 and elements added after use of C<$#ISA> would be ignored by method lookup
2266 [perl #85670].
2267
2268 =back
2269
2270 =head2 Support for embedded nulls
2271
2272 Some parts of Perl did not work correctly with nulls (C<chr 0>) embedded in
2273 strings.  That meant that, for instance, C<< $m = "a\0b"; foo->$m >> would
2274 call the "a" method, instead of the actual method name contained in $m.
2275 These parts of perl have been fixed to support nulls:
2276
2277 =over
2278
2279 =item *
2280
2281 Method names
2282
2283 =item *
2284
2285 Typeglob names (including filehandle and subroutine names)
2286
2287 =item *
2288
2289 Package names, including the return value of C<ref()>
2290
2291 =item *
2292
2293 Typeglob elements (C<*foo{"THING\0stuff"}>)
2294
2295 =item *
2296
2297 Signal names
2298
2299 =item *
2300
2301 Various warnings and error messages that mention variable names or values,
2302 methods, etc.
2303
2304 =back
2305
2306 One side effect of these changes is that blessing into "\0" no longer
2307 causes C<ref()> to return false.
2308
2309 =head2 Filetests and C<stat>
2310
2311 The term "filetests" refers to the operators that consist of a hyphen
2312 followed by a single letter: C<-r>, C<-x>, C<-M>, etc.  The term "stacked"
2313 when applied to filetests means followed by another filetest operator
2314 sharing the same operand, as in C<-r -x -w $fooo>.
2315
2316 =over
2317
2318 =item *
2319
2320 C<stat> produces more consistent warnings.  It no longer warns for "_"
2321 [perl #71002] and no longer skips the warning at times for other unopened
2322 handles.  It no longer warns about an unopened handle when the operating
2323 system's C<fstat> function fails.
2324
2325 =item *
2326
2327 C<stat> would sometimes return negative numbers for large inode numbers,
2328 because it was using the wrong internal C type. [perl #84590]
2329
2330 =item *
2331
2332 C<lstat> is documented to fall back to C<stat> (with a warning) when given
2333 a filehandle.  When passed an IO reference, it was actually doing the
2334 equivalent of S<C<stat _>> and ignoring the handle.
2335
2336 =item *
2337
2338 C<-T _> with no preceding C<stat> used to produce a
2339 confusing "uninitialized" warning, even though there
2340 is no visible uninitialized value to speak of.
2341
2342 =item *
2343
2344 C<-T>, C<-B>, C<-l> and C<-t> now work
2345 when stacked with other filetest operators
2346 [perl #77388].
2347
2348 =item *
2349
2350 In 5.14.0, filetest ops (C<-r>, C<-x>, etc.) started calling FETCH on a
2351 tied argument belonging to the previous argument to a list operator, if
2352 called with a bareword argument or no argument at all.  This has been
2353 fixed, so C<push @foo, $tied, -r> no longer calls FETCH on C<$tied>.
2354
2355 =item *
2356
2357 In Perl 5.6, C<-l> followed by anything other than a bareword would treat
2358 its argument as a file name.  That was changed in 5.8 for glob references
2359 (C<\*foo>), but not for globs themselves (C<*foo>).  C<-l> started
2360 returning C<undef> for glob references without setting the last
2361 stat buffer that the "_" handle uses, but only if warnings
2362 were turned on.  With warnings off, it was the same as 5.6.
2363 In other words, it was simply buggy and inconsistent.  Now the 5.6
2364 behaviour has been restored.
2365
2366 =item *
2367
2368 C<-l> followed by a bareword no longer "eats" the previous argument to
2369 the list operator in whose argument list it resides.  Hence,
2370 C<print "bar", -l foo> now actually prints "bar", because C<-l>
2371 on longer eats it.
2372
2373 =item *
2374
2375 Perl keeps several internal variables to keep track of the last stat
2376 buffer, from which file(handle) it originated, what type it was, and
2377 whether the last stat succeeded.
2378
2379 There were various cases where these could get out of synch, resulting in
2380 inconsistent or erratic behaviour in edge cases (every mention of C<-T>
2381 applies to C<-B> as well):
2382
2383 =over
2384
2385 =item *
2386
2387 C<-T I<HANDLE>>, even though it does a C<stat>, was not resetting the last
2388 stat type, so an C<lstat _> following it would merrily return the wrong
2389 results.  Also, it was not setting the success status.
2390
2391 =item *
2392
2393 Freeing the handle last used by C<stat> or a filetest could result in
2394 S<C<-T _>> using an unrelated handle.
2395
2396 =item *
2397
2398 C<stat> with an IO reference would not reset the stat type or record the
2399 filehandle for S<C<-T _>> to use.
2400
2401 =item *
2402
2403 Fatal warnings could cause the stat buffer not to be reset
2404 for a filetest operator on an unopened filehandle or C<-l> on any handle.
2405 Fatal warnings also stopped C<-T> from setting C<$!>.
2406
2407 =item *
2408
2409 When the last stat was on an unreadable file, C<-T _> is supposed to
2410 return C<undef>, leaving the last stat buffer unchanged.  But it was
2411 setting the stat type, causing C<lstat _> to stop working.
2412
2413 =item *
2414
2415 C<-T I<FILENAME>> was not resetting the internal stat buffers for
2416 unreadable files.
2417
2418 =back
2419
2420 These have all been fixed.
2421
2422 =back
2423
2424 =head2 Version objects and vstrings
2425
2426 =over
2427
2428 =item *
2429
2430 The bitwise complement operator (and possibly other operators, too) when
2431 passed a vstring would leave vstring magic attached to the return value,
2432 even though the string had changed.  This meant that
2433 C<< version->new(~v1.2.3) >> would create a version looking like "v1.2.3"
2434 even though the string passed to C<< version->new >> was actually
2435 "\376\375\374".  This also caused L<B::Deparse> to deparse C<~v1.2.3>
2436 incorrectly, without the C<~> [perl #29070].
2437
2438 =item *
2439
2440 Assigning a vstring to a magic (e.g., tied, C<$!>) variable and then
2441 assigning something else used to blow away all the magic.  This meant that
2442 tied variables would come undone, C<$!> would stop getting updated on
2443 failed system calls, C<$|> would stop setting autoflush, and other
2444 mischief would take place.  This has been fixed.
2445
2446 =item *
2447
2448 C<< version->new("version") >> and C<printf "%vd", "version"> no longer
2449 crash [perl #102586].
2450
2451 =item *
2452
2453 Version comparisons, such as those that happen implicitly with C<use
2454 v5.43>, no longer cause locale settings to change [perl #105784].
2455
2456 =item *
2457
2458 Version objects no longer cause memory leaks in boolean context
2459 [perl #109762].
2460
2461 =back
2462
2463 =head2 Tied variables
2464
2465 =over
2466
2467 =item *
2468
2469 Various cases in which FETCH was being ignored or called too many times
2470 have been fixed:
2471
2472 =over
2473
2474 =item *
2475
2476 C<PerlIO::get_layers> [perl #97956]
2477
2478 =item *
2479
2480 C<$tied =~ y/a/b/>, C<chop $tied> and C<chomp $tied> when $tied holds a
2481 reference.
2482
2483 =item *
2484
2485 When calling C<local $_> [perl #105912]
2486
2487 =item *
2488
2489 Four-argument C<select>
2490
2491 =item *
2492
2493 A tied buffer passed to C<sysread>
2494
2495 =item *
2496
2497 C<< $tied .= <> >>
2498
2499 =item *
2500
2501 Three-argument C<open>, the third being a tied file handle
2502 (as in C<< open $fh, ">&", $tied >>)
2503
2504 =item *
2505
2506 C<sort> with a reference to a tied glob for the comparison routine.
2507
2508 =item *
2509
2510 C<..> and C<...> in list context [perl #53554].
2511
2512 =item *
2513
2514 C<${$tied}>, C<@{$tied}>, C<%{$tied}> and C<*{$tied}> where the tied
2515 variable returns a string (C<&{}> was unaffected)
2516
2517 =item *
2518
2519 C<defined ${ $tied_variable }>
2520
2521 =item *
2522
2523 Various functions that take a filehandle argument in rvalue context
2524 (C<close>, C<readline>, etc.) [perl #97482]
2525
2526 =item *
2527
2528 Some cases of dereferencing a complex expression, such as
2529 C<${ (), $tied } = 1>, used to call C<FETCH> multiple times, but now call
2530 it once.
2531
2532 =item *
2533
2534 C<$tied-E<gt>method> where $tied returns a package name--even resulting in
2535 a failure to call the method, due to memory corruption
2536
2537 =item *
2538
2539 Assignments like C<*$tied = \&{"..."}> and C<*glob = $tied>
2540
2541 =item *
2542
2543 C<chdir>, C<chmod>, C<chown>, C<utime>, C<truncate>, C<stat>, C<lstat> and
2544 the filetest ops (C<-r>, C<-x>, etc.)
2545
2546 =back
2547
2548 =item *
2549
2550 C<caller> sets C<@DB::args> to the subroutine arguments when called from
2551 the DB package.  It used to crash when doing so if C<@DB::args> happened to
2552 be tied.  Now it croaks instead.
2553
2554 =item *
2555
2556 Tying an element of %ENV or C<%^H> and then deleting that element would
2557 result in a call to the tie object's DELETE method, even though tying the
2558 element itself is supposed to be equivalent to tying a scalar (the element
2559 is, of course, a scalar) [perl #67490].
2560
2561 =item *
2562
2563 When Perl autovivifies an element of a tied array or hash (which entails
2564 calling STORE with a new reference), it now calls FETCH immediately after
2565 the STORE, instead of assuming that FETCH would have returned the same
2566 reference.  This can make it easier to implement tied objects [perl #35865, #43011].
2567
2568 =item *
2569
2570 Four-argument C<select> no longer produces its "Non-string passed as
2571 bitmask" warning on tied or tainted variables that are strings.
2572
2573 =item *
2574
2575 Localising a tied scalar that returns a typeglob no longer stops it from
2576 being tied till the end of the scope.
2577
2578 =item *
2579
2580 Attempting to C<goto> out of a tied handle method used to cause memory
2581 corruption or crashes.  Now it produces an error message instead
2582 [perl #8611].
2583
2584 =item *
2585
2586 A bug has been fixed that occurs when a tied variable is used as a
2587 subroutine reference:  if the last thing assigned to or returned from the
2588 variable was a reference or typeglob, the C<\&$tied> could either crash or
2589 return the wrong subroutine.  The reference case is a regression introduced
2590 in Perl 5.10.0.  For typeglobs, it has probably never worked till now.
2591
2592 =back
2593
2594 =head2 "Uninitialized" warnings
2595
2596 =over
2597
2598 =item *
2599
2600 Various functions that take a filehandle argument in rvalue context
2601 (C<close>, C<readline>, etc.) used to warn twice for an undefined handle
2602 [perl #97482].
2603
2604 =item *
2605
2606 C<dbmopen> now only warns once, rather than three times, if the mode
2607 argument is C<undef> [perl #90064].
2608
2609 =item *
2610
2611 The C<+=> operator does not usually warn when the left-hand side is
2612 C<undef>, but it was doing so for tied variables.  This has been fixed
2613 [perl #44895].
2614
2615 =item *
2616
2617 A bug fix in Perl 5.14 introduced a new bug, causing "uninitialized"
2618 warnings to report the wrong variable if the operator in question had
2619 two operands and one was C<%{...}> or C<@{...}>.  This has been fixed
2620 [perl #103766].
2621
2622 =item *
2623
2624 C<..> and C<...> in list context now mention the name of the variable in
2625 "uninitialized" warnings for string (as opposed to numeric) ranges.
2626
2627 =back
2628
2629 =head2 Last-accessed filehandle
2630
2631 Perl has an internal variable that stores the last filehandle to be
2632 accessed.  It is used by C<$.> and by C<tell> and C<eof> without
2633 arguments.
2634
2635 =over
2636
2637 =item *
2638
2639 It used to be possible to set this internal variable to a glob copy and
2640 then modify that glob copy to be something other than a glob, and still
2641 have the last-accessed filehandle associated with the variable after
2642 assigning a glob to it again:
2643
2644     my $foo = *STDOUT;  # $foo is a glob copy
2645     <$foo>;             # $foo is now the last-accessed handle
2646     $foo = 3;           # no longer a glob
2647     $foo = *STDERR;     # still the last-accessed handle
2648
2649 Now the C<$foo = 3> assignment unsets that internal variable, so there
2650 is no last-accessed filehandle, just as if C<< <$foo> >> had never
2651 happened.
2652
2653 This also prevents some unrelated handle from becoming the last-accessed
2654 handle if $foo falls out of scope and the same internal SV gets used for
2655 another handle [perl #97988].
2656
2657 =item *
2658
2659 A regression in 5.14 caused these statements not to set that internal
2660 variable:
2661
2662     my $fh = *STDOUT;
2663     tell $fh;
2664     eof  $fh;
2665     seek $fh, 0,0;
2666     tell     *$fh;
2667     eof      *$fh;
2668     seek     *$fh, 0,0;
2669     readline *$fh;
2670
2671 This is now fixed, but C<tell *{ *$fh }> still has the problem, and it
2672 is not clear how to fix it [perl #106536].
2673
2674 =back
2675
2676 =head2 Redefinition warnings
2677
2678 =over
2679
2680 =item *
2681
2682 Subroutines from the C<autouse> namespace are once more exempt from
2683 redefinition warnings.  This used to work in 5.005, but was broken in
2684 5.6 for most subroutines.  For subs created via XS that redefine
2685 subroutines from the C<autouse> package, this stopped working in 5.10.
2686
2687 =item *
2688
2689 New XSUBs now produce redefinition warnings if they overwrite existing
2690 subs, as they did in 5.8.x.  (The C<autouse> logic was reversed in
2691 5.10-14.  Only subroutines from the C<autouse> namespace would warn
2692 when clobbered.)
2693
2694 =item *
2695
2696 C<newCONSTSUB> used to use compile-time warning hints, instead of
2697 run-time hints.  The following code should never produce a redefinition
2698 warning, but it used to, if C<newCONSTSUB> redefined an existing
2699 subroutine:
2700
2701     use warnings;
2702     BEGIN {
2703         no warnings;
2704         some_XS_function_that_calls_new_CONSTSUB();
2705     }
2706
2707 =item *
2708
2709 Redefinition warnings for constant subroutines are on by default (what
2710 are known as severe warnings in L<perldiag>).  This was only the case
2711 when it was a glob assignment or declaration of a Perl subroutine that
2712 caused the warning.  If the creation of XSUBs triggered the warning, it
2713 was not a default warning.  This has been corrected.
2714
2715 =item *
2716
2717 The internal check to see whether a redefinition warning should occur
2718 used to emit "uninitialized" warnings in cases like this:
2719
2720     use warnings "uninitialized";
2721     use constant {u => undef, v => undef};
2722     sub foo(){u}
2723     sub foo(){v}
2724
2725 =back
2726
2727 =head2 Overloading
2728
2729 =over
2730
2731 =item *
2732
2733 Arithmetic assignment (C<$left += $right>) involving overloaded objects
2734 that rely on the 'nomethod' override no longer segfault when the left
2735 operand is not overloaded.
2736
2737 =item *
2738
2739 Errors that occur when methods cannot be found during overloading now
2740 mention the correct package name, as they did in 5.8.x, instead of
2741 erroneously mentioning the "overload" package, as they have since 5.10.0.
2742
2743 =item *
2744
2745 Undefining C<%overload::> no longer causes a crash.
2746
2747 =back
2748
2749 =head2 Fixes to the C<sort> operator
2750
2751 =over
2752
2753 =item *
2754
2755 C<sort> was not treating C<sub {}> and C<sub {()}> as equivalent when
2756 such a sub was provided as the comparison routine.  It used to croak on
2757 C<sub {()}>.
2758
2759 =item *
2760
2761 C<sort> now works once more with custom sort routines that are XSUBs.  It
2762 stopped working in 5.10.0.
2763
2764 =item *
2765
2766 C<sort> with a constant for a custom sort routine, although it produces
2767 unsorted results, no longer crashes.  It started crashing in 5.10.0.
2768
2769 =item *
2770
2771 Warnings emitted by C<sort> when a custom comparison routine returns a
2772 non-numeric value now contain "in sort" and show the line number of the
2773 C<sort> operator, rather than the last line of the comparison routine.  The
2774 warnings also occur now only if warnings are enabled in the scope where
2775 C<sort> occurs.  Previously the warnings would occur if enabled in the
2776 comparison routine's scope.
2777
2778 =item *
2779
2780 C<< sort { $a <=> $b } >>, which is optimised internally, now produces
2781 "uninitialized" warnings for NaNs (not-a-number values), since C<< <=> >>
2782 returns C<undef> for those.  This brings it in line with
2783 S<C<< sort { 1; $a <=> $b } >>> and other more complex cases, which are not
2784 optimised [perl #94390].
2785
2786 =back
2787
2788 =head2 Fixes affecting the debugger
2789
2790 =over
2791
2792 =item *
2793
2794 F<dumpvar.pl>, and consequently the C<x> command in the debugger, have been
2795 fixed to handle objects blessed into classes whose names contain "=".  The
2796 contents of such objects used not to be dumped [perl #101814].
2797
2798 =item *
2799
2800 The "R" command for restarting a debugger session has been fixed to work on
2801 Windows, or any other system lacking a C<POSIX::_SC_OPEN_MAX> constant
2802 [perl #87740].
2803
2804 =item *
2805
2806 The C<#line 42 foo> directive used not to update the arrays of lines used
2807 by the debugger if it occurred in a string eval.  This was partially fixed
2808 in 5.14, but it only worked for a single C<#line 42 foo> in each eval.  Now
2809 it works for multiple.
2810
2811 =item *
2812
2813 When subroutine calls are intercepted by the debugger, the name of the
2814 subroutine or a reference to it is stored in C<$DB::sub>, for the debugger
2815 to access.  In some cases (such as C<$foo = *bar; undef *bar; &$foo>)
2816 C<$DB::sub> would be set to a name that could not be used to find the
2817 subroutine, and so the debugger's attempt to call it would fail.  Now the
2818 check to see whether a reference is needed is more robust, so those
2819 problems should not happen anymore [rt.cpan.org #69862].
2820
2821 =item *
2822
2823 Every subroutine has a filename associated with it that the debugger uses.
2824 The one associated with constant subroutines used to be misallocated when
2825 cloned under threads.  Consequently, debugging threaded applications could
2826 result in memory corruption [perl #96126].
2827
2828 =back
2829
2830 =head2 Fixes to the C<glob> operator
2831
2832 =over
2833
2834 =item *
2835
2836 On OSes other than VMS, Perl's C<glob> operator (and the C<< <...> >> form)
2837 use L<File::Glob> underneath.  L<File::Glob> splits the pattern into words,
2838 before feeding each word to its C<bsd_glob> function.
2839
2840 There were several inconsistencies in the way the split was done.  Now
2841 quotation marks (' and ") are always treated as shell-style word delimiters
2842 (that allow whitespace as part of a word) and backslashes are always
2843 preserved, unless they exist to escape quotation marks.  Before, those
2844 would only sometimes be the case, depending on whether the pattern
2845 contained whitespace.  Also, escaped whitespace at the end of the pattern
2846 is no longer stripped [perl #40470].
2847
2848 =item *
2849
2850 C<CORE::glob> now works as a way to call the default globbing function.  It
2851 used to respect overrides, despite the C<CORE::> prefix.
2852
2853 =item *
2854
2855 Under miniperl (used to configure modules when perl itself is built),
2856 C<glob> now clears %ENV before calling csh, since the latter croaks on some
2857 systems if it does not like the contents of the LS_COLORS enviroment
2858 variable [perl #98662].
2859
2860 =back
2861
2862 =head2 Prototypes of built-in keywords
2863
2864 =over
2865
2866 =item *
2867
2868 The C<prototype> function no longer dies for the C<__FILE__>, C<__LINE__>
2869 and C<__PACKAGE__> directives.  It now returns an empty-string prototype
2870 for them, because they are syntactically indistinguishable from nullary
2871 functions like C<time>.
2872
2873 =item *
2874
2875 C<prototype> now returns C<undef> for all overridable infix operators,
2876 such as C<eq>, which are not callable in any way resembling functions.
2877 It used to return incorrect prototypes for some and die for others
2878 [perl #94984].
2879
2880 =item *
2881
2882 The prototypes of several built-in functions--C<getprotobynumber>, C<lock>,
2883 C<not> and C<select>--have been corrected, or at least are now closer to
2884 reality than before.
2885
2886 =back
2887
2888 =head2 Bugs involving the dereferencing operators
2889
2890 =over
2891
2892 =item *
2893
2894 C<defined(${"..."})>, C<defined(*{"..."})>, etc., used to
2895 return true for most, but not all built-in variables, if
2896 they had not been used yet.  This bug affected C<${^GLOBAL_PHASE}> and
2897 C<${^UTF8CACHE}>, among others.  It also used to return false if the
2898 package name was given as well (C<${"::!"}>) [perl #97978, #97492].
2899
2900 =item *
2901
2902 Perl 5.10.0 introduced a similar bug: C<defined(*{"foo"})> where "foo"
2903 represents the name of a built-in global variable used to return false if
2904 the variable had never been used before, but only on the I<first> call.
2905 This, too, has been fixed.
2906
2907 =item *
2908
2909 Since 5.6.0, C<*{ ... }> has been inconsistent in how it treats undefined
2910 values.  It would die in strict mode or lvalue context for most undefined
2911 values, but would be treated as the empty string (with a warning) for the
2912 specific scalar return by C<undef()> (C<&PL_sv_undef> internally).  This
2913 has been corrected.  C<undef()> is now treated like other undefined
2914 scalars, as in Perl 5.005.
2915
2916 =back
2917
2918 =head2 Threading bugs
2919
2920 =over
2921
2922 =item *
2923
2924 Typeglobs returned from threads are no longer cloned if the parent thread
2925 already has a glob with the same name.  This means that returned
2926 subroutines will now assign to the right package variables [perl #107366].
2927
2928 =item *
2929
2930 Some cases of threads crashing due to memory allocation during cloning have
2931 been fixed [perl #90006].
2932
2933 =item *
2934
2935 Thread joining would sometimes emit "Attempt to free unreferenced scalar"
2936 warnings if C<caller> had been used from the C<DB> package prior to thread
2937 creation [perl #98092].
2938
2939 =item *
2940
2941 Locking a subroutine (via C<lock &sub>) is no longer a compile-time error
2942 for regular subs.  For lvalue subroutines, it no longer tries to return the
2943 sub as a scalar, resulting in strange side effects like C<ref \$_>
2944 returning "CODE" in some instances.
2945
2946 C<lock &sub> is now a run-time error if L<threads::shared> is loaded (a
2947 no-op otherwise), but that may be rectified in a future version.
2948
2949 =back
2950
2951 =head2 Fixes to C<given> and C<when>
2952
2953 =over
2954
2955 =item *
2956
2957 C<given> was not scoping its implicit $_ properly, resulting in memory
2958 leaks or "Variable is not available" warnings [perl #94682].
2959
2960 =item *
2961
2962 C<given> was not calling set-magic on the implicit lexical C<$_> that it
2963 uses.  This meant, for example, that C<pos> would be remembered from one
2964 execution of the same C<given> block to the next, even if the input were a
2965 different variable [perl #84526].
2966
2967 =item *
2968
2969 C<when> blocks are now capable of returning variables declared inside the
2970 enclosing C<given> block [perl #93548].
2971
2972 =back
2973
2974 =head2 Fixes to the C<substr> operator
2975
2976 =over
2977
2978 =item *
2979
2980 Tied (and otherwise magical) variables are no longer exempt from the
2981 "Attempt to use reference as lvalue in substr" warning.
2982
2983 =item *
2984
2985 That warning now occurs when the returned lvalue is assigned to, not
2986 when C<substr> itself is called.  This only makes a difference if the
2987 return value of C<substr> is referenced and assigned to later.
2988
2989 =item *
2990
2991 Passing a substring of a read-only value or a typeglob to a function
2992 (potential lvalue context) no longer causes an immediate "Can't coerce"
2993 or "Modification of a read-only value" error.  That error only occurs
2994 if and when the value passed is assigned to.
2995
2996 The same thing happens with the "substr outside of string" error.  If
2997 the lvalue is only read, not written to, it is now just a warning, as
2998 with rvalue C<substr>.
2999
3000 =item *
3001
3002 C<substr> assignments no longer call FETCH twice if the first argument
3003 is a tied variable, just once.
3004
3005 =back
3006
3007 =head2 Fixes affecting the C API
3008
3009 =over
3010
3011 =item *
3012
3013 The C<newHVhv> XS function now works on tied hashes, instead of crashing or
3014 returning an empty hash.
3015
3016 =item *
3017
3018 The C<SvIsCOW> C macro now returns false for read-only copies of typeglobs,
3019 such as those created by:
3020
3021   $hash{elem} = *foo;
3022   Hash::Util::lock_value %hash, 'elem';
3023
3024 It used to return true.
3025
3026 =item *
3027
3028 The C<SvPVutf8> C function no longer tries to modify its argument,
3029 resulting in errors [perl #108994].
3030
3031 =item *
3032
3033 C<SvPVutf8> now works properly with magical variables.
3034
3035 =item *
3036
3037 C<SvPVbyte> now works properly non-PVs.
3038
3039 =item *
3040
3041 When presented with malformed UTF-8 input, the XS-callable functions
3042 C<is_utf8_string()>, C<is_utf8_string_loc()>, and
3043 C<is_utf8_string_loclen()> could read beyond the end of the input
3044 string by up to 12 bytes.  This no longer happens.  [perl #32080].
3045 However, currently, C<is_utf8_char()> still has this defect, see
3046 L</is_utf8_char()> above.
3047
3048 =item *
3049
3050 The C-level C<pregcomp> function could become confused as to whether the
3051 pattern was in UTF8 if the pattern was an overloaded, tied, or otherwise
3052 magical scalar [perl #101940].
3053
3054 =back
3055
3056 =head2 Other notable fixes
3057
3058 =over
3059
3060 =item *
3061
3062 C<~~> now correctly handles the precedence of Any~~Object, and is not tricked
3063 by an overloaded object on the left-hand side.
3064
3065 =item *
3066
3067 C<quotemeta> now quotes consistently the same non-ASCII characters under
3068 C<use feature 'unicode_strings'>, regardless of whether the string is
3069 encoded in UTF-8 or not, hence fixing the last vestiges (we hope) of the
3070 infamous L<perlunicode/The "Unicode Bug">.  [perl #77654].
3071
3072 Which of these code points is quoted has changed, based on Unicode's
3073 recommendations.  See L<perlfunc/quotemeta> for details.
3074
3075 =item *
3076
3077 When one writes C<open foo || die>, which used to work in Perl 4, a
3078 "Precedence problem" warning is produced.  This warning used erroneously to
3079 apply to fully-qualified bareword handle names not followed by C<||>.  This
3080 has been corrected.
3081
3082 =item *
3083
3084 After package aliasing (C<*foo:: = *bar::>), C<select> with 0 or 1 argument
3085 would sometimes return a name that could not be used to refer to the
3086 filehandle, or sometimes it would return C<undef> even when a filehandle
3087 was selected.  Now it returns a typeglob reference in such cases.
3088
3089 =item *
3090
3091 C<PerlIO::get_layers> no longer ignores some arguments that it thinks are
3092 numeric, while treating others as filehandle names.  It is now consistent
3093 for flat scalars (i.e., not references).
3094
3095 =item *
3096
3097 Unrecognised switches on C<#!> line
3098
3099 If a switch, such as B<-x>, that cannot occur on the C<#!> line is used
3100 there, perl dies with "Can't emulate...".
3101
3102 It used to produce the same message for switches that perl did not
3103 recognise at all, whether on the command line or the C<#!> line.
3104
3105 Now it produces the "Unrecognized switch" error message [perl #104288].
3106
3107 =item *
3108
3109 C<system> now temporarily blocks the SIGCHLD signal handler, to prevent the
3110 signal handler from stealing the exit status [perl #105700].
3111
3112 =item *
3113
3114 The %n formatting code for C<printf> and C<sprintf>, which causes the number
3115 of characters to be assigned to the next argument, now actually
3116 assigns the number of characters, instead of the number of bytes.
3117
3118 It also works now with special lvalue functions like C<substr> and with
3119 nonexistent hash and array elements [perl #3471, #103492].
3120
3121 =item *
3122
3123 Perl skips copying values returned from a subroutine, for the sake of
3124 speed, if doing so would make no observable difference.  Due to faulty
3125 logic, this would happen with the
3126 result of C<delete>, C<shift> or C<splice>, even if the result was
3127 referenced elsewhere.  It also did so with tied variables about to be freed
3128 [perl #91844, #95548].
3129
3130 =item *
3131
3132 C<utf8::decode> now refuses to modify read-only scalars [perl #91850].
3133
3134 =item *
3135
3136 Freeing $_ inside a C<grep> or C<map> block, a code block embedded in a
3137 regular expression, or an @INC filter (a subroutine returned by a
3138 subroutine in @INC) used to result in double frees or crashes
3139 [perl #91880, #92254, #92256].
3140
3141 =item *
3142
3143 C<eval> returns C<undef> in scalar context or an empty list in list
3144 context when there is a run-time error.  When C<eval> was passed a
3145 string in list context and a syntax error occurred, it used to return a
3146 list containing a single undefined element.  Now it returns an empty
3147 list in list context for all errors [perl #80630].
3148
3149 =item *
3150
3151 C<goto &func> no longer crashes, but produces an error message, when
3152 the unwinding of the current subroutine's scope fires a destructor that
3153 undefines the subroutine being "goneto" [perl #99850].
3154
3155 =item *
3156
3157 Perl now holds an extra reference count on the package that code is
3158 currently compiling in.  This means that the following code no longer
3159 crashes [perl #101486]:
3160
3161     package Foo;
3162     BEGIN {*Foo:: = *Bar::}
3163     sub foo;
3164
3165 =item *
3166
3167 The C<x> repetition operator no longer crashes on 64-bit builds with large
3168 repeat counts [perl #94560].
3169
3170 =item *
3171
3172 Calling C<require> on an implicit C<$_> when C<*CORE::GLOBAL::require> has
3173 been overridden does not segfault anymore, and C<$_> is now passed to the
3174 overriding subroutine [perl #78260].
3175
3176 =item *
3177
3178 In Perl 5.14.0, C<$tainted ~~ @array> stopped working properly.  Sometimes
3179 it would erroneously fail (when C<$tainted> contained a string that occurs
3180 in the array I<after> the first element) or erroneously succeed (when
3181 C<undef> occurred after the first element) [perl #93590].
3182
3183 =item *
3184
3185 C<use> and C<require> are no longer affected by the I/O layers active in
3186 the caller's scope (enabled by L<open.pm|open>) [perl #96008].
3187
3188 =item *
3189
3190 C<our $::é; $é> (which is invalid) no longer produces the "Compilation
3191 error at lib/utf8_heavy.pl..." error message, which it started emitting in
3192 5.10.0 [perl #99984].
3193
3194 =item *
3195
3196 On 64-bit systems, C<read()> now understands large string offsets beyond
3197 the 32-bit range.
3198
3199 =item *
3200
3201 Errors that occur when processing subroutine attributes no longer cause the
3202 subroutine's op tree to leak.
3203
3204 =item *
3205
3206 Passing the same constant subroutine to both C<index> and C<formline> no
3207 longer causes one or the other to fail [perl #89218]. (5.14.1)
3208
3209 =item *
3210
3211 List assignment to lexical variables declared with attributes in the same
3212 statement (C<my ($x,@y) : blimp = (72,94)>) stopped working in Perl 5.8.0.
3213 It has now been fixed.
3214
3215 =item *
3216
3217 Perl 5.10.0 introduced some faulty logic that made "U*" in the middle of
3218 a pack template equivalent to "U0" if the input string was empty.  This has
3219 been fixed [perl #90160].
3220
3221 =item *
3222
3223 Destructors on objects were not called during global destruction on objects
3224 that were not referenced by any scalars.  This could happen if an array
3225 element were blessed (e.g., C<bless \$a[0]>) or if a closure referenced a
3226 blessed variable (C<bless \my @a; sub foo { @a }>).
3227
3228 Now there is an extra pass during global destruction to fire destructors on
3229 any objects that might be left after the usual passes that check for
3230 objects referenced by scalars [perl #36347].
3231
3232 This bug fix was added in Perl 5.13.9, but caused problems with some CPAN
3233 modules that were relying on the bug.  Since it was so close to Perl
3234 5.14.0, the fix was reverted in 5.13.10, to allow more time for the modules
3235 to adapt.  Hopefully they will be fixed soon (see L</Known Problems>,
3236 below).
3237
3238 =item *
3239
3240 Fixed a case where it was possible that a freed buffer may have been read
3241 from when parsing a here document [perl #90128]. (5.14.1)
3242
3243 =item *
3244
3245 C<each(I<ARRAY>)> is now wrapped in C<defined(...)>, like C<each(I<HASH>)>,
3246 inside a C<while> condition [perl #90888].
3247
3248 =item *
3249
3250 A problem with context propagation when a C<do> block is an argument to
3251 C<return> has been fixed.  It used to cause C<undef> to be returned in
3252 some cases of a C<return> inside an C<if> block which itself is followed by
3253 another C<return>.
3254
3255 =item *
3256
3257 Calling C<index> with a tainted constant no longer causes constants in
3258 subsequently compiled code to become tainted [perl #64804].
3259
3260 =item *
3261
3262 Infinite loops like C<1 while 1> used to stop C<strict 'subs'> mode from
3263 working for the rest of the block.t
3264
3265 =item *
3266
3267 For list assignments like C<($a,$b) = ($b,$a)>, Perl has to make a copy of
3268 the items on the right-hand side before assignment them to the left.  For
3269 efficiency's sake, it assigns the values on the right straight to the items
3270 on the left no variable is mentioned on both sides, as in
3271 C<($a,$b) = ($c,$d)>.  The logic for determining when it can cheat was
3272 faulty, in that C<&&> and C<||> on the right-hand side could fool it.  So
3273 C<($a,$b) = $some_true_value && ($b,$a)> would end up assigning the value
3274 of C<$b> to both scalars.
3275
3276 =item *
3277
3278 Perl no longer tries to apply lvalue context to the string in
3279 C<("string", $variable) ||= 1> (which used to be an error).  Since the
3280 left-hand side of C<||=> is evaluated in scalar context, that's a scalar
3281 comma operator, which gives all but the last item void context.  There is
3282 no such thing as void lvalue context, so it was a mistake for Perl to try
3283 to force it [perl #96942].
3284
3285 =item *
3286
3287 C<caller> no longer leaks memory when called from the DB package if
3288 C<@DB::args> was assigned to after the first call to C<caller>.  L<Carp>
3289 was triggering this bug [perl #97010].
3290
3291 =item *
3292
3293 C<close> and similar filehandle functions, when called on built-in global
3294 variables (like C<$+>), used to die if the variable happened to hold the
3295 undefined value, instead of producing the usual "Use of uninitialized
3296 value" warning.
3297
3298 =item *
3299
3300 When autovivified file handles were introduced in Perl 5.6.0, C<readline>
3301 was inadvertently made to autovivify when called as C<readline($foo)> (but
3302 not as C<E<lt>$fooE<gt>>).  It has now been fixed never to autovivify.
3303
3304 =item *
3305
3306 Calling an undefined anonymous subroutine (e.g., what $x holds after
3307 C<undef &{$x = sub{}}>) used to cause a "Not a CODE reference" error, which
3308 has been corrected to "Undefined subroutine called" [perl #71154].
3309
3310 =item *
3311
3312 Causing C<@DB::args> to be freed between uses of C<caller> no longer
3313 results in a crash [perl #93320].
3314
3315 =item *
3316
3317 C<setpgrp($foo)> used to be equivalent to C<($foo, setpgrp)>, because
3318 C<setpgrp> was ignoring its argument if there was just one.  Now it is
3319 equivalent to C<setpgrp($foo,0)>.
3320
3321 =item *
3322
3323 C<shmread> was not setting the scalar flags correctly when reading from
3324 shared memory, causing the existing cached numeric representation in the
3325 scalar to persist [perl #98480].
3326
3327 =item *
3328
3329 C<++> and C<--> now work on copies of globs, instead of dying.
3330
3331 =item *
3332
3333 C<splice()> doesn't warn when truncating
3334
3335 You can now limit the size of an array using C<splice(@a,MAX_LEN)> without
3336 worrying about warnings.
3337
3338 =item *
3339
3340 C<< $$ >> is no longer tainted.  Since this value comes directly from
3341 C<< getpid() >>, it is always safe.
3342
3343 =item *
3344
3345 The parser no longer leaks a filehandle if STDIN was closed before parsing
3346 started [perl #37033].
3347
3348 =item *
3349
3350 C<< die; >> with a non-reference, non-string, or magical (e.g., tainted)
3351 value in $@ now properly propagates that value [perl #111654].
3352
3353 =back
3354
3355 =head1 Known Problems
3356
3357 =over 4
3358
3359 =item *
3360
3361 On Solaris, we have two kinds of failure.
3362
3363 If F<make> is Sun's F<make≥>, we get an error about a badly formed macro
3364 assignment in the F<Makefile>.  That happens when F<./Configure> tries to
3365 make depends.  F<Configure> then exits  0, but further F<make>-ing fails.
3366
3367 If F<make> is F<gmake>, F<Configure> completes, then we get errors related
3368 to F</usr/include/stdbool.h>
3369
3370 =item *
3371
3372 The following CPAN modules have test failures with perl 5.16.  Patches have
3373 been submitted for all of these, so hopefully there will be new releases
3374 soon:
3375
3376 =over
3377
3378 =item *
3379
3380 L<Date::Pcalc> version 6.1
3381
3382 =item *
3383
3384 L<Encode::JP::Mobile> version 0.27
3385
3386 =item *
3387
3388 L<Module::CPANTS::Analyse> version 0.85
3389
3390 This fails due to problems in L<Module::Find> 0.10 and L<File::MMagic>
3391 1.27.
3392
3393 =item *
3394
3395 L<PerlIO::Util> version 0.72
3396
3397 =back
3398
3399 =back
3400
3401 =head1 Acknowledgements
3402
3403 XXX Generate this with:
3404
3405   perl Porting/acknowledgements.pl v5.14.0..HEAD
3406
3407 =head1 Reporting Bugs
3408
3409 If you find what you think is a bug, you might check the articles
3410 recently posted to the comp.lang.perl.misc newsgroup and the perl
3411 bug database at L<http://rt.perl.org/perlbug/>.  There may also be
3412 information at L<http://www.perl.org/>, the Perl Home Page.
3413
3414 If you believe you have an unreported bug, please run the L<perlbug>
3415 program included with your release.  Be sure to trim your bug down
3416 to a tiny but sufficient test case.  Your bug report, along with the
3417 output of C<perl -V>, will be sent off to perlbug@perl.org to be
3418 analysed by the Perl porting team.
3419
3420 If the bug you are reporting has security implications, which make it
3421 inappropriate to send to a publicly archived mailing list, then please
3422 send it to perl5-security-report@perl.org.  This points to a closed
3423 subscription unarchived mailing list, which includes all the core
3424 committers, who will be able to help assess the impact of issues, figure
3425 out a resolution, and help co-ordinate the release of patches to
3426 mitigate or fix the problem across all platforms on which Perl is
3427 supported.  Please only use this address for security issues in the Perl
3428 core, not for modules independently distributed on CPAN.
3429
3430 =head1 SEE ALSO
3431
3432 The F<Changes> file for an explanation of how to view exhaustive details
3433 on what changed.
3434
3435 The F<INSTALL> file for how to build Perl.
3436
3437 The F<README> file for general stuff.
3438
3439 The F<Artistic> and F<Copying> files for copyright information.
3440
3441 =cut