dc36f323d1609d14c167830f0724001aede5539e
[perl.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</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 HP-UX
1611
1612 =over 4
1613
1614 =item *
1615
1616 HP-UX PA-RISC/64 now supports gcc-4.x
1617
1618 A fix to correct the socketsize now makes the test suite pass on HP-UX
1619 PA-RISC for 64bitall builds.
1620
1621 =back
1622
1623 =head3 VMS
1624
1625 =over 4
1626
1627 =item *
1628
1629 Remove unnecessary includes, fix miscellaneous compiler warnings and
1630 close some unclosed comments on F<vms/vms.c>.
1631
1632 Remove sockadapt layer from the VMS build.
1633
1634 =item *
1635
1636 Explicit support for VMS versions prior to v7.0 and DEC C versions
1637 prior to v6.0 has been removed.
1638
1639 =item *
1640
1641 Since Perl 5.10.1, the home-grown C<stat> wrapper has been unable to
1642 distinguish between a directory name containing an underscore and an
1643 otherwise-identical filename containing a dot in the same position
1644 (e.g., t/test_pl as a directory and t/test.pl as a file).  This problem
1645 has been corrected.
1646
1647 =item *
1648
1649 The build on VMS now allows names of the resulting symbols in C code for
1650 Perl longer than 31 characters.  Symbols like
1651 C<Perl__it_was_the_best_of_times_it_was_the_worst_of_times> can now be
1652 created freely without causing the VMS linker to seize up.
1653
1654 =back
1655
1656 =head3 GNU/Hurd
1657
1658 Numerous build and test failures on GNU/Hurd have been resolved with hints
1659 for building DBM modules, detection of the library search path, and enabling
1660 of large file support.
1661
1662 =head3 OpenVOS
1663
1664 Perl is now built with dynamic linking on OpenVOS, the minimum supported
1665 version of which is now Release 17.1.0.
1666
1667 =head3 SunOS
1668
1669 The CC workshop C++ compiler is now detected and used on systems that ship
1670 without cc.
1671
1672 =head1 Internal Changes
1673
1674 =over 4
1675
1676 =item *
1677
1678 There are now feature bundle hints in C<PL_hints> (C<$^H>) that version
1679 declarations use, to avoid having to load F<feature.pm>.  One setting of
1680 the hint bits indicates a "custom" feature bundle, which means that the
1681 entries in C<%^H> still apply.  F<feature.pm> uses that.
1682
1683 The C<HINT_FEATURE_MASK> macro is defined in F<perl.h> along with other
1684 hints.  Other macros for setting and testing features and bundles are in
1685 the new F<feature.h>.  C<FEATURE_IS_ENABLED> (which has moved to
1686 F<feature.h>) is no longer used throughout the codebase, but more specific
1687 macros, e.g., C<FEATURE_SAY_IS_ENABLED>, that are defined in F<feature.h>.
1688
1689 =item *
1690
1691 F<lib/feature.pm> is now a generated file, created by the new
1692 F<regen/feature.pl> script, which also generates F<feature.h>.
1693
1694 =item *
1695
1696 Tied arrays are now always C<AvREAL>.  If C<@_> or C<DB::args> is tied, it
1697 is reified first, to make sure this is always the case.
1698
1699 =item *
1700
1701 The C<is_gv_magical_sv> function has been eliminated and merged with
1702 C<gv_fetchpvn_flags>.  It used to be called to determine whether a GV
1703 should be autovivified in rvalue context.  Now it has been replaced with a
1704 new C<GV_ADDMG> flag (not part of the API).
1705
1706 =item *
1707
1708 Padlists are now marked C<AvREAL>; i.e., reference-counted.  They have
1709 always been reference-counted, but were not marked real, because F<pad.c>
1710 did its own clean-up, instead of using the usual clean-up code in F<sv.c>.
1711 That caused problems in thread cloning, so now the C<AvREAL> flag is on,
1712 but is turned off in F<pad.c> right before the padlist is freed (after
1713 F<pad.c> has done its custom freeing of the pads).
1714
1715 =item *
1716
1717 All the C files that make up the Perl core have been converted to UTF-8.
1718
1719 =back
1720
1721 =head1 Selected Bug Fixes
1722
1723 =head2 Array and hash
1724
1725 =over
1726
1727 =item *
1728
1729 A bug has been fixed that would cause a "Use of freed value in iteration"
1730 error if the next two hash elements that would be iterated over are
1731 deleted [perl #85026]. (5.14.1)
1732
1733 =item *
1734
1735 Deleting the current hash iterator (the hash element that would be returend
1736 by the next call to C<each>) in void context used not to free it
1737 [perl #85026].
1738
1739 =item *
1740
1741 Deletion of methods via C<delete $Class::{method}> syntax used to update
1742 method caches if called in void context, but not scalar or list context.
1743
1744 =item *
1745
1746 When hash elements are deleted in void context, the internal hash entry is
1747 now freed before the value is freed, to prevent destructors called by that
1748 latter freeing from seeing the hash in an inconsistent state.  It was
1749 possible to cause double-frees if the destructor freed the hash itself
1750 [perl #100340].
1751
1752 =item *
1753
1754 A C<keys> optimisation in Perl 5.12.0 to make it faster on empty hashes
1755 caused C<each> not to reset the iterator if called after the last element
1756 was deleted.
1757
1758 =item *
1759
1760 Freeing deeply nested hashes no longer crashes [perl #44225].
1761
1762 =item *
1763
1764 It is possible from XS code to create hashes with elements that have no
1765 values.  The hash element and slice operators used to crash
1766 when handling these in lvalue context.  They now
1767 produce a "Modification of non-creatable hash value attempted" error
1768 message.
1769
1770 =item *
1771
1772 If list assignment to a hash or array triggered destructors that freed the
1773 hash or array itself, a crash would ensue.  This is no longer the case
1774 [perl #107440].
1775
1776 =item *
1777
1778 It used to be possible to free the typeglob of a localised array or hash
1779 (e.g., C<local @{"x"}; delete $::{x}>), resulting in a crash on scope exit.
1780
1781 =item *
1782
1783 Some core bugs affecting L<Hash::Util> have been fixed: locking a hash
1784 element that is a glob copy no longer causes subsequent assignment to it to
1785 corrupt the glob, and unlocking a hash element that holds a copy-on-write
1786 scalar no longer causes modifications to that scalar to modify other
1787 scalars that were sharing the same string buffer.
1788
1789 =back
1790
1791 =head2 C API fixes
1792
1793 =over
1794
1795 =item *
1796
1797 The C<newHVhv> XS function now works on tied hashes, instead of crashing or
1798 returning an empty hash.
1799
1800 =item *
1801
1802 The C<SvIsCOW> C macro now returns false for read-only copies of typeglobs,
1803 such as those created by:
1804
1805   $hash{elem} = *foo;
1806   Hash::Util::lock_value %hash, 'elem';
1807
1808 It used to return true.
1809
1810 =item *
1811
1812 The C<SvPVutf8> C function no longer tries to modify its argument,
1813 resulting in errors [perl #108994].
1814
1815 =item *
1816
1817 C<SvPVutf8> now works properly with magical variables.
1818
1819 =item *
1820
1821 C<SvPVbyte> now works properly non-PVs.
1822
1823 =item *
1824
1825 When presented with malformed UTF-8 input, the XS-callable functions
1826 C<is_utf8_string()>, C<is_utf8_string_loc()>, and
1827 C<is_utf8_string_loclen()> could read beyond the end of the input
1828 string by up to 12 bytes.  This no longer happens.  [perl #32080].
1829 However, currently, C<is_utf8_char()> still has this defect, see
1830 L</is_utf8_char()> above.
1831
1832 =item *
1833
1834 The C-level C<pregcomp> function could become confused as to whether the
1835 pattern was in UTF8 if the pattern was an overloaded, tied, or otherwise
1836 magical scalar [perl #101940].
1837
1838 =back
1839
1840 =head2 Compile-time hints
1841
1842 =over
1843
1844 =item *
1845
1846 Tying C<%^H> no longer causes perl to crash or ignore the contents of
1847 C<%^H> when entering a compilation scope [perl #106282].
1848
1849 =item *
1850
1851 C<eval $string> and C<require> used not to
1852 localise C<%^H> during compilation if it
1853 was empty at the time the C<eval> call itself was compiled.  This could
1854 lead to scary side effects, like C<use re "/m"> enabling other flags that
1855 the surrounding code was trying to enable for its caller [perl #68750].
1856
1857 =item *
1858
1859 C<eval $string> and C<require> no longer localise hints (C<$^H> and C<%^H>)
1860 at run time, but only during compilation of the $string or required file.
1861 This makes C<BEGIN { $^H{foo}=7 }> equivalent to
1862 C<BEGIN { eval '$^H{foo}=7' }> [perl #70151].
1863
1864 =item *
1865
1866 Creating a BEGIN block from XS code (via C<newXS> or C<newATTRSUB>) would,
1867 on completion, make the hints of the current compiling code the current
1868 hints.  This could cause warnings to occur in a non-warning scope.
1869
1870 =back
1871
1872 =head2 Copy-on-write scalars
1873
1874 Copy-on-write or shared hash key scalars
1875 were introduced in 5.8.0, but most Perl code
1876 did not encounter them (they were used mostly internally).  Perl
1877 5.10.0 extended them, such that assigning C<__PACKAGE__> or a
1878 hash key to a scalar would make it copy-on-write.  Several parts
1879 of Perl were not updated to account for them, but have now been fixed.
1880
1881 =over
1882
1883 =item *
1884
1885 C<utf8::decode> had a nasty bug that would modify copy-on-write scalars'
1886 string buffers in place (i.e., skipping the copy).  This could result in
1887 hashes having two elements with the same key [perl #91834].
1888
1889 =item *
1890
1891 Lvalue subroutines were not allowing COW scalars to be returned.  This was
1892 fixed for lvalue scalar context in Perl 5.12.3 and 5.14.0, but list context
1893 was not fixed until this release.
1894
1895 =item *
1896
1897 Elements of restricted hashes (see the L<fields> pragma) containing
1898 copy-on-write values couldn't be deleted, nor could such hashes be cleared
1899 (C<%hash = ()>).
1900
1901 =item *
1902
1903 Localising a tied variable used to make it read-only if it contained a
1904 copy-on-write string.
1905
1906 =item *
1907
1908 Assigning a copy-on-write string to a stash
1909 element no longer causes a double free.  Regardless of this change, the
1910 results of such assignments are still undefined.
1911
1912 =item *
1913
1914 Assigning a copy-on-write string to a tied variable no longer stops that
1915 variable from being tied if it happens to be a PVMG or PVLV internally.
1916
1917 =item *
1918
1919 Doing a substitution on a tied variable returning a copy-on-write
1920 scalar used to cause an assertion failure or an "Attempt to free
1921 nonexistent shared string" warning.
1922
1923 =item *
1924
1925 This one is a regression from 5.12: In 5.14.0, the bitwise assignment
1926 operators C<|=>, C<^=> and C<&=> started leaving the left-hand side
1927 undefined if it happened to be a copy-on-write string [perl #108480].
1928
1929 =item *
1930
1931 L<Storable>, L<Devel::Peek> and L<PerlIO::scalar> had similar problems.
1932 See L</Updated Modules and Pragmata>, above.
1933
1934 =back
1935
1936 =head2 The debugger
1937
1938 =over
1939
1940 =item *
1941
1942 F<dumpvar.pl>, and consequently the C<x> command in the debugger, have been
1943 fixed to handle objects blessed into classes whose names contain "=".  The
1944 contents of such objects used not to be dumped [perl #101814].
1945
1946 =item *
1947
1948 The "R" command for restarting a debugger session has been fixed to work on
1949 Windows, or any other system lacking a C<POSIX::_SC_OPEN_MAX> constant
1950 [perl #87740].
1951
1952 =item *
1953
1954 The C<#line 42 foo> directive used not to update the arrays of lines used
1955 by the debugger if it occurred in a string eval.  This was partially fixed
1956 in 5.14, but it only worked for a single C<#line 42 foo> in each eval.  Now
1957 it works for multiple.
1958
1959 =item *
1960
1961 When subroutine calls are intercepted by the debugger, the name of the
1962 subroutine or a reference to it is stored in C<$DB::sub>, for the debugger
1963 to access.  In some cases (such as C<$foo = *bar; undef *bar; &$foo>)
1964 C<$DB::sub> would be set to a name that could not be used to find the
1965 subroutine, and so the debugger's attempt to call it would fail.  Now the
1966 check to see whether a reference is needed is more robust, so those
1967 problems should not happen anymore [rt.cpan.org #69862].
1968
1969 =item *
1970
1971 Every subroutine has a filename associated with it that the debugger uses.
1972 The one associated with constant subroutines used to be misallocated when
1973 cloned under threads.  Consequently, debugging threaded applications could
1974 result in memory corruption [perl #96126].
1975
1976 =back
1977
1978 =head2 Dereferencing operators
1979
1980 =over
1981
1982 =item *
1983
1984 C<defined(${"..."})>, C<defined(*{"..."})>, etc., used to
1985 return true for most, but not all built-in variables, if
1986 they had not been used yet.  This bug affected C<${^GLOBAL_PHASE}> and
1987 C<${^UTF8CACHE}>, among others.  It also used to return false if the
1988 package name was given as well (C<${"::!"}>) [perl #97978, #97492].
1989
1990 =item *
1991
1992 Perl 5.10.0 introduced a similar bug: C<defined(*{"foo"})> where "foo"
1993 represents the name of a built-in global variable used to return false if
1994 the variable had never been used before, but only on the I<first> call.
1995 This, too, has been fixed.
1996
1997 =item *
1998
1999 Since 5.6.0, C<*{ ... }> has been inconsistent in how it treats undefined
2000 values.  It would die in strict mode or lvalue context for most undefined
2001 values, but would be treated as the empty string (with a warning) for the
2002 specific scalar return by C<undef()> (C<&PL_sv_undef> internally).  This
2003 has been corrected.  C<undef()> is now treated like other undefined
2004 scalars, as in Perl 5.005.
2005
2006 =back
2007
2008 =head2 Filehandle, last-accessed
2009
2010 Perl has an internal variable that stores the last filehandle to be
2011 accessed.  It is used by C<$.> and by C<tell> and C<eof> without
2012 arguments.
2013
2014 =over
2015
2016 =item *
2017
2018 It used to be possible to set this internal variable to a glob copy and
2019 then modify that glob copy to be something other than a glob, and still
2020 have the last-accessed filehandle associated with the variable after
2021 assigning a glob to it again:
2022
2023     my $foo = *STDOUT;  # $foo is a glob copy
2024     <$foo>;             # $foo is now the last-accessed handle
2025     $foo = 3;           # no longer a glob
2026     $foo = *STDERR;     # still the last-accessed handle
2027
2028 Now the C<$foo = 3> assignment unsets that internal variable, so there
2029 is no last-accessed filehandle, just as if C<< <$foo> >> had never
2030 happened.
2031
2032 This also prevents some unrelated handle from becoming the last-accessed
2033 handle if $foo falls out of scope and the same internal SV gets used for
2034 another handle [perl #97988].
2035
2036 =item *
2037
2038 A regression in 5.14 caused these statements not to set that internal
2039 variable:
2040
2041     my $fh = *STDOUT;
2042     tell $fh;
2043     eof  $fh;
2044     seek $fh, 0,0;
2045     tell     *$fh;
2046     eof      *$fh;
2047     seek     *$fh, 0,0;
2048     readline *$fh;
2049
2050 This is now fixed, but C<tell *{ *$fh }> still has the problem, and it
2051 is not clear how to fix it [perl #106536].
2052
2053 =back
2054
2055 =head2 Filetests and C<stat>
2056
2057 The term "filetests" refers to the operators that consist of a hyphen
2058 followed by a single letter: C<-r>, C<-x>, C<-M>, etc.  The term "stacked"
2059 when applied to filetests means followed by another filetest operator
2060 sharing the same operand, as in C<-r -x -w $fooo>.
2061
2062 =over
2063
2064 =item *
2065
2066 C<stat> produces more consistent warnings.  It no longer warns for "_"
2067 [perl #71002] and no longer skips the warning at times for other unopened
2068 handles.  It no longer warns about an unopened handle when the operating
2069 system's C<fstat> function fails.
2070
2071 =item *
2072
2073 C<stat> would sometimes return negative numbers for large inode numbers,
2074 because it was using the wrong internal C type. [perl #84590]
2075
2076 =item *
2077
2078 C<lstat> is documented to fall back to C<stat> (with a warning) when given
2079 a filehandle.  When passed an IO reference, it was actually doing the
2080 equivalent of S<C<stat _>> and ignoring the handle.
2081
2082 =item *
2083
2084 C<-T _> with no preceding C<stat> used to produce a
2085 confusing "uninitialized" warning, even though there
2086 is no visible uninitialized value to speak of.
2087
2088 =item *
2089
2090 C<-T>, C<-B>, C<-l> and C<-t> now work
2091 when stacked with other filetest operators
2092 [perl #77388].
2093
2094 =item *
2095
2096 In 5.14.0, filetest ops (C<-r>, C<-x>, etc.) started calling FETCH on a
2097 tied argument belonging to the previous argument to a list operator, if
2098 called with a bareword argument or no argument at all.  This has been
2099 fixed, so C<push @foo, $tied, -r> no longer calls FETCH on C<$tied>.
2100
2101 =item *
2102
2103 In Perl 5.6, C<-l> followed by anything other than a bareword would treat
2104 its argument as a file name.  That was changed in 5.8 for glob references
2105 (C<\*foo>), but not for globs themselves (C<*foo>).  C<-l> started
2106 returning C<undef> for glob references without setting the last
2107 stat buffer that the "_" handle uses, but only if warnings
2108 were turned on.  With warnings off, it was the same as 5.6.
2109 In other words, it was simply buggy and inconsistent.  Now the 5.6
2110 behaviour has been restored.
2111
2112 =item *
2113
2114 C<-l> followed by a bareword no longer "eats" the previous argument to
2115 the list operator in whose argument list it resides.  Hence,
2116 C<print "bar", -l foo> now actually prints "bar", because C<-l>
2117 on longer eats it.
2118
2119 =item *
2120
2121 Perl keeps several internal variables to keep track of the last stat
2122 buffer, from which file(handle) it originated, what type it was, and
2123 whether the last stat succeeded.
2124
2125 There were various cases where these could get out of synch, resulting in
2126 inconsistent or erratic behaviour in edge cases (every mention of C<-T>
2127 applies to C<-B> as well):
2128
2129 =over
2130
2131 =item *
2132
2133 C<-T I<HANDLE>>, even though it does a C<stat>, was not resetting the last
2134 stat type, so an C<lstat _> following it would merrily return the wrong
2135 results.  Also, it was not setting the success status.
2136
2137 =item *
2138
2139 Freeing the handle last used by C<stat> or a filetest could result in
2140 S<C<-T _>> using an unrelated handle.
2141
2142 =item *
2143
2144 C<stat> with an IO reference would not reset the stat type or record the
2145 filehandle for S<C<-T _>> to use.
2146
2147 =item *
2148
2149 Fatal warnings could cause the stat buffer not to be reset
2150 for a filetest operator on an unopened filehandle or C<-l> on any handle.
2151 Fatal warnings also stopped C<-T> from setting C<$!>.
2152
2153 =item *
2154
2155 When the last stat was on an unreadable file, C<-T _> is supposed to
2156 return C<undef>, leaving the last stat buffer unchanged.  But it was
2157 setting the stat type, causing C<lstat _> to stop working.
2158
2159 =item *
2160
2161 C<-T I<FILENAME>> was not resetting the internal stat buffers for
2162 unreadable files.
2163
2164 =back
2165
2166 These have all been fixed.
2167
2168 =back
2169
2170 =head2 Formats
2171
2172 =over
2173
2174 =item *
2175
2176 A number of edge cases have been fixed with formats and C<formline>;
2177 in particular, where the format itself is potentially variable (such as
2178 with ties and overloading), and where the format and data differ in their
2179 encoding.  In both these cases, it used to possible for the output to be
2180 corrupted [perl #91032].
2181
2182 =item *
2183
2184 C<formline> no longer converts its argument into a string in-place.  So
2185 passing a reference to C<formline> no longer destroys the reference
2186 [perl #79532].
2187
2188 =item *
2189
2190 Assignment to C<$^A> (the format output accumulator) now recalculates
2191 the number of lines output.
2192
2193 =back
2194
2195 =head2 C<given> and C<when>
2196
2197 =over
2198
2199 =item *
2200
2201 C<given> was not scoping its implicit $_ properly, resulting in memory
2202 leaks or "Variable is not available" warnings [perl #94682].
2203
2204 =item *
2205
2206 C<given> was not calling set-magic on the implicit lexical C<$_> that it
2207 uses.  This meant, for example, that C<pos> would be remembered from one
2208 execution of the same C<given> block to the next, even if the input were a
2209 different variable [perl #84526].
2210
2211 =item *
2212
2213 C<when> blocks are now capable of returning variables declared inside the
2214 enclosing C<given> block [perl #93548].
2215
2216 =back
2217
2218 =head2 The C<glob> operator
2219
2220 =over
2221
2222 =item *
2223
2224 On OSes other than VMS, Perl's C<glob> operator (and the C<< <...> >> form)
2225 use L<File::Glob> underneath.  L<File::Glob> splits the pattern into words,
2226 before feeding each word to its C<bsd_glob> function.
2227
2228 There were several inconsistencies in the way the split was done.  Now
2229 quotation marks (' and ") are always treated as shell-style word delimiters
2230 (that allow whitespace as part of a word) and backslashes are always
2231 preserved, unless they exist to escape quotation marks.  Before, those
2232 would only sometimes be the case, depending on whether the pattern
2233 contained whitespace.  Also, escaped whitespace at the end of the pattern
2234 is no longer stripped [perl #40470].
2235
2236 =item *
2237
2238 C<CORE::glob> now works as a way to call the default globbing function.  It
2239 used to respect overrides, despite the C<CORE::> prefix.
2240
2241 =item *
2242
2243 Under miniperl (used to configure modules when perl itself is built),
2244 C<glob> now clears %ENV before calling csh, since the latter croaks on some
2245 systems if it does not like the contents of the LS_COLORS enviroment
2246 variable [perl #98662].
2247
2248 =back
2249
2250 =head2 Lvalue subroutines
2251
2252 =over
2253
2254 =item *
2255
2256 Explicit return now returns the actual argument passed to return, instead
2257 of copying it [perl #72724, #72706].
2258
2259 =item *
2260
2261 Lvalue subroutines used to enforce lvalue syntax (i.e., whatever can go on
2262 the left-hand side of C<=>) for the last statement and the arguments to
2263 return.  Since lvalue subroutines are not always called in lvalue context,
2264 this restriction has been lifted.
2265
2266 =item *
2267
2268 Lvalue subroutines are less restrictive as to what values can be returned.
2269 It used to croak on values returned by C<shift> and C<delete> and from
2270 other subroutines, but no longer does so [perl #71172].
2271
2272 =item *
2273
2274 Empty lvalue subroutines (C<sub :lvalue {}>) used to return C<@_> in list
2275 context.  In fact, all subroutines used to, but regular subs were fixed in
2276 Perl 5.8.2.  Now lvalue subroutines have been likewise fixed.
2277
2278 =item *
2279
2280 Autovivification now works on values returned from lvalue subroutines
2281 [perl #7946], as does returning C<keys> in lvalue context.
2282
2283 =item *
2284
2285 Lvalue subroutines used to copy their return values in rvalue context.  Not
2286 only was this a waste of CPU cycles, but it also caused bugs.  A C<($)>
2287 prototype would cause an lvalue sub to copy its return value [perl #51408],
2288 and C<while(lvalue_sub() =~ m/.../g) { ... }> would loop endlessly
2289 [perl #78680].
2290
2291 =item *
2292
2293 When called in potential lvalue context
2294 (e.g., subroutine arguments or a list
2295 passed to C<for>), lvalue subroutines used to copy
2296 any read-only value that was returned.  E.g., C< sub :lvalue { $] } >
2297 would not return C<$]>, but a copy of it.
2298
2299 =item *
2300
2301 When called in potential lvalue context, an lvalue subroutine returning
2302 arrays or hashes used to bind the arrays or hashes to scalar variables,
2303 resulting in bugs.  This was fixed in 5.14.0 if an array were the first
2304 thing returned from the subroutine (but not for C<$scalar, @array> or
2305 hashes being returned).  Now a more general fix has been applied
2306 [perl #23790].
2307
2308 =item *
2309
2310 Method calls whose arguments were all surrounded with C<my()> or C<our()>
2311 (as in C<< $object->method(my($a,$b)) >>) used to force lvalue context on
2312 the subroutine.  This would prevent lvalue methods from returning certain
2313 values.
2314
2315 =item *
2316
2317 Lvalue sub calls that are not determined to be such at compile time
2318 (C<&$name> or &{"name"}) are no longer exempt from strict refs if they
2319 occur in the last statement of an lvalue subroutine [perl #102486].
2320
2321 =item *
2322
2323 Sub calls whose subs are not visible at compile time, if
2324 they occurred in the last statement of an lvalue subroutine,
2325 would reject non-lvalue subroutines and die with "Can't modify non-lvalue
2326 subroutine call" [perl #102486].
2327
2328 Non-lvalue sub calls whose subs I<are> visible at compile time exhibited
2329 the opposite bug.  If the call occurred in the last statement of an lvalue
2330 subroutine, there would be no error when the lvalue sub was called in
2331 lvalue context.  Perl would blindly assign to the temporary value returned
2332 by the non-lvalue subroutine.
2333
2334 =item *
2335
2336 C<AUTOLOAD> routines used to take precedence over the actual sub being
2337 called (i.e., when autoloading wasn't needed), for sub calls in lvalue or
2338 potential lvalue context, if the subroutine was not visible at compile
2339 time.
2340
2341 =item *
2342
2343 Applying the C<:lvalue> attribute to an XSUB or to an aliased subroutine
2344 stub with C<< sub foo :lvalue; >> syntax stopped working in Perl 5.12.
2345 This has been fixed.
2346
2347 =item *
2348
2349 Applying the :lvalue attribute to subroutine that is already defined does
2350 not work properly, as the attribute changes the way the sub is compiled.
2351 Hence, Perl 5.12 began warning when an attempt is made to apply the
2352 attribute to an already defined sub.  In such cases, the attribute is
2353 discarded.
2354
2355 But the change in 5.12 missed the case where custom attributes are also
2356 present: that case still silently and ineffectively applied the attribute.
2357 That omission has now been corrected.  C<sub foo :lvalue :Whatever> (when
2358 C<foo> is already defined) now warns about the :lvalue attribute, and does
2359 not apply it.
2360
2361 =item *
2362
2363 A bug affecting lvalue context propagation through nested lvalue subroutine
2364 calls has been fixed.  Previously, returning a value in nested rvalue
2365 context would be treated as lvalue context by the inner subroutine call,
2366 resulting in some values (such as read-only values) being rejected.
2367
2368 =back
2369
2370 =head2 Overloading
2371
2372 =over
2373
2374 =item *
2375
2376 Arithmetic assignment (C<$left += $right>) involving overloaded objects
2377 that rely on the 'nomethod' override no longer segfault when the left
2378 operand is not overloaded.
2379
2380 =item *
2381
2382 Errors that occur when methods cannot be found during overloading now
2383 mention the correct package name, as they did in 5.8.x, instead of
2384 erroneously mentioning the "overload" package, as they have since 5.10.0.
2385
2386 =item *
2387
2388 Undefining C<%overload::> no longer causes a crash.
2389
2390 =back
2391
2392 =head2 Prototypes of built-in keywords
2393
2394 =over
2395
2396 =item *
2397
2398 The C<prototype> function no longer dies for the C<__FILE__>, C<__LINE__>
2399 and C<__PACKAGE__> directives.  It now returns an empty-string prototype
2400 for them, because they are syntactically indistinguishable from nullary
2401 functions like C<time>.
2402
2403 =item *
2404
2405 C<prototype> now returns C<undef> for all overridable infix operators,
2406 such as C<eq>, which are not callable in any way resembling functions.
2407 It used to return incorrect prototypes for some and die for others
2408 [perl #94984].
2409
2410 =item *
2411
2412 The prototypes of several built-in functions--C<getprotobynumber>, C<lock>,
2413 C<not> and C<select>--have been corrected, or at least are now closer to
2414 reality than before.
2415
2416 =back
2417
2418 =head2 Regular expressions
2419
2420 =for comment Is it possible to merge some of these items?
2421
2422 =over 4
2423
2424 =item *
2425
2426 C</[[:ascii:]]/> and C</[[:blank:]]/> now use locale rules under
2427 C<use locale> when the platform supports that.  Previously, they used
2428 the platform's native character set.
2429
2430 =item *
2431
2432 C<m/[[:ascii:]]/i> and C</\p{ASCII}/i> now match identically (when not
2433 under a differing locale).  This fixes a regression introduced in 5.14
2434 in which the first expression could match characters outside of ASCII,
2435 such as the KELVIN SIGN.
2436
2437 =item *
2438
2439 C</.*/g> would sometimes refuse to match at the end of a string that ends
2440 with "\n".  This has been fixed [perl #109206].
2441
2442 =item *
2443
2444 Starting with 5.12.0, Perl used to get its internal bookkeeping muddled up
2445 after assigning C<${ qr// }> to a hash element and locking it with
2446 L<Hash::Util>.  This could result in double frees, crashes or erratic
2447 behaviour.
2448
2449 =item *
2450
2451 The new (in 5.14.0) regular expression modifier C</a> when repeated like
2452 C</aa> forbids the characters outside the ASCII range that match
2453 characters inside that range from matching under C</i>.  This did not
2454 work under some circumstances, all involving alternation, such as:
2455
2456  "\N{KELVIN SIGN}" =~ /k|foo/iaa;
2457
2458 succeeded inappropriately.  This is now fixed.
2459
2460 =item *
2461
2462 5.14.0 introduced some memory leaks in regular expression character
2463 classes such as C<[\w\s]>, which have now been fixed. (5.14.1)
2464
2465 =item *
2466
2467 An edge case in regular expression matching could potentially loop.
2468 This happened only under C</i> in bracketed character classes that have
2469 characters with multi-character folds, and the target string to match
2470 against includes the first portion of the fold, followed by another
2471 character that has a multi-character fold that begins with the remaining
2472 portion of the fold, plus some more.
2473
2474  "s\N{U+DF}" =~ /[\x{DF}foo]/i
2475
2476 is one such case.  C<\xDF> folds to C<"ss">. (5.14.1)
2477
2478 =item *
2479
2480 A few characters in regular expression pattern matches did not
2481 match correctly in some circumstances, all involving C</i>.  The
2482 affected characters are:
2483 COMBINING GREEK YPOGEGRAMMENI,
2484 GREEK CAPITAL LETTER IOTA,
2485 GREEK CAPITAL LETTER UPSILON,
2486 GREEK PROSGEGRAMMENI,
2487 GREEK SMALL LETTER IOTA WITH DIALYTIKA AND OXIA,
2488 GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS,
2489 GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND OXIA,
2490 GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS,
2491 LATIN SMALL LETTER LONG S,
2492 LATIN SMALL LIGATURE LONG S T,
2493 and
2494 LATIN SMALL LIGATURE ST.
2495
2496 =item *
2497
2498 A memory leak regression in regular expression compilation
2499 under threading has been fixed.
2500
2501 =item *
2502
2503 A regression introduced in 5.13.6 has
2504 been fixed.  This involved an inverted
2505 bracketed character class in a regular expression that consisted solely
2506 of a Unicode property.  That property wasn't getting inverted outside the
2507 Latin1 range.
2508
2509 =item *
2510
2511 Three problematic Unicode characters now work better in regex pattern matching under C</i>
2512
2513 In the past, three Unicode characters:
2514 LATIN SMALL LETTER SHARP S,
2515 GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS,
2516 and
2517 GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS,
2518 along with the sequences that they fold to
2519 (including "ss" in the case of LATIN SMALL LETTER SHARP S),
2520 did not properly match under C</i>.  5.14.0 fixed some of these cases,
2521 but introduced others, including a panic when one of the characters or
2522 sequences was used in the C<(?(DEFINE)> regular expression predicate.
2523 The known bugs that were introduced in 5.14 have now been fixed; as well
2524 as some other edge cases that have never worked until now.  All these
2525 involve using the characters and sequences outside bracketed character
2526 classes under C</i>.  This closes [perl #98546].
2527
2528 There remain known problems when using certain characters with
2529 multi-character folds inside bracketed character classes, including such
2530 constructs as C<qr/[\N{LATIN SMALL LETTER SHARP}a-z]/i>.  These
2531 remaining bugs are addressed in [perl #89774].
2532
2533 =item *
2534
2535 RT #78266: The regex engine has been leaking memory when accessing
2536 named captures that weren't matched as part of a regex ever since 5.10
2537 when they were introduced, e.g. this would consume over a hundred MB of
2538 memory:
2539
2540     for (1..10_000_000) {
2541         if ("foo" =~ /(foo|(?<capture>bar))?/) {
2542             my $capture = $+{capture}
2543         }
2544     }
2545     system "ps -o rss $$"'
2546
2547 =item *
2548
2549 In 5.14, C</[[:lower:]]/i> and C</[[:upper:]]/i> no longer matched the
2550 opposite case.  This has been fixed [perl #101970].
2551
2552 =item *
2553
2554 A regular expression match with an overloaded object on the right-hand side
2555 would in some cases stringify the object too many times.
2556
2557 =item *
2558
2559 A regression has been fixed that was introduced in 5.14, in C</i>
2560 regular expression matching, in which a match improperly fails if the
2561 pattern is in UTF-8, the target string is not, and a Latin-1 character
2562 precedes a character in the string that should match the pattern.
2563 [perl #101710]
2564
2565 =item *
2566
2567 In case-insensitive regular expression pattern matching, no longer on
2568 UTF-8 encoded strings does the scan for the start of match only look at
2569 the first possible position.  This caused matches such as
2570 C<"f\x{FB00}" =~ /ff/i> to fail.
2571
2572 =item *
2573
2574 The regexp optimiser no longer crashes on debugging builds when merging
2575 fixed-string nodes with inconvenient contents.
2576
2577 =item *
2578
2579 A panic involving the combination of the regular expression modifiers
2580 C</aa> and the C<\b> escape sequence introduced in 5.14.0 has been
2581 fixed [perl #95964].
2582
2583 =item *
2584
2585 The combination of the regular expression modifiers C</aa> and the C<\b>
2586 and C<\B> escape sequences did not work properly on UTF-8 encoded
2587 strings.  All non-ASCII characters under C</aa> should be treated as
2588 non-word characters, but what was happening was that Unicode rules were
2589 used to determine wordness/non-wordness for non-ASCII characters.  This
2590 is now fixed [perl #95968].
2591
2592 =item *
2593
2594 C<< (?foo: ...) >> no longer loses passed in character set.
2595
2596 =item *
2597
2598 The trie optimisation used to have problems with alternations containing
2599 an empty C<(?:)>, causing C<< "x" =~ /\A(?>(?:(?:)A|B|C?x))\z/ >> not to
2600 match, whereas it should [perl #111842].
2601
2602 =item *
2603
2604 Use of lexical (C<my>) variables in code blocks embedded in regular
2605 expressions will no longer result in memory corruption or crashes.
2606
2607 Nevertheless, these code blocks are still experimental, as there are still
2608 problems with the wrong variables being closed over (in loops for instance)
2609 and with abnormal exiting (e.g., C<die>) causing memory corruption.
2610
2611 =item *
2612
2613 The C<\h>, C<\H>, C<\v> and C<\V> regular expression metacharacters used to
2614 cause a panic error message when attempting to match at the end of the
2615 string [perl #96354].
2616
2617 =item *
2618
2619 The abbreviations for four C1 control characters C<MW> C<PM>, C<RI>, and
2620 C<ST> were previously unrecognized by C<\N{}>, vianame(), and
2621 string_vianame().
2622
2623 =item *
2624
2625 Mentioning a variable named "&" other than C<$&> (i.e., C<@&> or C<%&>) no
2626 longer stops C<$&> from working.  The same applies to variables named "'"
2627 and "`" [perl #24237].
2628
2629 =item *
2630
2631 Creating a C<UNIVERSAL::AUTOLOAD> sub no longer stops C<%+>, C<%-> and
2632 C<%!> from working some of the time [perl #105024].
2633
2634 =back
2635
2636 =head2 Smartmatching
2637
2638 =over
2639
2640 =item *
2641
2642 C<~~> now correctly handles the precedence of Any~~Object, and is not tricked
2643 by an overloaded object on the left-hand side.
2644
2645 =item *
2646
2647 In Perl 5.14.0, C<$tainted ~~ @array> stopped working properly.  Sometimes
2648 it would erroneously fail (when C<$tainted> contained a string that occurs
2649 in the array I<after> the first element) or erroneously succeed (when
2650 C<undef> occurred after the first element) [perl #93590].
2651
2652 =back
2653
2654 =head2 The C<sort> operator
2655
2656 =over
2657
2658 =item *
2659
2660 C<sort> was not treating C<sub {}> and C<sub {()}> as equivalent when
2661 such a sub was provided as the comparison routine.  It used to croak on
2662 C<sub {()}>.
2663
2664 =item *
2665
2666 C<sort> now works once more with custom sort routines that are XSUBs.  It
2667 stopped working in 5.10.0.
2668
2669 =item *
2670
2671 C<sort> with a constant for a custom sort routine, although it produces
2672 unsorted results, no longer crashes.  It started crashing in 5.10.0.
2673
2674 =item *
2675
2676 Warnings emitted by C<sort> when a custom comparison routine returns a
2677 non-numeric value now contain "in sort" and show the line number of the
2678 C<sort> operator, rather than the last line of the comparison routine.  The
2679 warnings also occur now only if warnings are enabled in the scope where
2680 C<sort> occurs.  Previously the warnings would occur if enabled in the
2681 comparison routine's scope.
2682
2683 =item *
2684
2685 C<< sort { $a <=> $b } >>, which is optimised internally, now produces
2686 "uninitialized" warnings for NaNs (not-a-number values), since C<< <=> >>
2687 returns C<undef> for those.  This brings it in line with
2688 S<C<< sort { 1; $a <=> $b } >>> and other more complex cases, which are not
2689 optimised [perl #94390].
2690
2691 =back
2692
2693 =head2 The C<substr> operator
2694
2695 =over
2696
2697 =item *
2698
2699 Tied (and otherwise magical) variables are no longer exempt from the
2700 "Attempt to use reference as lvalue in substr" warning.
2701
2702 =item *
2703
2704 That warning now occurs when the returned lvalue is assigned to, not
2705 when C<substr> itself is called.  This only makes a difference if the
2706 return value of C<substr> is referenced and assigned to later.
2707
2708 =item *
2709
2710 Passing a substring of a read-only value or a typeglob to a function
2711 (potential lvalue context) no longer causes an immediate "Can't coerce"
2712 or "Modification of a read-only value" error.  That error only occurs
2713 if and when the value passed is assigned to.
2714
2715 The same thing happens with the "substr outside of string" error.  If
2716 the lvalue is only read, not written to, it is now just a warning, as
2717 with rvalue C<substr>.
2718
2719 =item *
2720
2721 C<substr> assignments no longer call FETCH twice if the first argument
2722 is a tied variable, just once.
2723
2724 =back
2725
2726 =head2 Support for embedded nulls
2727
2728 Some parts of Perl did not work correctly with nulls (C<chr 0>) embedded in
2729 strings.  That meant that, for instance, C<< $m = "a\0b"; foo->$m >> would
2730 call the "a" method, instead of the actual method name contained in $m.
2731 These parts of perl have been fixed to support nulls:
2732
2733 =over
2734
2735 =item *
2736
2737 Method names
2738
2739 =item *
2740
2741 Typeglob names (including filehandle and subroutine names)
2742
2743 =item *
2744
2745 Package names, including the return value of C<ref()>
2746
2747 =item *
2748
2749 Typeglob elements (C<*foo{"THING\0stuff"}>)
2750
2751 =item *
2752
2753 Signal names
2754
2755 =item *
2756
2757 Various warnings and error messages that mention variable names or values,
2758 methods, etc.
2759
2760 =back
2761
2762 One side effect of these changes is that blessing into "\0" no longer
2763 causes C<ref()> to return false.
2764
2765 =head2 Threading bugs
2766
2767 =over
2768
2769 =item *
2770
2771 Typeglobs returned from threads are no longer cloned if the parent thread
2772 already has a glob with the same name.  This means that returned
2773 subroutines will now assign to the right package variables [perl #107366].
2774
2775 =item *
2776
2777 Some cases of threads crashing due to memory allocation during cloning have
2778 been fixed [perl #90006].
2779
2780 =item *
2781
2782 Thread joining would sometimes emit "Attempt to free unreferenced scalar"
2783 warnings if C<caller> had been used from the C<DB> package prior to thread
2784 creation [perl #98092].
2785
2786 =item *
2787
2788 Locking a subroutine (via C<lock &sub>) is no longer a compile-time error
2789 for regular subs.  For lvalue subroutines, it no longer tries to return the
2790 sub as a scalar, resulting in strange side effects like C<ref \$_>
2791 returning "CODE" in some instances.
2792
2793 C<lock &sub> is now a run-time error if L<threads::shared> is loaded (a
2794 no-op otherwise), but that may be rectified in a future version.
2795
2796 =back
2797
2798 =head2 Tied variables
2799
2800 =over
2801
2802 =item *
2803
2804 Various cases in which FETCH was being ignored or called too many times
2805 have been fixed:
2806
2807 =over
2808
2809 =item *
2810
2811 C<PerlIO::get_layers> [perl #97956]
2812
2813 =item *
2814
2815 C<$tied =~ y/a/b/>, C<chop $tied> and C<chomp $tied> when $tied holds a
2816 reference.
2817
2818 =item *
2819
2820 When calling C<local $_> [perl #105912]
2821
2822 =item *
2823
2824 Four-argument C<select>
2825
2826 =item *
2827
2828 A tied buffer passed to C<sysread>
2829
2830 =item *
2831
2832 C<< $tied .= <> >>
2833
2834 =item *
2835
2836 Three-argument C<open>, the third being a tied file handle
2837 (as in C<< open $fh, ">&", $tied >>)
2838
2839 =item *
2840
2841 C<sort> with a reference to a tied glob for the comparison routine.
2842
2843 =item *
2844
2845 C<..> and C<...> in list context [perl #53554].
2846
2847 =item *
2848
2849 C<${$tied}>, C<@{$tied}>, C<%{$tied}> and C<*{$tied}> where the tied
2850 variable returns a string (C<&{}> was unaffected)
2851
2852 =item *
2853
2854 C<defined ${ $tied_variable }>
2855
2856 =item *
2857
2858 Various functions that take a filehandle argument in rvalue context
2859 (C<close>, C<readline>, etc.) [perl #97482]
2860
2861 =item *
2862
2863 Some cases of dereferencing a complex expression, such as
2864 C<${ (), $tied } = 1>, used to call C<FETCH> multiple times, but now call
2865 it once.
2866
2867 =item *
2868
2869 C<$tied-E<gt>method> where $tied returns a package name--even resulting in
2870 a failure to call the method, due to memory corruption
2871
2872 =item *
2873
2874 Assignments like C<*$tied = \&{"..."}> and C<*glob = $tied>
2875
2876 =item *
2877
2878 C<chdir>, C<chmod>, C<chown>, C<utime>, C<truncate>, C<stat>, C<lstat> and
2879 the filetest ops (C<-r>, C<-x>, etc.)
2880
2881 =back
2882
2883 =item *
2884
2885 C<caller> sets C<@DB::args> to the subroutine arguments when called from
2886 the DB package.  It used to crash when doing so if C<@DB::args> happened to
2887 be tied.  Now it croaks instead.
2888
2889 =item *
2890
2891 Tying an element of %ENV or C<%^H> and then deleting that element would
2892 result in a call to the tie object's DELETE method, even though tying the
2893 element itself is supposed to be equivalent to tying a scalar (the element
2894 is, of course, a scalar) [perl #67490].
2895
2896 =item *
2897
2898 When Perl autovivifies an element of a tied array or hash (which entails
2899 calling STORE with a new reference), it now calls FETCH immediately after
2900 the STORE, instead of assuming that FETCH would have returned the same
2901 reference.  This can make it easier to implement tied objects [perl #35865, #43011].
2902
2903 =item *
2904
2905 Four-argument C<select> no longer produces its "Non-string passed as
2906 bitmask" warning on tied or tainted variables that are strings.
2907
2908 =item *
2909
2910 Localising a tied scalar that returns a typeglob no longer stops it from
2911 being tied till the end of the scope.
2912
2913 =item *
2914
2915 Attempting to C<goto> out of a tied handle method used to cause memory
2916 corruption or crashes.  Now it produces an error message instead
2917 [perl #8611].
2918
2919 =item *
2920
2921 A bug has been fixed that occurs when a tied variable is used as a
2922 subroutine reference:  if the last thing assigned to or returned from the
2923 variable was a reference or typeglob, the C<\&$tied> could either crash or
2924 return the wrong subroutine.  The reference case is a regression introduced
2925 in Perl 5.10.0.  For typeglobs, it has probably never worked till now.
2926
2927 =back
2928
2929 =head2 Version objects and vstrings
2930
2931 =over
2932
2933 =item *
2934
2935 The bitwise complement operator (and possibly other operators, too) when
2936 passed a vstring would leave vstring magic attached to the return value,
2937 even though the string had changed.  This meant that
2938 C<< version->new(~v1.2.3) >> would create a version looking like "v1.2.3"
2939 even though the string passed to C<< version->new >> was actually
2940 "\376\375\374".  This also caused L<B::Deparse> to deparse C<~v1.2.3>
2941 incorrectly, without the C<~> [perl #29070].
2942
2943 =item *
2944
2945 Assigning a vstring to a magic (e.g., tied, C<$!>) variable and then
2946 assigning something else used to blow away all the magic.  This meant that
2947 tied variables would come undone, C<$!> would stop getting updated on
2948 failed system calls, C<$|> would stop setting autoflush, and other
2949 mischief would take place.  This has been fixed.
2950
2951 =item *
2952
2953 C<< version->new("version") >> and C<printf "%vd", "version"> no longer
2954 crash [perl #102586].
2955
2956 =item *
2957
2958 Version comparisons, such as those that happen implicitly with C<use
2959 v5.43>, no longer cause locale settings to change [perl #105784].
2960
2961 =item *
2962
2963 Version objects no longer cause memory leaks in boolean context
2964 [perl #109762].
2965
2966 =back
2967
2968 =head2 Warnings, redefinition
2969
2970 =over
2971
2972 =item *
2973
2974 Subroutines from the C<autouse> namespace are once more exempt from
2975 redefinition warnings.  This used to work in 5.005, but was broken in
2976 5.6 for most subroutines.  For subs created via XS that redefine
2977 subroutines from the C<autouse> package, this stopped working in 5.10.
2978
2979 =item *
2980
2981 New XSUBs now produce redefinition warnings if they overwrite existing
2982 subs, as they did in 5.8.x.  (The C<autouse> logic was reversed in
2983 5.10-14.  Only subroutines from the C<autouse> namespace would warn
2984 when clobbered.)
2985
2986 =item *
2987
2988 C<newCONSTSUB> used to use compile-time warning hints, instead of
2989 run-time hints.  The following code should never produce a redefinition
2990 warning, but it used to, if C<newCONSTSUB> redefined an existing
2991 subroutine:
2992
2993     use warnings;
2994     BEGIN {
2995         no warnings;
2996         some_XS_function_that_calls_new_CONSTSUB();
2997     }
2998
2999 =item *
3000
3001 Redefinition warnings for constant subroutines are on by default (what
3002 are known as severe warnings in L<perldiag>).  This was only the case
3003 when it was a glob assignment or declaration of a Perl subroutine that
3004 caused the warning.  If the creation of XSUBs triggered the warning, it
3005 was not a default warning.  This has been corrected.
3006
3007 =item *
3008
3009 The internal check to see whether a redefinition warning should occur
3010 used to emit "uninitialized" warnings in cases like this:
3011
3012     use warnings "uninitialized";
3013     use constant {u => undef, v => undef};
3014     sub foo(){u}
3015     sub foo(){v}
3016
3017 =back
3018
3019 =head2 Warnings, "Uninitialized"
3020
3021 =over
3022
3023 =item *
3024
3025 Various functions that take a filehandle argument in rvalue context
3026 (C<close>, C<readline>, etc.) used to warn twice for an undefined handle
3027 [perl #97482].
3028
3029 =item *
3030
3031 C<dbmopen> now only warns once, rather than three times, if the mode
3032 argument is C<undef> [perl #90064].
3033
3034 =item *
3035
3036 The C<+=> operator does not usually warn when the left-hand side is
3037 C<undef>, but it was doing so for tied variables.  This has been fixed
3038 [perl #44895].
3039
3040 =item *
3041
3042 A bug fix in Perl 5.14 introduced a new bug, causing "uninitialized"
3043 warnings to report the wrong variable if the operator in question had
3044 two operands and one was C<%{...}> or C<@{...}>.  This has been fixed
3045 [perl #103766].
3046
3047 =item *
3048
3049 C<..> and C<...> in list context now mention the name of the variable in
3050 "uninitialized" warnings for string (as opposed to numeric) ranges.
3051
3052 =back
3053
3054 =head2 Weak references
3055
3056 =over
3057
3058 =item *
3059
3060 Weakening the first argument to an automatically-invoked C<DESTROY> method
3061 could result in erroneous "DESTROY created new reference" errors or
3062 crashes.  Now it is an error to weaken a read-only reference.
3063
3064 =item *
3065
3066 Weak references to lexical hashes going out of scope were not going stale
3067 (becoming undefined), but continued to point to the hash.
3068
3069 =item *
3070
3071 Weak references to lexical variables going out of scope are now broken
3072 before any magical methods (e.g., DESTROY on a tie object) are called.
3073 This prevents such methods from modifying the variable that will be seen
3074 the next time the scope is entered.
3075
3076 =item *
3077
3078 Creating a weak reference to an @ISA array or accessing the array index
3079 (C<$#ISA>) could result in confused internal bookkeeping for elements
3080 subsequently added to the @ISA array.  For instance, creating a weak
3081 reference to the element itself could push that weak reference on to @ISA;
3082 and elements added after use of C<$#ISA> would be ignored by method lookup
3083 [perl #85670].
3084
3085 =back
3086
3087 =head2 Other notable fixes
3088
3089 =over
3090
3091 =item *
3092
3093 C<quotemeta> now quotes consistently the same non-ASCII characters under
3094 C<use feature 'unicode_strings'>, regardless of whether the string is
3095 encoded in UTF-8 or not, hence fixing the last vestiges (we hope) of the
3096 infamous L<perlunicode/The "Unicode Bug">.  [perl #77654].
3097
3098 Which of these code points is quoted has changed, based on Unicode's
3099 recommendations.  See L<perlfunc/quotemeta> for details.
3100
3101 =item *
3102
3103 When one writes C<open foo || die>, which used to work in Perl 4, a
3104 "Precedence problem" warning is produced.  This warning used erroneously to
3105 apply to fully-qualified bareword handle names not followed by C<||>.  This
3106 has been corrected.
3107
3108 =item *
3109
3110 After package aliasing (C<*foo:: = *bar::>), C<select> with 0 or 1 argument
3111 would sometimes return a name that could not be used to refer to the
3112 filehandle, or sometimes it would return C<undef> even when a filehandle
3113 was selected.  Now it returns a typeglob reference in such cases.
3114
3115 =item *
3116
3117 C<PerlIO::get_layers> no longer ignores some arguments that it thinks are
3118 numeric, while treating others as filehandle names.  It is now consistent
3119 for flat scalars (i.e., not references).
3120
3121 =item *
3122
3123 Unrecognised switches on C<#!> line
3124
3125 If a switch, such as B<-x>, that cannot occur on the C<#!> line is used
3126 there, perl dies with "Can't emulate...".
3127
3128 It used to produce the same message for switches that perl did not
3129 recognise at all, whether on the command line or the C<#!> line.
3130
3131 Now it produces the "Unrecognized switch" error message [perl #104288].
3132
3133 =item *
3134
3135 C<system> now temporarily blocks the SIGCHLD signal handler, to prevent the
3136 signal handler from stealing the exit status [perl #105700].
3137
3138 =item *
3139
3140 The %n formatting code for C<printf> and C<sprintf>, which causes the number
3141 of characters to be assigned to the next argument, now actually
3142 assigns the number of characters, instead of the number of bytes.
3143
3144 It also works now with special lvalue functions like C<substr> and with
3145 nonexistent hash and array elements [perl #3471, #103492].
3146
3147 =item *
3148
3149 Perl skips copying values returned from a subroutine, for the sake of
3150 speed, if doing so would make no observable difference.  Due to faulty
3151 logic, this would happen with the
3152 result of C<delete>, C<shift> or C<splice>, even if the result was
3153 referenced elsewhere.  It also did so with tied variables about to be freed
3154 [perl #91844, #95548].
3155
3156 =item *
3157
3158 C<utf8::decode> now refuses to modify read-only scalars [perl #91850].
3159
3160 =item *
3161
3162 Freeing $_ inside a C<grep> or C<map> block, a code block embedded in a
3163 regular expression, or an @INC filter (a subroutine returned by a
3164 subroutine in @INC) used to result in double frees or crashes
3165 [perl #91880, #92254, #92256].
3166
3167 =item *
3168
3169 C<eval> returns C<undef> in scalar context or an empty list in list
3170 context when there is a run-time error.  When C<eval> was passed a
3171 string in list context and a syntax error occurred, it used to return a
3172 list containing a single undefined element.  Now it returns an empty
3173 list in list context for all errors [perl #80630].
3174
3175 =item *
3176
3177 C<goto &func> no longer crashes, but produces an error message, when
3178 the unwinding of the current subroutine's scope fires a destructor that
3179 undefines the subroutine being "goneto" [perl #99850].
3180
3181 =item *
3182
3183 Perl now holds an extra reference count on the package that code is
3184 currently compiling in.  This means that the following code no longer
3185 crashes [perl #101486]:
3186
3187     package Foo;
3188     BEGIN {*Foo:: = *Bar::}
3189     sub foo;
3190
3191 =item *
3192
3193 The C<x> repetition operator no longer crashes on 64-bit builds with large
3194 repeat counts [perl #94560].
3195
3196 =item *
3197
3198 Calling C<require> on an implicit C<$_> when C<*CORE::GLOBAL::require> has
3199 been overridden does not segfault anymore, and C<$_> is now passed to the
3200 overriding subroutine [perl #78260].
3201
3202 =item *
3203
3204 C<use> and C<require> are no longer affected by the I/O layers active in
3205 the caller's scope (enabled by L<open.pm|open>) [perl #96008].
3206
3207 =item *
3208
3209 C<our $::é; $é> (which is invalid) no longer produces the "Compilation
3210 error at lib/utf8_heavy.pl..." error message, which it started emitting in
3211 5.10.0 [perl #99984].
3212
3213 =item *
3214
3215 On 64-bit systems, C<read()> now understands large string offsets beyond
3216 the 32-bit range.
3217
3218 =item *
3219
3220 Errors that occur when processing subroutine attributes no longer cause the
3221 subroutine's op tree to leak.
3222
3223 =item *
3224
3225 Passing the same constant subroutine to both C<index> and C<formline> no
3226 longer causes one or the other to fail [perl #89218]. (5.14.1)
3227
3228 =item *
3229
3230 List assignment to lexical variables declared with attributes in the same
3231 statement (C<my ($x,@y) : blimp = (72,94)>) stopped working in Perl 5.8.0.
3232 It has now been fixed.
3233
3234 =item *
3235
3236 Perl 5.10.0 introduced some faulty logic that made "U*" in the middle of
3237 a pack template equivalent to "U0" if the input string was empty.  This has
3238 been fixed [perl #90160].
3239
3240 =item *
3241
3242 Destructors on objects were not called during global destruction on objects
3243 that were not referenced by any scalars.  This could happen if an array
3244 element were blessed (e.g., C<bless \$a[0]>) or if a closure referenced a
3245 blessed variable (C<bless \my @a; sub foo { @a }>).
3246
3247 Now there is an extra pass during global destruction to fire destructors on
3248 any objects that might be left after the usual passes that check for
3249 objects referenced by scalars [perl #36347].
3250
3251 =item *
3252
3253 Fixed a case where it was possible that a freed buffer may have been read
3254 from when parsing a here document [perl #90128]. (5.14.1)
3255
3256 =item *
3257
3258 C<each(I<ARRAY>)> is now wrapped in C<defined(...)>, like C<each(I<HASH>)>,
3259 inside a C<while> condition [perl #90888].
3260
3261 =item *
3262
3263 A problem with context propagation when a C<do> block is an argument to
3264 C<return> has been fixed.  It used to cause C<undef> to be returned in
3265 some cases of a C<return> inside an C<if> block which itself is followed by
3266 another C<return>.
3267
3268 =item *
3269
3270 Calling C<index> with a tainted constant no longer causes constants in
3271 subsequently compiled code to become tainted [perl #64804].
3272
3273 =item *
3274
3275 Infinite loops like C<1 while 1> used to stop C<strict 'subs'> mode from
3276 working for the rest of the block.t
3277
3278 =item *
3279
3280 For list assignments like C<($a,$b) = ($b,$a)>, Perl has to make a copy of
3281 the items on the right-hand side before assignment them to the left.  For
3282 efficiency's sake, it assigns the values on the right straight to the items
3283 on the left if no one variable is mentioned on both sides, as in C<($a,$b) =
3284 ($c,$d)>.  The logic for determining when it can cheat was faulty, in that
3285 C<&&> and C<||> on the right-hand side could fool it.  So C<($a,$b) =
3286 $some_true_value && ($b,$a)> would end up assigning the value of C<$b> to
3287 both scalars.
3288
3289 =item *
3290
3291 Perl no longer tries to apply lvalue context to the string in
3292 C<("string", $variable) ||= 1> (which used to be an error).  Since the
3293 left-hand side of C<||=> is evaluated in scalar context, that's a scalar
3294 comma operator, which gives all but the last item void context.  There is
3295 no such thing as void lvalue context, so it was a mistake for Perl to try
3296 to force it [perl #96942].
3297
3298 =item *
3299
3300 C<caller> no longer leaks memory when called from the DB package if
3301 C<@DB::args> was assigned to after the first call to C<caller>.  L<Carp>
3302 was triggering this bug [perl #97010].
3303
3304 =item *
3305
3306 C<close> and similar filehandle functions, when called on built-in global
3307 variables (like C<$+>), used to die if the variable happened to hold the
3308 undefined value, instead of producing the usual "Use of uninitialized
3309 value" warning.
3310
3311 =item *
3312
3313 When autovivified file handles were introduced in Perl 5.6.0, C<readline>
3314 was inadvertently made to autovivify when called as C<readline($foo)> (but
3315 not as C<E<lt>$fooE<gt>>).  It has now been fixed never to autovivify.
3316
3317 =item *
3318
3319 Calling an undefined anonymous subroutine (e.g., what $x holds after
3320 C<undef &{$x = sub{}}>) used to cause a "Not a CODE reference" error, which
3321 has been corrected to "Undefined subroutine called" [perl #71154].
3322
3323 =item *
3324
3325 Causing C<@DB::args> to be freed between uses of C<caller> no longer
3326 results in a crash [perl #93320].
3327
3328 =item *
3329
3330 C<setpgrp($foo)> used to be equivalent to C<($foo, setpgrp)>, because
3331 C<setpgrp> was ignoring its argument if there was just one.  Now it is
3332 equivalent to C<setpgrp($foo,0)>.
3333
3334 =item *
3335
3336 C<shmread> was not setting the scalar flags correctly when reading from
3337 shared memory, causing the existing cached numeric representation in the
3338 scalar to persist [perl #98480].
3339
3340 =item *
3341
3342 C<++> and C<--> now work on copies of globs, instead of dying.
3343
3344 =item *
3345
3346 C<splice()> doesn't warn when truncating
3347
3348 You can now limit the size of an array using C<splice(@a,MAX_LEN)> without
3349 worrying about warnings.
3350
3351 =item *
3352
3353 C<< $$ >> is no longer tainted.  Since this value comes directly from
3354 C<< getpid() >>, it is always safe.
3355
3356 =item *
3357
3358 The parser no longer leaks a filehandle if STDIN was closed before parsing
3359 started [perl #37033].
3360
3361 =item *
3362
3363 C<< die; >> with a non-reference, non-string, or magical (e.g., tainted)
3364 value in $@ now properly propagates that value [perl #111654].
3365
3366 =back
3367
3368 =head1 Known Problems
3369
3370 =over 4
3371
3372 =item *
3373
3374 On Solaris, we have two kinds of failure.
3375
3376 If F<make> is Sun's F<make≥>, we get an error about a badly formed macro
3377 assignment in the F<Makefile>.  That happens when F<./Configure> tries to
3378 make depends.  F<Configure> then exits  0, but further F<make>-ing fails.
3379
3380 If F<make> is F<gmake>, F<Configure> completes, then we get errors related
3381 to F</usr/include/stdbool.h>
3382
3383 =item *
3384
3385 The following CPAN modules have test failures with perl 5.16.  Patches have
3386 been submitted for all of these, so hopefully there will be new releases
3387 soon:
3388
3389 =over
3390
3391 =item *
3392
3393 L<Date::Pcalc> version 6.1
3394
3395 =item *
3396
3397 L<Module::CPANTS::Analyse> version 0.85
3398
3399 This fails due to problems in L<Module::Find> 0.10 and L<File::MMagic>
3400 1.27.
3401
3402 =item *
3403
3404 L<PerlIO::Util> version 0.72
3405
3406 =back
3407
3408 =back
3409
3410 =head1 Acknowledgements
3411
3412 XXX Generate this with:
3413
3414   perl Porting/acknowledgements.pl v5.14.0..HEAD
3415
3416 =head1 Reporting Bugs
3417
3418 If you find what you think is a bug, you might check the articles
3419 recently posted to the comp.lang.perl.misc newsgroup and the perl
3420 bug database at L<http://rt.perl.org/perlbug/>.  There may also be
3421 information at L<http://www.perl.org/>, the Perl Home Page.
3422
3423 If you believe you have an unreported bug, please run the L<perlbug>
3424 program included with your release.  Be sure to trim your bug down
3425 to a tiny but sufficient test case.  Your bug report, along with the
3426 output of C<perl -V>, will be sent off to perlbug@perl.org to be
3427 analysed by the Perl porting team.
3428
3429 If the bug you are reporting has security implications, which make it
3430 inappropriate to send to a publicly archived mailing list, then please
3431 send it to perl5-security-report@perl.org.  This points to a closed
3432 subscription unarchived mailing list, which includes all the core
3433 committers, who will be able to help assess the impact of issues, figure
3434 out a resolution, and help co-ordinate the release of patches to
3435 mitigate or fix the problem across all platforms on which Perl is
3436 supported.  Please only use this address for security issues in the Perl
3437 core, not for modules independently distributed on CPAN.
3438
3439 =head1 SEE ALSO
3440
3441 The F<Changes> file for an explanation of how to view exhaustive details
3442 on what changed.
3443
3444 The F<INSTALL> file for how to build Perl.
3445
3446 The F<README> file for general stuff.
3447
3448 The F<Artistic> and F<Copying> files for copyright information.
3449
3450 =cut