This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perldelta: Combine some text; delete outdated; add new
[perl5.git] / pod / perldelta.pod
1 =encoding utf8
2
3 =head1 NAME
4
5 perldelta - what is new for perl v5.22.0
6
7 =head1 DESCRIPTION
8
9 This document describes differences between the 5.20.0 release and the 5.22.0
10 release.
11
12 If you are upgrading from an earlier release such as 5.18.0, first read
13 L<perl5200delta>, which describes differences between 5.18.0 and 5.20.0.
14
15 =head1 Core Enhancements
16
17 =head2 New bitwise operators
18
19 A new experimental facility has been added that makes the four standard
20 bitwise operators (C<& | ^ ~>) treat their operands consistently as
21 numbers, and introduces four new dotted operators (C<&. |. ^. ~.>) that
22 treat their operands consistently as strings.  The same applies to the
23 assignment variants (C<&= |= ^= &.= |.= ^.=>).
24
25 To use this, enable the "bitwise" feature and disable the
26 "experimental::bitwise" warnings category.  See L<perlop/Bitwise String
27 Operators> for details.
28 L<[perl #123466]|https://rt.perl.org/Ticket/Display.html?id=123466>.
29
30 =head2 New double-diamond operator
31
32 C<<< <<>> >>> is like C<< <> >> but uses three-argument C<open> to open
33 each file in C<@ARGV>.  This means that each element of C<@ARGV> will be treated
34 as an actual file name, and C<"|foo"> won't be treated as a pipe open.
35
36 =head2 New \b boundaries in regular expressions
37
38 =head3 qr/\b{gcb}/
39
40 C<gcb> stands for Grapheme Cluster Boundary.  It is a Unicode property
41 that finds the boundary between sequences of characters that look like a
42 single character to a native speaker of a language.  Perl has long had
43 the ability to deal with these through the C<\X> regular escape
44 sequence.  Now, there is an alternative way of handling these.  See
45 L<perlrebackslash/\b{}, \b, \B{}, \B> for details.
46
47 =head3 qr/\b{wb}/
48
49 C<wb> stands for Word Boundary.  It is a Unicode property
50 that finds the boundary between words.  This is similar to the plain
51 C<\b> (without braces) but is more suitable for natural language
52 processing.  It knows, for example, that apostrophes can occur in the
53 middle of words.  See L<perlrebackslash/\b{}, \b, \B{}, \B> for details.
54
55 =head3 qr/\b{sb}/
56
57 C<sb> stands for Sentence Boundary.  It is a Unicode property
58 to aid in parsing natural language sentences.
59 See L<perlrebackslash/\b{}, \b, \B{}, \B> for details.
60
61 =head2 C<no re> covers more and is lexical
62
63 Previously running C<no re> would only turn off a few things. Now it
64 turns off all the enabled things. For example, previously, you
65 couldn't turn off debugging, once enabled, inside the same block.
66
67 =head2 Non-Capturing Regular Expression Flag
68
69 Regular expressions now support a C</n> flag that disables capturing
70 and filling in C<$1>, C<$2>, etc... inside of groups:
71
72   "hello" =~ /(hi|hello)/n; # $1 is not set
73
74 This is equivalent to putting C<?:> at the beginning of every capturing group.
75
76 See L<perlre/"n"> for more information.
77
78 =head2 C<use re 'strict'>
79
80 This applies stricter syntax rules to regular expression patterns
81 compiled within its scope, which hopefully will alert you to typos and
82 other unintentional behavior that backwards-compatibility issues prevent
83 us from doing in normal regular expression compilations.  Because the
84 behavior of this is subject to change in future Perl releases as we gain
85 experience, using this pragma will raise a category
86 C<experimental::re_strict> warning.
87 See L<'strict' in re|re/'strict' mode>.
88
89 =head2 C<qr/foo/x> now ignores any Unicode pattern white space
90
91 The C</x> regular expression modifier allows the pattern to contain
92 white space and comments, both of which are ignored, for improved
93 readability.  Until now, not all the white space characters that Unicode
94 designates for this purpose were handled.  The additional ones now
95 recognized are
96 U+0085 NEXT LINE,
97 U+200E LEFT-TO-RIGHT MARK,
98 U+200F RIGHT-TO-LEFT MARK,
99 U+2028 LINE SEPARATOR,
100 and
101 U+2029 PARAGRAPH SEPARATOR.
102
103 =head2 Unicode 7.0 (with correction) is now supported
104
105 For details on what is in this release, see
106 L<http://www.unicode.org/versions/Unicode7.0.0/>.
107 The version of Unicode 7.0 that comes with Perl includes
108 a correction dealing with glyph shaping in Arabic
109 (see L<http://www.unicode.org/errata/#current_errata>).
110
111
112 =head2 S<C<use locale>> can restrict which locale categories are affected
113
114 It is now possible to pass a parameter to S<C<use locale>> to specify
115 a subset of locale categories to be locale-aware, with the remaining
116 ones unaffected.  See L<perllocale/The "use locale" pragma> for details.
117
118 =head2 Perl now supports POSIX 2008 locale currency additions
119
120 On platforms that are able to handle POSIX.1-2008, the
121 hash returned by
122 L<C<POSIX::localeconv()>|perllocale/The localeconv function>
123 includes the international currency fields added by that version of the
124 POSIX standard.  These are
125 C<int_n_cs_precedes>,
126 C<int_n_sep_by_space>,
127 C<int_n_sign_posn>,
128 C<int_p_cs_precedes>,
129 C<int_p_sep_by_space>,
130 and
131 C<int_p_sign_posn>.
132
133 =head2 Better heuristics on older platforms for determining locale UTF8ness
134
135 On platforms that implement neither the C99 standard nor the POSIX 2001
136 standard, determining if the current locale is UTF8 or not depends on
137 heuristics.  These are improved in this release.
138
139 =head2 Aliasing via reference
140
141 Variables and subroutines can now be aliased by assigning to a reference:
142
143     \$c = \$d;
144     \&x = \&y;
145
146 Or by using a backslash before a C<foreach> iterator variable, which is
147 perhaps the most useful idiom this feature provides:
148
149     foreach \%hash (@array_of_hash_refs) { ... }
150
151 This feature is experimental and must be enabled via C<use feature
152 'refaliasing'>.  It will warn unless the C<experimental::refaliasing>
153 warnings category is disabled.
154
155 See L<perlref/Assigning to References>
156
157 =head2 C<prototype> with no arguments
158
159 C<prototype()> with no arguments now infers C<$_>.
160 L<[perl #123514]|https://rt.perl.org/Ticket/Display.html?id=123514>.
161
162 =head2 New "const" subroutine attribute
163
164 The "const" attribute can be applied to an anonymous subroutine.  It causes
165 it to be executed immediately when it is cloned.  Its value is captured and
166 used to create a new constant subroutine that is returned.  This feature is
167 experimental.  See L<perlsub/Constant Functions>.
168
169 =head2 C<fileno> now works on directory handles
170
171 When the relevant support is available in the operating system, the
172 C<fileno> builtin now works on directory handles, yielding the
173 underlying file descriptor in the same way as for filehandles. On
174 operating systems without such support, C<fileno> on a directory handle
175 continues to return the undefined value, as before, but also sets C<$!> to
176 indicate that the operation is not supported.
177
178 Currently, this uses either a C<dd_fd> member in the OS C<DIR>
179 structure, or a C<dirfd(3)> function as specified by POSIX.1-2008.
180
181 =head2 List form of pipe open implemented for Win32
182
183 The list form of pipe:
184
185   open my $fh, "-|", "program", @arguments;
186
187 is now implemented on Win32.  It has the same limitations as C<system
188 LIST> on Win32, since the Win32 API doesn't accept program arguments
189 as a list.
190
191 =head2 C<close> now sets C<$!>
192
193 When an I/O error occurs, the fact that there has been an error is recorded
194 in the handle.  C<close> returns false for such a handle.  Previously, the
195 value of C<$!> would be untouched by C<close>, so the common convention of
196 writing S<C<close $fh or die $!>> did not work reliably.  Now the handle
197 records the value of C<$!>, too, and C<close> restores it.
198
199 =head2 Assignment to list repetition
200
201 C<(...) x ...> can now be used within a list that is assigned to, as long
202 as the left-hand side is a valid lvalue.  This allows S<C<(undef,undef,$foo)
203 = that_function()>> to be written as S<C<((undef)x2, $foo) = that_function()>>.
204
205 =head2 Infinity and NaN (not-a-number) handling improved
206
207 Floating point values are able to hold the special values infinity (also
208 -infinity), and NaN (not-a-number).  Now we more robustly recognize and
209 propagate the value in computations, and on output normalize them to C<Inf> and
210 C<NaN>.
211
212 See also the L<POSIX> enhancements.
213
214 =head2 Floating point parsing has been improved
215
216 Parsing and printing of floating point values has been improved.
217
218 As a completely new feature, hexadecimal floating point literals
219 (like C<0x1.23p-4>)  are now supported, and they can be output with
220 C<printf %a>.
221
222 =head2 Packing infinity or not-a-number into a character is now fatal
223
224 Before, when trying to pack infinity or not-a-number into a
225 (signed) character, Perl would warn, and assumed you tried to
226 pack C<< 0xFF >>; if you gave it as an argument to C<< chr >>,
227 C<< U+FFFD >> was returned.
228
229 But now, all such actions (C<< pack >>, C<< chr >>, and C<< print '%c' >>)
230 result in a fatal error.
231
232 =head2 Experimental C Backtrace API
233
234 Starting from Perl 5.21.1, on some platforms Perl supports retrieving
235 the C level backtrace (similar to what symbolic debuggers like gdb do).
236
237 The backtrace returns the stack trace of the C call frames,
238 with the symbol names (function names), the object names (like "perl"),
239 and if it can, also the source code locations (file:line).
240
241 The supported platforms are Linux and OS X (some *BSD might work at
242 least partly, but they have not yet been tested).
243
244 The feature needs to be enabled with C<Configure -Dusecbacktrace>.
245
246 Also included is a C API to retrieve backtraces.
247
248 See L<perlhacktips/"C backtrace"> for more information.
249
250 =head1 Security
251
252 =head2 Perl is now compiled with -fstack-protector-strong if available
253
254 Perl has been compiled with the anti-stack-smashing option
255 C<-fstack-protector> since 5.10.1.  Now Perl uses the newer variant
256 called C<-fstack-protector-strong>, if available.
257
258 =head2 The L<Safe> module could allow outside packages to be replaced
259
260 Critical bugfix: outside packages could be replaced.  L<Safe> has
261 been patched to 2.38 to address this.
262
263 =head2 Perl is now always compiled with -D_FORTIFY_SOURCE=2 if available
264
265 The 'code hardening' option called C<_FORTIFY_SOURCE>, available in
266 gcc 4.*, is now always used for compiling Perl, if available.
267
268 Note that this isn't necessarily a huge step since in many platforms
269 the step had already been taken several years ago: many Linux
270 distributions (like Fedora) have been using this option for Perl,
271 and OS X has enforced the same for many years.
272
273 =head1 Incompatible Changes
274
275 =head2 Subroutine signatures moved before attributes
276
277 The experimental sub signatures feature, as introduced in 5.20, parsed
278 signatures after attributes.  In this release, the positioning has been
279 moved such that signatures occur after the subroutine name (if any) and
280 before the attribute list (if any).
281
282 =head2 C<&> and C<\&> prototypes accepts only subs
283
284 The C<&> prototype character now accepts only anonymous subs (C<sub {...}>)
285 and things beginning with C<\&>.  Formerly it erroneously also allowed
286 C<undef> and references to array, hashes, and lists.
287 L<[perl #4539]|https://rt.perl.org/Ticket/Display.html?id=4539>.
288 L<[perl #123062]|https://rt.perl.org/Ticket/Display.html?id=123062>.
289
290 The C<\&> prototype was allowing subroutine calls, whereas now it only
291 allows subroutines.  C<&foo> is permitted.  C<&foo()> and C<foo()> are not.
292 L<[perl #77860]|https://rt.perl.org/Ticket/Display.html?id=77860>.
293
294 =head2 C<use encoding> is now lexical
295
296 The L<encoding> pragma's effect is now limited to lexical scope.  This
297 pragma is deprecated, but in the meantime, it could adversely affect
298 unrelated modules that are included in the same program.
299
300 =head2 List slices returning empty lists
301
302 List slices return an empty list now only if the original list was empty
303 (or if there are no indices).  Formerly, a list slice would return an empty
304 list if all indices fell outside the original list.
305 L<[perl #114498]|https://rt.perl.org/Ticket/Display.html?id=114498>.
306
307 =head2 C<\N{}> with a sequence of multiple spaces is now a fatal error
308
309 This has been deprecated since v5.18.
310
311 =head2 S<C<use UNIVERSAL '...'>> is now a fatal error
312
313 Importing functions from C<UNIVERSAL> has been deprecated since v5.12, and
314 is now a fatal error.  S<C<"use UNIVERSAL">> without any arguments is still
315 allowed.
316
317 =head2 In double-quotish C<\cI<X>>, I<X> must now be a printable ASCII character
318
319 In prior releases, failure to do this raised a deprecation warning.
320
321 =head2 Splitting the tokens C<(?> and C<(*> in regular expressions is
322 now a fatal compilation error.
323
324 These had been deprecated since v5.18.
325
326 =head2 5 additional characters are treated as white space under C</x> in
327 regex patterns (unless escaped)
328
329 The use of these characters with C</x> outside bracketed character
330 classes and when not preceded by a backslash has raised a deprecation
331 warning since v5.18.  Now they will be ignored.  See L</"qr/foo/x">
332 for the list of the five characters.
333
334 =head2 Comment lines within S<C<(?[ ])>> now are ended only by a C<\n>
335
336 S<C<(?[ ])>>  is an experimental feature, introduced in v5.18.  It operates
337 as if C</x> is always enabled.  But there was a difference, comment
338 lines (following a C<#> character) were terminated by anything matching
339 C<\R> which includes all vertical whitespace, such as form feeds.  For
340 consistency, this is now changed to match what terminates comment lines
341 outside S<C<(?[ ])>>, namely a C<\n> (even if escaped), which is the
342 same as what terminates a heredoc string and formats.
343
344 =head2 C<(?[...])> operators now follow standard Perl precedence
345
346 This experimental feature allows set operations in regular expression patterns.
347 Prior to this, the intersection operator had the same precedence as the other
348 binary operators.  Now it has higher precedence.  This could lead to different
349 outcomes than existing code expects (though the documentation has always noted
350 that this change might happen, recommending fully parenthesizing the
351 expressions).  See L<perlrecharclass/Extended Bracketed Character Classes>.
352
353 =head2 Omitting C<%> and C<@> on hash and array names is no longer permitted
354
355 Really old Perl let you omit the C<@> on array names and the C<%> on hash
356 names in some spots.  This has issued a deprecation warning since Perl
357 5.000, and is no longer permitted.
358
359 =head2 C<"$!"> text is now in English outside C<"use locale"> scope
360
361 Previously, the text, unlike almost everything else, always came out
362 based on the current underlying locale of the program.  (Also affected
363 on some systems is C<"$^E>".)  For programs that are unprepared to
364 handle locale, this can cause garbage text to be displayed.  It's better
365 to display text that is translatable via some tool than garbage text
366 which is much harder to figure out.
367
368 =head2 C<"$!"> text will be returned in UTF-8 when appropriate
369
370 The stringification of C<$!> and C<$^E> will have the UTF-8 flag set
371 when the text is actually non-ASCII UTF-8.  This will enable programs
372 that are set up to be locale-aware to properly output messages in the
373 user's native language.  Code that needs to continue the 5.20 and
374 earlier behavior can do the stringification within the scopes of both
375 S<C<'use bytes'>> and S<C<'use locale ":messages">>.  No other Perl
376 operations will
377 be affected by locale; only C<$!> and C<$^E> stringification.  The
378 'bytes' pragma causes the UTF-8 flag to not be set, just as in previous
379 Perl releases.  This resolves
380 L<[perl #112208]|https://rt.perl.org/Ticket/Display.html?id=112208>.
381
382 =head2 Support for C<?PATTERN?> without explicit operator has been removed
383
384 Starting regular expressions matching only once directly with the
385 question mark delimiter is now a syntax error, so that the question mark
386 can be available for use in new operators.  Write C<m?PATTERN?> instead,
387 explicitly using the C<m> operator: the question mark delimiter still
388 invokes match-once behaviour.
389
390 =head2 C<defined(@array)> and C<defined(%hash)> are now fatal errors
391
392 These have been deprecated since v5.6.1 and have raised deprecation
393 warnings since v5.16.
394
395 =head2 Using a hash or an array as a reference are now fatal errors
396
397 For example, C<%foo-E<gt>{"bar"}> now causes a fatal compilation
398 error.  These have been deprecated since before v5.8, and have raised
399 deprecation warnings since then.
400
401 =head2 Changes to the C<*> prototype
402
403 The C<*> character in a subroutine's prototype used to allow barewords to take
404 precedence over most, but not all subroutines.  It was never consistent and
405 exhibited buggy behaviour.
406
407 Now it has been changed, so subroutines always take precedence over barewords,
408 which brings it into conformity with similarly prototyped built-in functions:
409
410     sub splat(*) { ... }
411     sub foo { ... }
412     splat(foo); # now always splat(foo())
413     splat(bar); # still splat('bar') as before
414     close(foo); # close(foo())
415     close(bar); # close('bar')
416
417 =head1 Deprecations
418
419 =head2 Setting C<${^ENCODING}> to anything but C<undef>
420
421 This variable allows Perl scripts to be written in a non-ASCII,
422 non-UTF-8 encoding.  However, it affects all modules globally, leading
423 to wrong answers and segmentation faults.  New scripts should be written
424 in UTF-8; old scripts should be converted to UTF-8, which is easily done
425 with the L<encoding> pragma.
426
427 =head2 C<< /\C/ >> character class
428
429 This character class, which matches a single byte, even if it appears
430 in a multi-byte character has been deprecated. Matching single bytes
431 in a multi-byte character breaks encapsulation, and can corrupt utf8
432 strings.
433
434 =head2 Use of non-graphic characters in single-character variable names
435
436 The syntax for single-character variable names is more lenient than
437 for longer variable names, allowing the one-character name to be a
438 punctuation character or even invisible (a non-graphic).  Perl v5.20
439 deprecated the ASCII-range controls as such a name.  Now, all
440 non-graphic characters that formerly were allowed are deprecated.
441 The practical effect of this occurs only when not under C<S<"use
442 utf8">>, and affects just the C1 controls (code points 0x80 through
443 0xFF), NO-BREAK SPACE, and SOFT HYPHEN.
444
445 =head2 Inlining of C<sub () { $var }> with observable side-effects
446
447 In many cases Perl makes S<C<sub () { $var }>> into an inlinable constant
448 subroutine, capturing the value of C<$var> at the time the C<sub> expression
449 is evaluated.  This can break the closure behaviour in those cases where
450 C<$var> is subsequently modified.  The subroutine won't return the new value.
451
452 This usage is now deprecated in those cases where the variable could be
453 modified elsewhere.  Perl detects those cases and emits a deprecation
454 warning.  Such code will likely change in the future and stop producing a
455 constant.
456
457 If your variable is only modified in the place where it is declared, then
458 Perl will continue to make the sub inlinable with no warnings.
459
460     sub make_constant {
461         my $var = shift;
462         return sub () { $var }; # fine
463     }
464
465     sub make_constant_deprecated {
466         my $var;
467         $var = shift;
468         return sub () { $var }; # deprecated
469     }
470
471     sub make_constant_deprecated2 {
472         my $var = shift;
473         log_that_value($var); # could modify $var
474         return sub () { $var }; # deprecated
475     }
476
477 In the second example above, detecting that C<$var> is assigned to only once
478 is too hard to detect.  That it happens in a spot other than the C<my>
479 declaration is enough for Perl to find it suspicious.
480
481 This deprecation warning happens only for a simple variable for the body of
482 the sub.  (A C<BEGIN> block or C<use> statement inside the sub is ignored,
483 because it does not become part of the sub's body.)  For more complex
484 cases, such as S<C<sub () { do_something() if 0; $var }>> the behaviour has
485 changed such that inlining does not happen if the variable is modifiable
486 elsewhere.  Such cases should be rare.
487
488 =head2 Use of multiple /x regexp modifiers
489
490 It is now deprecated to say something like any of the following:
491
492     qr/foo/xx;
493     /(?xax:foo)/;
494     use re qw(/amxx);
495
496 That is, now C<x> should only occur once in any string of contiguous
497 regular expression pattern modifiers.  We do not believe there are any
498 occurrences of this in all of CPAN.  This is in preparation for a future
499 Perl release having C</xx> mean to allow white-space for readability in
500 bracketed character classes (those enclosed in square brackets:
501 C<[...]>).
502
503 =head2 Using a NO-BREAK space in a character alias for C<\N{...}> is now
504 deprecated
505
506 This non-graphic character is essentially indistinguishable from a
507 regular space, and so should not be allowed.  See
508 L<charnames/CUSTOM ALIASES>.
509
510 =head2 A literal C<"{"> should now be escaped in a pattern
511
512 If you want a literal left curly bracket (also called a left brace) in a
513 regular expression pattern, you should now escape it by either
514 preceding it with a backslash (C<"\{">) or enclosing it within square
515 brackets C<"[{]">, or by using C<\Q>; otherwise a deprecation warning
516 will be raised.  This was first announced as forthcoming in the v5.16
517 release; it will allow future extensions to the language to happen.
518
519 =head2 Making all warnings fatal is discouraged
520
521 The documentation for L<fatal warnings|warnings/Fatal Warnings> notes that
522 C<< use warnings FATAL => 'all' >> is discouraged and provides stronger
523 language about the risks of fatal warnings in general.
524
525 =head1 Performance Enhancements
526
527 =over 4
528
529 =item *
530
531 If method and class names are known at compile time, hashes are precomputed
532 to speed up run-time method lookup.  Also, compound method names like
533 C<SUPER::new> are parsed at compile time, to save having to parse them at
534 run time.
535
536 =item *
537
538 Array and hash lookups (especially nested ones) that use only constants
539 or simple variables as keys, are now considerably faster. See
540 L</Internal Changes> for more details.
541
542 =item *
543
544 C<(...)x1>, C<("constant")x0> and C<($scalar)x0> are now optimised in list
545 context.  If the right-hand argument is a constant 1, the repetition
546 operator disappears.  If the right-hand argument is a constant 0, the whole
547 expression is optimised to the empty list, so long as the left-hand
548 argument is a simple scalar or constant.  C<(foo())x0> is not optimised.
549
550 =item *
551
552 C<substr> assignment is now optimised into 4-argument C<substr> at the end
553 of a subroutine (or as the argument to C<return>).  Previously, this
554 optimisation only happened in void context.
555
556 =item *
557
558 Assignment to lexical variables is often optimised away.  For instance, in
559 C<$lexical = chr $foo>, the C<chr> operator writes directly to the lexical
560 variable instead of returning a value that gets copied.  This optimisation
561 has been extended to C<split>, C<x> and C<vec> on the right-hand side.  It
562 has also been made to work with state variable initialization.
563
564 =item *
565
566 In "C<\L>...", "C<\Q>...", etc., the extra "stringify" op is now optimised away,
567 making these just as fast as C<lcfirst>, C<quotemeta>, etc.
568
569 =item *
570
571 Assignment to an empty list is now sometimes faster.  In particular, it
572 never calls C<FETCH> on tied arguments on the right-hand side, whereas it
573 used to sometimes.
574
575 =item *
576
577 C<length> is up to 20% faster for non-magical/non-tied scalars containing a
578 string if it is a non-utf8 string or if is in scope of C<use bytes>.
579
580 =item *
581
582 Non-magical/non-tied scalars that contain only a floating point value and are
583 on most Perl builds with 64 bit integers now use 8-32 less bytes of memory
584 depending on OS.
585
586 =item *
587
588 In C<@array = split>, the assignment can be optimized away with C<split>
589 writing directly to the array.  This optimisation was happening only for
590 package arrays other than C<@_> and only
591 sometimes.  Now this optimisation happens
592 almost all the time.
593
594 =item *
595
596 C<join> is now subject to constant folding.  Moreover, C<join> with a
597 scalar or constant for the separator and a single-item list to join is
598 simplified to a stringification.  The separator doesn't even get evaluated.
599
600 =item *
601
602 C<qq(@array)> is implemented using two ops: a stringify op and a join op.
603 If the C<qq> contains nothing but a single array, the stringification is
604 optimized away.
605
606 =item *
607
608 S<C<our $var>> and S<C<our($s,@a,%h)>> in void context are no longer evaluated at
609 run time.  Even a whole sequence of S<C<our $foo;>> statements will simply be
610 skipped over.  The same applies to C<state> variables.
611
612 =item *
613
614 Many internal functions have been refactored to improve performance and reduce
615 their memory footprints.
616 L<[perl #121436]|https://rt.perl.org/Ticket/Display.html?id=121436>
617 L<[perl #121906]|https://rt.perl.org/Ticket/Display.html?id=121906>
618 L<[perl #121969]|https://rt.perl.org/Ticket/Display.html?id=121969>
619
620 =item *
621
622 C<-T> and C<-B> filetests will return sooner when an empty file is detected.
623 L<[perl #121489]|https://rt.perl.org/Ticket/Display.html?id=121489>
624
625 =item *
626
627 Refactoring of C<< pp_tied >> and C<< pp_ref >> for small improvements.
628
629 =item *
630
631 Pathtools don't try to load XS on miniperl.
632
633 =item *
634
635 A typo fix reduces the size of the C<< OP >> structure.
636
637 =item *
638
639 Hash lookups where the key is a constant are faster.
640
641 =item *
642
643 Subroutines with an empty prototype and bodies containing just C<undef> are now
644 eligible for inlining.
645 L<[perl #122728]|https://rt.perl.org/Ticket/Display.html?id=122728>
646
647 =item *
648
649 Subroutines in packages no longer need to carry typeglobs around with them.
650 Declaring a subroutine will now put a simple sub reference in the stash if
651 possible, saving memory.  The typeglobs still notionally exist, so accessing
652 them will cause the subroutine reference to be upgraded to a typeglob.  This
653 optimization does not currently apply to XSUBs or exported subroutines, and
654 method calls will undo it, since they cache things in typeglobs.
655 L<[perl #120441]|https://rt.perl.org/Ticket/Display.html?id=120441>
656
657 =item *
658
659 The functions C<utf8::native_to_unicode()> and C<utf8::unicode_to_native()>
660 (see L<utf8>) are now optimized out on ASCII platforms.  There is now not even
661 a minimal performance hit in writing code portable between ASCII and EBCDIC
662 platforms.
663
664 =item *
665
666 Win32 Perl uses 8 KB less of per-process memory than before for every perl
667 process of this version. This data is now memory mapped from disk and shared
668 between perl processes from the same perl binary.
669
670 =back
671
672 =head1 Modules and Pragmata
673
674 XXX All changes to installed files in F<cpan/>, F<dist/>, F<ext/> and F<lib/>
675 go here.  If Module::CoreList is updated, generate an initial draft of the
676 following sections using F<Porting/corelist-perldelta.pl>.  A paragraph summary
677 for important changes should then be added by hand.  In an ideal world,
678 dual-life modules would have a F<Changes> file that could be cribbed.
679
680 [ Within each section, list entries as a =item entry ]
681
682 =head2 New Modules and Pragmata
683
684 =over 4
685
686 =item *
687
688 XXX
689
690 =back
691
692 =head2 Updated Modules and Pragmata
693
694 =over 4
695
696 =item *
697
698 L<XXX> has been upgraded from version A.xx to B.yy.
699
700 =back
701
702 =head2 Removed Modules and Pragmata
703
704 =over 4
705
706 =item *
707
708 XXX
709
710 =back
711
712 =head1 Documentation
713
714 =head2 New Documentation
715
716 =head3 L<perlunicook>
717
718 This document, by Tom Christiansen, provides examples of handling Unicode in
719 Perl.
720
721 =head2 Changes to Existing Documentation
722
723 =head3 L<perlapi>
724
725 =over 4
726
727 =item *
728
729 Note that C<SvSetSV> doesn't do set magic.
730
731 =item *
732
733 C<sv_usepvn_flags> - Fix documentation to mention the use of C<NewX> instead of
734 C<malloc>.
735
736 L<[perl #121869]|https://rt.perl.org/Ticket/Display.html?id=121869>
737
738 =item *
739
740 Clarify where C<NUL> may be embedded or is required to terminate a string.
741
742 =item *
743
744 Previously missing documentation due to formatting errors are now included.
745
746 =item *
747
748 Entries are now organized into groups rather than by file where they are found.
749
750 =item *
751
752 Alphabetical sorting of entries is now handled by the POD generator to make
753 entries easier to find when scanning.
754
755 =back
756
757 =head3 L<perldata>
758
759 =over 4
760
761 =item *
762
763 The syntax of single-character variable names has been brought
764 up-to-date and more fully explained.
765
766 =back
767
768 =head3 L<perlebcdic>
769
770 =over 4
771
772 =item *
773
774 This document has been significantly updated in the light of recent
775 improvements to EBCDIC support.
776
777 =back
778
779 =head3 L<perlfunc>
780
781 =over 4
782
783 =item *
784
785 Mention that C<study()> is currently a no-op.
786
787 =item *
788
789 Calling C<delete> or C<exists> on array values is now described as "strongly
790 discouraged" rather than "deprecated".
791
792 =item *
793
794 Improve documentation of C<< our >>.
795
796 =item *
797
798 C<-l> now notes that it will return false if symlinks aren't supported by the
799 file system.
800
801 L<[perl #121523]|https://rt.perl.org/Ticket/Display.html?id=121523>
802
803 =item *
804
805 Note that C<exec LIST> and C<system LIST> may fall back to the shell on
806 Win32. Only C<exec PROGRAM LIST> and C<system PROGRAM LIST> indirect object
807 syntax will reliably avoid using the shell.
808
809 This has also been noted in L<perlport>.
810
811 L<[perl #122046]|https://rt.perl.org/Ticket/Display.html?id=122046>
812
813 =back
814
815 =head3 L<perlguts>
816
817 =over 4
818
819 =item *
820
821 The OOK example has been updated to account for COW changes and a change in the
822 storage of the offset.
823
824 =item *
825
826 Details on C level symbols and libperl.t added.
827
828 =item *
829
830 Information on Unicode handling has been added
831
832 =item *
833
834 Information on EBCDIC handling has been added
835
836 =back
837
838 =head3 L<perlhacktips>
839
840 =over 4
841
842 =item *
843
844 Documentation has been added illustrating the perils of assuming the contents
845 of static memory pointed to by the return values of Perl wrappers for C library
846 functions doesn't change.
847
848 =item *
849
850 Recommended replacements for tmpfile, atoi, strtol, and strtoul added.
851
852 =item *
853
854 Updated documentation for the C<test.valgrind> C<make> target.
855
856 L<[perl #121431]|https://rt.perl.org/Ticket/Display.html?id=121431>
857
858 =back
859
860 =head3 L<perlmodstyle>
861
862 =over 4
863
864 =item *
865
866 Instead of pointing to the module list, we are now pointing to
867 L<PrePAN|http://prepan.org/>.
868
869 =back
870
871 =head3 L<perlpolicy>
872
873 =over 4
874
875 =item *
876
877 We now have a code of conduct for the I<< p5p >> mailing list, as documented
878 in L<< perlpolicy/STANDARDS OF CONDUCT >>.
879
880 =item *
881
882 The conditions for marking an experimental feature as non-experimental are now
883 set out.
884
885 =back
886
887 =head3 L<perlport>
888
889 =over 4
890
891 =item *
892
893 Out-of-date VMS-specific information has been fixed/simplified.
894
895 =item *
896
897 Notes about EBCDIC have been added.
898
899 =back
900
901 =head3 L<perlre>
902
903 =over 4
904
905 =item *
906
907 The C</x> modifier has been clarified to note that comments cannot be continued
908 onto the next line by escaping them.
909
910 =back
911
912 =head3 L<perlrebackslash>
913
914 =over 4
915
916 =item *
917
918 Added documentation of C<\b{sb}>, C<\b{wb}>, C<\b{gcb}>, and C<\b{g}>.
919
920 =back
921
922 =head3 L<perlrecharclass>
923
924 =over 4
925
926 =item *
927
928 Clarifications have been added to L<perlrecharclass/Character Ranges>
929 to the effect that Perl guarantees that C<[A-Z]>, C<[a-z]>, C<[0-9]> and
930 any subranges thereof in regular expression bracketed character classes
931 are guaranteed to match exactly what a naive English speaker would
932 expect them to match, even on platforms (such as EBCDIC) where special
933 handling is required to accomplish this.
934
935 =item *
936
937 The documentation of Bracketed Character Classes has been expanded to cover the
938 improvements in C<qr/[\N{named sequence}]/> (see under L</Selected Bug Fixes>).
939
940 =back
941
942 =head3 L<perlsec>
943
944 =over 4
945
946 =item *
947
948 Comments added on algorithmic complexity and tied hashes.
949
950 =back
951
952 =head3 L<perlsyn>
953
954 =over 4
955
956 =item *
957
958 An ambiguity in the documentation of the C<...> statement has been corrected.
959 L<[perl #122661]|https://rt.perl.org/Ticket/Display.html?id=122661>
960
961 =item *
962
963 The empty conditional in C<< for >> and C<< while >> is now documented
964 in L<< perlsyn >>.
965
966 =back
967
968 =head3 L<perlunicode>
969
970 =over 4
971
972 =item *
973
974 This has had extensive revisions to bring it up-to-date with current
975 Unicode support and to make it more readable.
976
977 =back
978
979 =head3 L<perluniintro>
980
981 =over 4
982
983 =item *
984
985 Advice for how to make sure your strings and regular expression patterns are
986 interpreted as Unicode has been updated.
987
988 =back
989
990 =head3 L<perlvar>
991
992 =over 4
993
994 =item *
995
996 Further clarify version number representations and usage.
997
998 =back
999
1000 =head3 L<perlvms>
1001
1002 =over 4
1003
1004 =item *
1005
1006 Out-of-date and/or incorrect material has been removed.
1007
1008 =item *
1009
1010 Updated documentation on environment and shell interaction in VMS.
1011
1012 =back
1013
1014 =head3 L<perlxs>
1015
1016 =over 4
1017
1018 =item *
1019
1020 Added a discussion of locale issues in XS code.
1021
1022 =back
1023
1024 =head1 Diagnostics
1025
1026 The following additions or changes have been made to diagnostic output,
1027 including warnings and fatal error messages.  For the complete list of
1028 diagnostic messages, see L<perldiag>.
1029
1030 =head2 New Diagnostics
1031
1032 =head3 New Errors
1033
1034 =over 4
1035
1036 =item *
1037
1038 L<Bad symbol for scalar|perldiag/"Bad symbol for scalar">
1039
1040 (P) An internal request asked to add a scalar entry to something that
1041 wasn't a symbol table entry.
1042
1043 =item *
1044
1045 L<Can't use a hash as a reference|perldiag/"Can't use a hash as a reference">
1046
1047 (F) You tried to use a hash as a reference, as in
1048 C<< %foo->{"bar"} >> or C<< %$ref->{"hello"} >>.  Versions of perl E<lt>= 5.6.1
1049 used to allow this syntax, but shouldn't have.
1050
1051 =item *
1052
1053 L<Can't use an array as a reference|perldiag/"Can't use an array as a reference">
1054
1055 (F) You tried to use an array as a reference, as in
1056 C<< @foo->[23] >> or C<< @$ref->[99] >>.  Versions of perl E<lt>= 5.6.1 used to
1057 allow this syntax, but shouldn't have.
1058
1059 =item *
1060
1061 L<Can't use 'defined(@array)' (Maybe you should just omit the defined()?)|perldiag/"Can't use 'defined(@array)' (Maybe you should just omit the defined()?)">
1062
1063 (F) C<defined()> is not useful on arrays because it
1064 checks for an undefined I<scalar> value.  If you want to see if the
1065 array is empty, just use S<C<if (@array) { # not empty }>> for example.
1066
1067 =item *
1068
1069 L<Can't use 'defined(%hash)' (Maybe you should just omit the defined()?)|perldiag/"Can't use 'defined(%hash)' (Maybe you should just omit the defined()?)">
1070
1071 (F) C<defined()> is not usually right on hashes.
1072
1073 Although S<C<defined %hash>> is false on a plain not-yet-used hash, it
1074 becomes true in several non-obvious circumstances, including iterators,
1075 weak references, stash names, even remaining true after S<C<undef %hash>>.
1076 These things make S<C<defined %hash>> fairly useless in practice, so it now
1077 generates a fatal error.
1078
1079 If a check for non-empty is what you wanted then just put it in boolean
1080 context (see L<perldata/Scalar values>):
1081
1082     if (%hash) {
1083        # not empty
1084     }
1085
1086 If you had S<C<defined %Foo::Bar::QUUX>> to check whether such a package
1087 variable exists then that's never really been reliable, and isn't
1088 a good way to enquire about the features of a package, or whether
1089 it's loaded, etc.
1090
1091 =item *
1092
1093 L<Cannot chr %f|perldiag/"Cannot chr %f">
1094
1095 (F) You passed an invalid number (like an infinity or not-a-number) to
1096 C<chr>.
1097
1098 =item *
1099
1100 L<Cannot compress %f in pack|perldiag/"Cannot compress %f in pack">
1101
1102 (F) You tried converting an infinity or not-a-number to an unsigned
1103 character, which makes no sense.
1104
1105 =item *
1106
1107 L<Cannot pack %f with '%c'|perldiag/"Cannot pack %f with '%c'">
1108
1109 (F) You tried converting an infinity or not-a-number to a character,
1110 which makes no sense.
1111
1112 =item *
1113
1114 L<Cannot print %f with '%c'|perldiag/"Cannot printf %f with '%c'">
1115
1116 (F) You tried printing an infinity or not-a-number as a character (C<%c>),
1117 which makes no sense.  Maybe you meant C<'%s'>, or just stringifying it?
1118
1119 =item *
1120
1121 L<charnames alias definitions may not contain a sequence of multiple spaces|perldiag/"charnames alias definitions may not contain a sequence of multiple spaces">
1122
1123 (F) You defined a character name which had multiple space
1124 characters in a row.  Change them to single spaces.  Usually these
1125 names are defined in the C<:alias> import argument to C<use charnames>, but
1126 they could be defined by a translator installed into C<$^H{charnames}>.
1127 See L<charnames/CUSTOM ALIASES>.
1128
1129 =item *
1130
1131 L<charnames alias definitions may not contain trailing white-space|perldiag/"charnames alias definitions may not contain trailing white-space">
1132
1133 (F) You defined a character name which ended in a space
1134 character.  Remove the trailing space(s).  Usually these names are
1135 defined in the C<:alias> import argument to C<use charnames>, but they
1136 could be defined by a translator installed into C<$^H{charnames}>.
1137 See L<charnames/CUSTOM ALIASES>.
1138
1139 =item *
1140
1141 L<:const is not permitted on named subroutines|perldiag/":const is not permitted on named subroutines">
1142
1143 (F) The "const" attribute causes an anonymous subroutine to be run and
1144 its value captured at the time that it is cloned.  Names subroutines are
1145 not cloned like this, so the attribute does not make sense on them.
1146
1147 =item *
1148
1149 L<Hexadecimal float: internal error|perldiag/"Hexadecimal float: internal error">
1150
1151 (F) Something went horribly bad in hexadecimal float handling.
1152
1153 =item *
1154
1155 L<Hexadecimal float: unsupported long double format|perldiag/"Hexadecimal float: unsupported long double format">
1156
1157 (F) You have configured Perl to use long doubles but
1158 the internals of the long double format are unknown,
1159 therefore the hexadecimal float output is impossible.
1160
1161 =item *
1162
1163 L<Illegal suidscript|perldiag/"Illegal suidscript">
1164
1165 (F) The script run under suidperl was somehow illegal.
1166
1167 =item *
1168
1169 L<In '(?...)', the '(' and '?' must be adjacent in regex; marked by S<<-- HERE> in mE<sol>%sE<sol>|perldiag/"In '(?...)', the '(' and '?' must be adjacent in regex; marked by <-- HERE in m/%s/">
1170
1171 (F) The two-character sequence C<"(?"> in
1172 this context in a regular expression pattern should be an
1173 indivisible token, with nothing intervening between the C<"(">
1174 and the C<"?">, but you separated them.
1175
1176 =item *
1177
1178 L<In '(*VERB...)', the '(' and '*' must be adjacent in regex; marked by S<<-- HERE> in mE<sol>%sE<sol>|perldiag/"In '(*VERB...)', the '(' and '*' must be adjacent in regex; marked by <-- HERE in m/%s/">
1179
1180 (F) The two-character sequence C<"(*"> in
1181 this context in a regular expression pattern should be an
1182 indivisible token, with nothing intervening between the C<"(">
1183 and the C<"*">, but you separated them.
1184
1185 =item *
1186
1187 L<Invalid quantifier in {,} in regex; marked by <-- HERE in mE<sol>%sE<sol>|perldiag/"Invalid quantifier in {,} in regex; marked by <-- HERE in m/%s/">
1188
1189 (F) The pattern looks like a {min,max} quantifier, but the min or max could not
1190 be parsed as a valid number - either it has leading zeroes, or it represents
1191 too big a number to cope with.  The S<<-- HERE> shows where in the regular
1192 expression the problem was discovered.  See L<perlre>.
1193
1194 =back
1195
1196 =head3 New Warnings
1197
1198 =over 4
1199
1200 =item *
1201
1202 L<'%s' is an unknown bound type in regex|perldiag/"'%s' is an unknown bound type in regex; marked by <-- HERE in m/%s/">
1203
1204 You used C<\b{...}> or C<\B{...}> and the C<...> is not known to
1205 Perl.  The current valid ones are given in
1206 L<perlrebackslash/\b{}, \b, \B{}, \B>.
1207
1208 =item *
1209
1210 L<"%s" is more clearly written simply as "%s" in regex; marked by E<lt>-- HERE in mE<sol>%sE<sol>|perldiag/"%s" is more clearly written simply as "%s" in regex; marked by <-- HERE in mE<sol>%sE<sol>>
1211
1212 (W regexp) (only under C<S<use re 'strict'>> or within C<(?[...])>)
1213
1214 You specified a character that has the given plainer way of writing it,
1215 and which is also portable to platforms running with different character
1216 sets.
1217
1218 =item *
1219
1220 L<Argument "%s" treated as 0 in increment (++)|perldiag/"Argument "%s" treated
1221 as 0 in increment (++)">
1222
1223 (W numeric) The indicated string was fed as an argument to the C<++> operator
1224 which expects either a number or a string matching C</^[a-zA-Z]*[0-9]*\z/>.
1225 See L<perlop/Auto-increment and Auto-decrement> for details.
1226
1227 =item *
1228
1229 L<Both or neither range ends should be Unicode in regex; marked by E<lt>-- HERE in mE<sol>%sE<sol>|perldiag/"Both or neither range ends should be Unicode in regex; marked by <-- HERE in m/%s/">
1230
1231 (W regexp) (only under C<S<use re 'strict'>> or within C<(?[...])>)
1232
1233 In a bracketed character class in a regular expression pattern, you
1234 had a range which has exactly one end of it specified using C<\N{}>, and
1235 the other end is specified using a non-portable mechanism.  Perl treats
1236 the range as a Unicode range, that is, all the characters in it are
1237 considered to be the Unicode characters, and which may be different code
1238 points on some platforms Perl runs on.  For example, C<[\N{U+06}-\x08]>
1239 is treated as if you had instead said C<[\N{U+06}-\N{U+08}]>, that is it
1240 matches the characters whose code points in Unicode are 6, 7, and 8.
1241 But that C<\x08> might indicate that you meant something different, so
1242 the warning gets raised.
1243
1244 =item *
1245
1246 L<:const is experimental|perldiag/":const is experimental">
1247
1248 (S experimental::const_attr) The "const" attribute is experimental.
1249 If you want to use the feature, disable the warning with C<no warnings
1250 'experimental::const_attr'>, but know that in doing so you are taking
1251 the risk that your code may break in a future Perl version.
1252
1253 =item *
1254
1255 L<gmtime(%f) failed|perldiag/"gmtime(%f) failed">
1256
1257 (W overflow) You called C<gmtime> with a number that it could not handle:
1258 too large, too small, or NaN.  The returned value is C<undef>.
1259
1260 =item *
1261
1262 L<Hexadecimal float: exponent overflow|perldiag/"Hexadecimal float: exponent overflow">
1263
1264 (W overflow) The hexadecimal floating point has larger exponent
1265 than the floating point supports.
1266
1267 =item *
1268
1269 L<Hexadecimal float: exponent underflow|perldiag/"Hexadecimal float: exponent underflow">
1270
1271 (W overflow) The hexadecimal floating point has smaller exponent
1272 than the floating point supports.
1273
1274 =item *
1275
1276 L<Hexadecimal float: mantissa overflow|perldiag/"Hexadecimal float: mantissa overflow">
1277
1278 (W overflow) The hexadecimal floating point literal had more bits in
1279 the mantissa (the part between the 0x and the exponent, also known as
1280 the fraction or the significand) than the floating point supports.
1281
1282 =item *
1283
1284 L<Hexadecimal float: precision loss|perldiag/"Hexadecimal float: precision loss">
1285
1286 (W overflow) The hexadecimal floating point had internally more
1287 digits than could be output.  This can be caused by unsupported
1288 long double formats, or by 64-bit integers not being available
1289 (needed to retrieve the digits under some configurations).
1290
1291 =item *
1292
1293 L<localtime(%f) failed|perldiag/"localtime(%f) failed">
1294
1295 (W overflow) You called C<localtime> with a number that it could not handle:
1296 too large, too small, or NaN.  The returned value is C<undef>.
1297
1298 =item *
1299
1300 L<Negative repeat count does nothing|perldiag/"Negative repeat count does nothing">
1301
1302 (W numeric) You tried to execute the
1303 L<C<x>|perlop/Multiplicative Operators> repetition operator fewer than 0
1304 times, which doesn't make sense.
1305
1306 =item *
1307
1308 L<NO-BREAK SPACE in a charnames alias definition is deprecated|perldiag/"NO-BREAK SPACE in a charnames alias definition is deprecated">
1309
1310 (D deprecated) You defined a character name which contained a no-break
1311 space character.  Change it to a regular space.  Usually these names are
1312 defined in the C<:alias> import argument to C<use charnames>, but they
1313 could be defined by a translator installed into C<$^H{charnames}>.  See
1314 L<charnames/CUSTOM ALIASES>.
1315
1316 =item *
1317
1318 L<Non-finite repeat count does nothing|perldiag/"Non-finite repeat count does nothing">
1319
1320 (W numeric) You tried to execute the
1321 L<C<x>|perlop/Multiplicative Operators> repetition operator C<Inf> (or
1322 C<-Inf>) or C<NaN> times, which doesn't make sense.
1323
1324 =item *
1325
1326 L<PerlIO layer ':win32' is experimental|perldiag/"PerlIO layer ':win32' is experimental">
1327
1328 (S experimental::win32_perlio) The C<:win32> PerlIO layer is
1329 experimental.  If you want to take the risk of using this layer,
1330 simply disable this warning:
1331
1332     no warnings "experimental::win32_perlio";
1333
1334 =item *
1335
1336 L<Ranges of ASCII printables should be some subset of "0-9", "A-Z", or "a-z" in regex; marked by E<lt>-- HERE in mE<sol>%sE<sol>|perldiag/"Ranges of ASCII printables should be some subset of "0-9", "A-Z", or "a-z" in regex; marked by <-- HERE in mE<sol>%sE<sol>">
1337
1338 (W regexp) (only under C<S<use re 'strict'>> or within C<(?[...])>)
1339
1340 Stricter rules help to find typos and other errors.  Perhaps you didn't
1341 even intend a range here, if the C<"-"> was meant to be some other
1342 character, or should have been escaped (like C<"\-">).  If you did
1343 intend a range, the one that was used is not portable between ASCII and
1344 EBCDIC platforms, and doesn't have an obvious meaning to a casual
1345 reader.
1346
1347  [3-7]    # OK; Obvious and portable
1348  [d-g]    # OK; Obvious and portable
1349  [A-Y]    # OK; Obvious and portable
1350  [A-z]    # WRONG; Not portable; not clear what is meant
1351  [a-Z]    # WRONG; Not portable; not clear what is meant
1352  [%-.]    # WRONG; Not portable; not clear what is meant
1353  [\x41-Z] # WRONG; Not portable; not obvious to non-geek
1354
1355 (You can force portability by specifying a Unicode range, which means that
1356 the endpoints are specified by
1357 L<C<\N{...}>|perlrecharclass/Character Ranges>, but the meaning may
1358 still not be obvious.)
1359 The stricter rules require that ranges that start or stop with an ASCII
1360 character that is not a control have all their endpoints be a literal
1361 character, and not some escape sequence (like C<"\x41">), and the ranges
1362 must be all digits, or all uppercase letters, or all lowercase letters.
1363
1364 =item *
1365
1366 L<Ranges of digits should be from the same group in regex; marked by E<lt>-- HERE in mE<sol>%sE<sol>|perldiag/"Ranges of digits should be from the same group in regex; marked by <-- HERE in m/%s/">
1367
1368 (W regexp) (only under C<S<use re 'strict'>> or within C<(?[...])>)
1369
1370 Stricter rules help to find typos and other errors.  You included a
1371 range, and at least one of the end points is a decimal digit.  Under the
1372 stricter rules, when this happens, both end points should be digits in
1373 the same group of 10 consecutive digits.
1374
1375 =item *
1376
1377 L<Redundant argument in %s|perldiag/Redundant argument in %s>
1378
1379 (W redundant) You called a function with more arguments than other
1380 arguments you supplied indicated would be needed. Currently only
1381 emitted when a printf-type format required fewer arguments than were
1382 supplied, but might be used in the future for e.g. L<perlfunc/pack>.
1383
1384 The warnings category C<< redundant >> is new. See also
1385 L<[perl #121025]|https://rt.perl.org/Ticket/Display.html?id=121025>.
1386
1387 =item *
1388
1389 L<Use of \b{} for non-UTF-8 locale is wrong.  Assuming a UTF-8 locale|perldiag/"Use of \b{} for non-UTF-8 locale is wrong.  Assuming a UTF-8 locale">
1390
1391 You are matching a regular expression using locale rules,
1392 and a Unicode boundary is being matched, but the locale is not a Unicode
1393 one.  This doesn't make sense.  Perl will continue, assuming a Unicode
1394 (UTF-8) locale, but the results could well be wrong except if the locale
1395 happens to be ISO-8859-1 (Latin1) where this message is spurious and can
1396 be ignored.
1397
1398 =item *
1399
1400 L<< Using E<sol>u for '%s' instead of E<sol>%s in regex; marked by E<lt>-- HERE in mE<sol>%sE<sol>|perldiag/"Using E<sol>u for '%s' instead of E<sol>%s in regex; marked by <-- HERE in mE<sol>%sE<sol>" >>
1401
1402 You used a Unicode boundary (C<\b{...}> or C<\B{...}>) in a
1403 portion of a regular expression where the character set modifiers C</a>
1404 or C</aa> are in effect.  These two modifiers indicate an ASCII
1405 interpretation, and this doesn't make sense for a Unicode definition.
1406 The generated regular expression will compile so that the boundary uses
1407 all of Unicode.  No other portion of the regular expression is affected.
1408
1409 =item *
1410
1411 L<The bitwise feature is experimental|perldiag/"The bitwise feature is experimental">
1412
1413 This warning is emitted if you use bitwise
1414 operators (C<& | ^ ~ &. |. ^. ~.>) with the "bitwise" feature enabled.
1415 Simply suppress the warning if you want to use the feature, but know
1416 that in doing so you are taking the risk of using an experimental
1417 feature which may change or be removed in a future Perl version:
1418
1419     no warnings "experimental::bitwise";
1420     use feature "bitwise";
1421     $x |.= $y;
1422
1423 =item *
1424
1425 L<Unescaped left brace in regex is deprecated, passed through in regex; marked by <-- HERE in mE<sol>%sE<sol>|perldiag/"Unescaped left brace in regex is deprecated, passed through in regex; marked by <-- HERE in m/%s/">
1426
1427 (D deprecated, regexp) You used a literal C<"{"> character in a regular
1428 expression pattern. You should change to use C<"\{"> instead, because a future
1429 version of Perl (tentatively v5.26) will consider this to be a syntax error.  If
1430 the pattern delimiters are also braces, any matching right brace
1431 (C<"}">) should also be escaped to avoid confusing the parser, for
1432 example,
1433
1434     qr{abc\{def\}ghi}
1435
1436 =item *
1437
1438 L<Use of literal non-graphic characters in variable names is deprecated|perldiag/"Use of literal non-graphic characters in variable names is deprecated">
1439
1440 =item *
1441
1442 L<Useless use of attribute "const"|perldiag/Useless use of attribute "const">
1443
1444 (W misc) The "const" attribute has no effect except
1445 on anonymous closure prototypes.  You applied it to
1446 a subroutine via L<attributes.pm|attributes>.  This is only useful
1447 inside an attribute handler for an anonymous subroutine.
1448
1449 =item *
1450
1451 L<E<quot>use re 'strict'E<quot> is experimental|perldiag/"use re 'strict'" is experimental>
1452
1453 (S experimental::re_strict) The things that are different when a regular
1454 expression pattern is compiled under C<'strict'> are subject to change
1455 in future Perl releases in incompatible ways.  This means that a pattern
1456 that compiles today may not in a future Perl release.  This warning is
1457 to alert you to that risk.
1458
1459 =item *
1460
1461 L<Warning: unable to close filehandle %s properly: %s|perldiag/"Warning: unable to close filehandle %s properly: %s">
1462
1463 =item *
1464
1465 L<Wide character (U+%X) in %s|perldiag/"Wide character (U+%X) in %s">
1466
1467 (W locale) While in a single-byte locale (I<i.e.>, a non-UTF-8
1468 one), a multi-byte character was encountered.   Perl considers this
1469 character to be the specified Unicode code point.  Combining non-UTF8
1470 locales and Unicode is dangerous.  Almost certainly some characters
1471 will have two different representations.  For example, in the ISO 8859-7
1472 (Greek) locale, the code point 0xC3 represents a Capital Gamma.  But so
1473 also does 0x393.  This will make string comparisons unreliable.
1474
1475 You likely need to figure out how this multi-byte character got mixed up
1476 with your single-byte locale (or perhaps you thought you had a UTF-8
1477 locale, but Perl disagrees).
1478
1479 =item *
1480
1481 The following two warnings for C<tr///> used to be skipped if the
1482 transliteration contained wide characters, but now they occur regardless of
1483 whether there are wide characters or not:
1484
1485 L<Useless use of E<sol>d modifier in transliteration operator|perldiag/"Useless use of /d modifier in transliteration operator">
1486
1487 L<Replacement list is longer than search list|perldiag/Replacement list is longer than search list>
1488
1489 =item *
1490
1491 A new C<locale> warning category has been created, with the following warning
1492 messages currently in it:
1493
1494 =over 4
1495
1496 =item *
1497
1498 L<Locale '%s' may not work well.%s|perldiag/Locale '%s' may not work well.%s>
1499
1500 =item *
1501
1502 L<Can't do %s("%s") on non-UTF-8 locale; resolved to "%s".|perldiag/Can't do %s("%s") on non-UTF-8 locale; resolved to "%s".>
1503
1504 =back
1505
1506 =back
1507
1508 =head2 Changes to Existing Diagnostics
1509
1510 =over 4
1511
1512 =item *
1513
1514 <> should be quotes
1515
1516 This warning has been changed to
1517 L<< <> at require-statement should be quotes|perldiag/"<> at require-statement should be quotes" >>
1518 to make the issue more identifiable.
1519
1520 =item *
1521
1522 L<Argument "%s" isn't numeric%s|perldiag/"Argument "%s" isn't numeric%s">
1523 now adds the following note:
1524
1525  Note that for the Inf and NaN (infinity and not-a-number) the
1526  definition of "numeric" is somewhat unusual: the strings themselves
1527  (like "Inf") are considered numeric, and anything following them is
1528  considered non-numeric.
1529
1530 =item *
1531
1532 L<Global symbol "%s" requires explicit package name|perldiag/"Global symbol "%s" requires explicit package name (did you forget to declare "my %s"?)">
1533
1534 This message has had '(did you forget to declare "my %s"?)' appended to it, to
1535 make it more helpful to new Perl programmers.
1536 L<[perl #121638]|https://rt.perl.org/Ticket/Display.html?id=121638>
1537
1538 =item *
1539
1540 '"my" variable &foo::bar can't be in a package' has been reworded to say
1541 'subroutine' instead of 'variable'.
1542
1543 =item *
1544
1545 L<\N{} in character class restricted to one character in regex; marked by S<<-- HERE> in mE<sol>%sE<sol>|perldiag/"\N{} in inverted character class or as a range end-point is restricted to one character in regex; marked by <-- HERE in m/%s/">
1546
1547 This message has had 'character class' changed to 'inverted character class or
1548 as a range end-point is' to reflect improvements in C<qr/[\N{named sequence}]/>
1549 (see under L</Selected Bug Fixes>).
1550
1551 =item *
1552
1553 L<panic: frexp|perldiag/"panic: frexp: %f">
1554
1555 This message has had ': C<%f>' appended to it, to show what the offending floating
1556 point number is.
1557
1558 =item *
1559
1560 B<Possible precedence problem on bitwise %c operator> reworded as
1561 L<Possible precedence problem on bitwise %s operator|perldiag/"Possible precedence problem on bitwise %s operator">.
1562
1563 =item *
1564
1565 C<require> with no argument or undef used to warn about a Null filename; now
1566 it dies with C<Missing or undefined argument to require>.
1567
1568 =item *
1569
1570 L<Unsuccessful %s on filename containing newline|perldiag/"Unsuccessful %s on filename containing newline">
1571
1572 This warning is now only produced when the newline is at the end of
1573 the filename.
1574
1575 =item *
1576
1577 "Variable C<%s> will not stay shared" has been changed to say "Subroutine"
1578 when it is actually a lexical sub that will not stay shared.
1579
1580 =item *
1581
1582 L<Variable length lookbehind not implemented in regex mE<sol>%sE<sol>|perldiag/"Variable length lookbehind not implemented in regex m/%s/">
1583
1584 Information about Unicode behaviour has been added.
1585
1586 =back
1587
1588 =head2 Diagnostic Removals
1589
1590 =over
1591
1592 =item *
1593
1594 "Ambiguous use of -foo resolved as -&foo()"
1595
1596 There is actually no ambiguity here, and this impedes the use of negated
1597 constants; e.g., C<-Inf>.
1598
1599 =item *
1600
1601 "Constant is not a FOO reference"
1602
1603 Compile-time checking of constant dereferencing (e.g., C<< my_constant->() >>)
1604 has been removed, since it was not taking overloading into account.
1605 L<[perl #69456]|https://rt.perl.org/Ticket/Display.html?id=69456>
1606 L<[perl #122607]|https://rt.perl.org/Ticket/Display.html?id=122607>
1607
1608 =back
1609
1610 =head1 Utility Changes
1611
1612 =head2 F<x2p/>
1613
1614 =over 4
1615
1616 =item *
1617
1618 The F<x2p/> directory has been removed from the Perl core.
1619
1620 This removes find2perl, s2p and a2p. They have all been released to CPAN as
1621 separate distributions (App::find2perl, App::s2p, App::a2p).
1622
1623 =back
1624
1625 =head2 L<h2ph>
1626
1627 =over 4
1628
1629 =item *
1630
1631 F<h2ph> now handles hexadecimal constants in the compiler's predefined
1632 macro definitions, as visible in C<$Config{cppsymbols}>.
1633 L<[perl #123784]|https://rt.perl.org/Ticket/Display.html?id=123784>.
1634
1635 =back
1636
1637 =head2 L<encguess>
1638
1639 =over 4
1640
1641 =item *
1642
1643 No longer depends on non-core module anymore.
1644
1645 =back
1646
1647 =head1 Configuration and Compilation
1648
1649 =over 4
1650
1651 =item *
1652
1653 F<Configure> now checks for F<lrintl>, F<lroundl>, F<llrintl>, and F<llroundl>.
1654
1655 =item *
1656
1657 F<Configure> with C<-Dmksymlinks> should now be faster.
1658 L<[perl #122002]|https://rt.perl.org/Ticket/Display.html?id=122002>.
1659
1660 =item *
1661
1662 pthreads and lcl will be linked by default if present. This allows XS modules
1663 that require threading to work on non-threaded perls. Note that you must still
1664 pass C<-Dusethreads> if you want a threaded perl.
1665
1666 =item *
1667
1668 For long doubles (to get more precision and range for floating point numbers)
1669 one can now use the GCC quadmath library which implements the quadruple
1670 precision floating point numbers in x86 and ia64 platforms.  See F<INSTALL> for
1671 details.
1672
1673 =item *
1674
1675 MurmurHash64A and MurmurHash64B can now be configured as the internal hash
1676 function.
1677
1678 =item *
1679
1680 C<make test.valgrind> now supports parallel testing.
1681
1682 For example:
1683
1684     TEST_JOBS=9 make test.valgrind
1685
1686 See L<perlhacktips/valgrind> for more information.
1687
1688 L<[perl #121431]|https://rt.perl.org/Ticket/Display.html?id=121431>
1689
1690 =item *
1691
1692 The MAD (Misc Attribute Decoration) build option has been removed
1693
1694 This was an unmaintained attempt at preserving
1695 the Perl parse tree more faithfully so that automatic conversion of
1696 Perl 5 to Perl 6 would have been easier.
1697
1698 This build-time configuration option had been unmaintained for years,
1699 and had probably seriously diverged on both Perl 5 and Perl 6 sides.
1700
1701 =item *
1702
1703 A new compilation flag, C<< -DPERL_OP_PARENT >> is available. For details,
1704 see the discussion below at L<< /Internal Changes >>.
1705
1706 =back
1707
1708 =head1 Testing
1709
1710 =over 4
1711
1712 =item *
1713
1714 F<t/porting/re_context.t> has been added to test that L<utf8> and its
1715 dependencies only use the subset of the C<$1..$n> capture vars that
1716 C<Perl_save_re_context()> is hard-coded to localize, because that function has no
1717 efficient way of determining at runtime what vars to localize.
1718
1719 =item *
1720
1721 Tests for performance issues have been added in the file F<t/perf/taint.t>.
1722
1723 =item *
1724
1725 Some regular expression tests are written in such a way that they will
1726 run very slowly if certain optimizations break. These tests have been
1727 moved into new files, F<< t/re/speed.t >> and F<< t/re/speed_thr.t >>,
1728 and are run with a C<< watchdog() >>.
1729
1730 =item *
1731
1732 C<< test.pl >> now allows C<< plan skip_all => $reason >>, to make it
1733 more compatible with C<< Test::More >>.
1734
1735 =item *
1736
1737 A new test script, F<op/infnan.t>, has been added to test if Inf and NaN are
1738 working correctly.  See L</Infinity and NaN (not-a-number) handling improved>.
1739
1740 =back
1741
1742 =head1 Platform Support
1743
1744 =head2 Regained Platforms
1745
1746 =over 4
1747
1748 =item IRIX and Tru64 platforms are working again.
1749
1750 (Some C<make test> failures remain.)
1751
1752 =item z/OS running EBCDIC Code Page 1047
1753
1754 Core perl now works on this EBCDIC platform.  Earlier perls also worked, but,
1755 even though support wasn't officially withdrawn, recent perls would not compile
1756 and run well.  Perl 5.20 would work, but had many bugs which have now been
1757 fixed.  Many CPAN modules that ship with Perl still fail tests, including
1758 Pod::Simple.  However the version of Pod::Simple currently on CPAN should work;
1759 it was fixed too late to include in Perl 5.22.  Work is under way to fix many
1760 of the still-broken CPAN modules, which likely will be installed on CPAN when
1761 completed, so that you may not have to wait until Perl 5.24 to get a working
1762 version.
1763
1764 =back
1765
1766 =head2 Discontinued Platforms
1767
1768 =over 4
1769
1770 =item NeXTSTEP/OPENSTEP
1771
1772 NeXTSTEP was proprietary OS bundled with NeXT's workstations in the early
1773 to mid 90s; OPENSTEP was an API specification that provided a NeXTSTEP-like
1774 environment on a non-NeXTSTEP system.  Both are now long dead, so support
1775 for building Perl on them has been removed.
1776
1777 =back
1778
1779 =head2 Platform-Specific Notes
1780
1781 =over 4
1782
1783 =item EBCDIC
1784
1785 Special handling is required on EBCDIC platforms to get C<qr/[i-j]/> to
1786 match only C<"i"> and C<"j">, since there are 7 characters between the
1787 code points for C<"i"> and C<"j">.  This special handling had only been
1788 invoked when both ends of the range are literals.  Now it is also
1789 invoked if any of the C<\N{...}> forms for specifying a character by
1790 name or Unicode code point is used instead of a literal.  See
1791 L<perlrecharclass/Character Ranges>.
1792
1793 =item HP-UX
1794
1795 The archname now distinguishes use64bitint from use64bitall.
1796
1797 =item Android
1798
1799 Build support has been improved for cross-compiling in general and for
1800 Android in particular.
1801
1802 =item VMS
1803
1804 =over 4
1805
1806 =item *
1807
1808 When spawning a subprocess without waiting, the return value is now
1809 the correct PID.
1810
1811 =item *
1812
1813 Fix a prototype so linking doesn't fail under the VMS C++ compiler.
1814
1815 =item *
1816
1817 C<finite>, C<finitel>, and C<isfinite> detection has been added to
1818 C<configure.com>, environment handling has had some minor changes, and
1819 a fix for legacy feature checking status.
1820
1821 =back
1822
1823 =item Win32
1824
1825 =over 4
1826
1827 =item *
1828
1829 F<miniperl.exe> is now built with C<-fno-strict-aliasing>, allowing 64-bit
1830 builds to complete on GCC 4.8.
1831 L<[perl #123976]|https://rt.perl.org/Ticket/Display.html?id=123976>
1832
1833 =item *
1834
1835 C<test-prep> again depends on C<test-prep-gcc> for GCC builds.
1836 L<[perl #124221]|https://rt.perl.org/Ticket/Display.html?id=124221>
1837
1838 =item *
1839
1840 Perl can now be built in C++ mode on Windows by setting the makefile macro
1841 C<USE_CPLUSPLUS> to the value "define".
1842
1843 =item *
1844
1845 List form pipe open no longer falls back to the shell.
1846
1847 =item *
1848
1849 In release 5.21.8 compiling on VC with dmake was broken. Fixed.
1850
1851 =item *
1852
1853 New C<DebugSymbols> and C<DebugFull> configuration options added to
1854 Windows makefiles.
1855
1856 =item *
1857
1858 L<B> now compiles again on Windows.
1859
1860 =item *
1861
1862 Previously, on Visual C++ for Win64 built Perls only, when compiling every Perl
1863 XS module (including CPAN ones) and Perl aware .c file with a 64 bit Visual C++,
1864 would unconditionally have around a dozen warnings from hv_func.h.  These
1865 warnings have been silenced.  GCC all bitness and Visual C++ for Win32 were
1866 not affected.
1867
1868 =item *
1869
1870 Support for building without PerlIO has been removed from the Windows
1871 makefiles.  Non-PerlIO builds were all but deprecated in Perl 5.18.0 and are
1872 already not supported by F<Configure> on POSIX systems.
1873
1874 =item *
1875
1876 Between 2 and 6 ms and 7 I/O calls have been saved per attempt to open a perl
1877 module for each path in C<@INC>.
1878
1879 =item *
1880
1881 Intel C builds are now always built with C99 mode on.
1882
1883 =item *
1884
1885 C<%I64d> is now being used instead of C<%lld> for MinGW.
1886
1887 =item *
1888
1889 In the experimental C<:win32> layer, a crash in C<open> was fixed. Also
1890 opening C</dev/null>, which works the Win32 Perl's normal C<:unix> layer, was
1891 implemented for C<:win32>.
1892 L<[perl #122224]|https://rt.perl.org/Ticket/Display.html?id=122224>
1893
1894 =item *
1895
1896 A new makefile option, C<USE_LONG_DOUBLE>, has been added to the Windows
1897 dmake makefile for gcc builds only.  Set this to "define" if you want perl to
1898 use long doubles to give more accuracy and range for floating point numbers.
1899
1900 =back
1901
1902 =item OpenBSD
1903
1904 On OpenBSD, Perl will now default to using the system C<malloc> due to the
1905 security features it provides. Perl's own malloc wrapper has been in use
1906 since v5.14 due to performance reasons, but the OpenBSD project believes
1907 the tradeoff is worth it and would prefer that users who need the speed
1908 specifically ask for it.
1909
1910 L<[perl #122000]|https://rt.perl.org/Ticket/Display.html?id=122000>.
1911
1912 =item Solaris
1913
1914 =over 4
1915
1916 =item *
1917
1918 We now look for the Sun Studio compiler in both F</opt/solstudio*> and
1919 F</opt/solarisstudio*>.
1920
1921 =item *
1922
1923 Builds on Solaris 10 with C<-Dusedtrace> would fail early since make
1924 didn't follow implied dependencies to build C<perldtrace.h>.  Added an
1925 explicit dependency to C<depend>.
1926 L<[perl #120120]|https://rt.perl.org/Ticket/Display.html?id=120120>
1927
1928 =item *
1929
1930 C<c99> options have been cleaned up, hints look for C<solstudio>
1931 as well as C<SUNWspro>, and support for native C<setenv> has been added.
1932
1933 =back
1934
1935 =back
1936
1937 =head1 Internal Changes
1938
1939 =over 4
1940
1941 =item *
1942
1943 Experimental support has been added to allow ops in the optree to locate
1944 their parent, if any. This is enabled by the non-default build option
1945 C<-DPERL_OP_PARENT>. It is envisaged that this will eventually become
1946 enabled by default, so XS code which directly accesses the C<op_silbing>
1947 field of ops should be updated to be future-proofed.
1948
1949 On C<PERL_OP_PARENT> builds, the C<op_sibling> field has been renamed
1950 C<op_sibparent> and a new flag, C<op_moresib>, added. On the last op in a
1951 sibling chain, C<op_moresib> is false and C<op_sibparent> points to the
1952 parent (if any) rather than to being C<NULL>.
1953
1954 To make existing code work transparently whether using C<-DPERL_OP_PARENT>
1955 or not, a number of new macros and functions have been added that should
1956 be used, rather than directly manipulating C<op_sibling>.
1957
1958 For the case of just reading C<op_sibling> to determine the next sibling,
1959 two new macros have been added. A simple scan through a sibling chain
1960 like this:
1961
1962     for (; kid->op_sibling; kid = kid->op_sibling) { ...  }
1963
1964 should now be written as:
1965
1966     for (; OpHAS_SIBLING(kid); kid = OpSIBLING(kid)) { ...  }
1967
1968 For altering optrees, A general-purpose function C<op_sibling_splice()>
1969 has been added, which allows for manipulation of a chain of sibling ops.
1970 By analogy with the Perl function C<splice()>, it allows you to cut out
1971 zero or more ops from a sibling chain and replace them with zero or more
1972 new ops.  It transparently handles all the updating of sibling, parent,
1973 op_last pointers etc.
1974
1975 If you need to manipulate ops at a lower level, then three new macros,
1976 C<OpMORESIB_set>, C<OpLASTSIB_set> and C<OpMAYBESIB_set> are intended to
1977 be a low-level portable way to set C<op_sibling> / C<op_sibparent> while
1978 also updating C<op_moresib>.  The first sets the sibling pointer to a new
1979 sibling, the second makes the op the last sibling, and the third
1980 conditionally does the first or second action.  Note that unlike
1981 C<op_sibling_splice()> these macros won't maintain consistency in the
1982 parent at the same time (e.g. by updating C<op_first> and C<op_last> where
1983 appropriate).
1984
1985 A C-level C<Perl_op_parent()> function and a perl-level C<B::OP::parent()>
1986 method have been added. The C function only exists under
1987 C<-DPERL_OP_PARENT> builds (using it is build-time error on vanilla
1988 perls).  C<B::OP::parent()> exists always, but on a vanilla build it
1989 always returns C<NULL>. Under C<-DPERL_OP_PARENT>, they return the parent
1990 of the current op, if any. The variable C<$B::OP::does_parent> allows you
1991 to determine whether C<B> supports retrieving an op's parent.
1992
1993 C<-DPERL_OP_PARENT> was introduced in 5.21.2, but the interface was
1994 changed considerably in 5.21.11. If you updated your code before the
1995 5.21.11 changes, it may require further revision. The main changes after
1996 5.21.2 were:
1997
1998 =over 4
1999
2000 =item *
2001
2002 The C<OP_SIBLING> and C<OP_HAS_SIBLING> macros have been renamed
2003 C<OpSIBLING> and C<OpHAS_SIBLING> for consistency with other
2004 op-manipulating macros.
2005
2006 =item *
2007
2008 The C<op_lastsib> field has been renamed C<op_moresib>, and its meaning
2009 inverted.
2010
2011 =item *
2012
2013 The macro C<OpSIBLING_set> has been removed, and has been superseded by
2014 C<OpMORESIB_set> et al.
2015
2016 =item *
2017
2018 The C<op_sibling_splice()> function now accepts a null C<parent> argument
2019 where the splicing doesn't affect the first or last ops in the sibling
2020 chain
2021
2022 =back
2023
2024 =item *
2025
2026 Macros have been created to allow XS code to better manipulate the POSIX locale
2027 category C<LC_NUMERIC>.  See L<perlapi/Locale-related functions and macros>.
2028
2029 =item *
2030
2031 The previous C<atoi> et al replacement function, C<grok_atou>, has now been
2032 superseded by C<grok_atoUV>.  See L<perlclib> for details.
2033
2034 =item *
2035
2036 Added C<Perl_sv_get_backrefs()> to determine if an SV is a weak-referent.
2037
2038 Function either returns an SV * of type AV, which contains the set of
2039 weakreferences which reference the passed in SV, or a simple RV * which
2040 is the only weakref to this item.
2041
2042 =item *
2043
2044 C<screaminstr> has been removed. Although marked as public API, it is
2045 undocumented and has no usage in modern perl versions on CPAN Grep. Calling it
2046 has been fatal since 5.17.0.
2047
2048 =item *
2049
2050 C<newDEFSVOP>, C<block_start>, C<block_end> and C<intro_my> have been added
2051 to the API.
2052
2053 =item *
2054
2055 The internal C<convert> function in F<op.c> has been renamed
2056 C<op_convert_list> and added to the API.
2057
2058 =item *
2059
2060 C<sv_magic> no longer forbids "ext" magic on read-only values.  After all,
2061 perl can't know whether the custom magic will modify the SV or not.
2062 L<[perl #123103]|https://rt.perl.org/Ticket/Display.html?id=123103>.
2063
2064 =item *
2065
2066 Starting in 5.21.6, accessing L<perlapi/CvPADLIST> in an XSUB is forbidden.
2067 CvPADLIST has been reused for a different internal purpose for XSUBs. Guard all
2068 CvPADLIST expressions with C<CvISXSUB()> if your code doesn't already block
2069 XSUB CV*s from going through optree CV* expecting code.
2070
2071 =item *
2072
2073 SVs of type SVt_NV are now bodyless when a build configure and platform allow
2074 it, specifically C<sizeof(NV) <= sizeof(IV)>. The bodyless trick is the same one
2075 as for IVs since 5.9.2, but for NVs, unlike IVs, is not guaranteed on all
2076 platforms and build configurations.
2077
2078 =item *
2079
2080 The C<$DB::single>, C<$DB::signal> and C<$DB::trace> now have set and
2081 get magic that stores their values as IVs and those IVs are used when
2082 testing their values in C<pp_dbstate>.  This prevents perl from
2083 recursing infinity if an overloaded object is assigned to any of those
2084 variables.
2085 L<[perl #122445]|https://rt.perl.org/Ticket/Display.html?id=122445>.
2086
2087 =item *
2088
2089 C<Perl_tmps_grow> which is marked as public API but undocumented has been
2090 removed from public API. If you use C<EXTEND_MORTAL> macro in your XS code to
2091 preextend the mortal stack, you are unaffected by this change.
2092
2093 =item *
2094
2095 C<cv_name>, which was introduced in 5.21.4, has been changed incompatibly.
2096 It now has a flags field that allows the caller to specify whether the name
2097 should be fully qualified.  See L<perlapi/cv_name>.
2098
2099 =item *
2100
2101 Internally Perl no longer uses the C<SVs_PADMY> flag.  C<SvPADMY()> now
2102 returns a true value for anything not marked PADTMP.  C<SVs_PADMY> is now
2103 defined as 0.
2104
2105 =item *
2106
2107 The macros SETsv and SETsvUN have been removed. They were no longer used
2108 in the core since commit 6f1401dc2a, and have not been found present on
2109 CPAN.
2110
2111 =item *
2112
2113 The C<< SvFAKE >> bit (unused on HVs) got informally reserved by
2114 David Mitchell for future work on vtables.
2115
2116 =item *
2117
2118 The C<sv_catpvn_flags> function accepts C<SV_CATBYTES> and C<SV_CATUTF8>
2119 flags, which specify whether the appended string is bytes or utf8,
2120 respectively.
2121
2122 =item *
2123
2124 A new opcode class, C<< METHOP >> has been introduced, which holds
2125 class/method related info needed at runtime to improve performance
2126 of class/object method calls.
2127
2128 C<< OP_METHOD >> and C<< OP_METHOD_NAMED >> are moved from being
2129 C<< UNOP/SVOP >> to being C<< METHOP >>.
2130
2131 =item *
2132
2133 C<save_re_context> no longer does anything and has been moved to F<mathoms.c>.
2134
2135 =item *
2136
2137 C<cv_name> is a new API function that can be passed a CV or GV.  It returns an
2138 SV containing the name of the subroutine for use in diagnostics.
2139 L<[perl #116735]|https://rt.perl.org/Ticket/Display.html?id=116735>
2140 L<[perl #120441]|https://rt.perl.org/Ticket/Display.html?id=120441>
2141
2142 =item *
2143
2144 C<cv_set_call_checker_flags> is a new API function that works like
2145 C<cv_set_call_checker>, except that it allows the caller to specify whether the
2146 call checker requires a full GV for reporting the subroutine's name, or whether
2147 it could be passed a CV instead.  Whatever value is passed will be acceptable
2148 to C<cv_name>.  C<cv_set_call_checker> guarantees there will be a GV, but it
2149 may have to create one on the fly, which is inefficient.
2150 L<[perl #116735]|https://rt.perl.org/Ticket/Display.html?id=116735>
2151
2152 =item *
2153
2154 C<CvGV> (which is not part of the API) is now a more complex macro, which may
2155 call a function and reify a GV.  For those cases where is has been used as a
2156 boolean, C<CvHASGV> has been added, which will return true for CVs that
2157 notionally have GVs, but without reifying the GV.  C<CvGV> also returns a GV
2158 now for lexical subs.
2159 L<[perl #120441]|https://rt.perl.org/Ticket/Display.html?id=120441>
2160
2161 =item *
2162
2163 Added L<perlapi/sync_locale>.  Changing the program's locale should be avoided
2164 by XS code.  Nevertheless, certain non-Perl libraries called from XS, such as
2165 C<Gtk> do so.  When this happens, Perl needs to be told that the locale has
2166 changed.  Use this function to do so, before returning to Perl.
2167
2168 =item *
2169
2170 The defines and labels for the flags in the C<op_private> field of OPs are now
2171 auto-generated from data in F<regen/op_private>.  The noticeable effect of this
2172 is that some of the flag output of C<Concise> might differ slightly, and the
2173 flag output of C<perl -Dx> may differ considerably (they both use the same set
2174 of labels now).  Also in debugging builds, there is a new assert in
2175 C<op_free()> that checks that the op doesn't have any unrecognized flags set in
2176 C<op_private>.
2177
2178 =item *
2179
2180 The deprecated variable C<PL_sv_objcount> has been removed.
2181
2182 =item *
2183
2184 Perl now tries to keep the locale category C<LC_NUMERIC> set to "C"
2185 except around operations that need it to be set to the program's
2186 underlying locale.  This protects the many XS modules that cannot cope
2187 with the decimal radix character not being a dot.  Prior to this
2188 release, Perl initialized this category to "C", but a call to
2189 C<POSIX::setlocale()> would change it.  Now such a call will change the
2190 underlying locale of the C<LC_NUMERIC> category for the program, but the
2191 locale exposed to XS code will remain "C".  There are new macros
2192 to manipulate the LC_NUMERIC locale, including
2193 C<STORE_LC_NUMERIC_SET_TO_NEEDED> and
2194 C<STORE_LC_NUMERIC_FORCE_TO_UNDERLYING>.
2195 See L<perlapi/Locale-related functions and macros>.
2196
2197 =item *
2198
2199 A new macro L<C<isUTF8_CHAR>|perlapi/isUTF8_CHAR> has been written which
2200 efficiently determines if the string given by its parameters begins
2201 with a well-formed UTF-8 encoded character.
2202
2203 =item *
2204
2205 The following private API functions had their context parameter removed,
2206 C<Perl_cast_ulong>,  C<Perl_cast_i32>, C<Perl_cast_iv>,    C<Perl_cast_uv>,
2207 C<Perl_cv_const_sv>, C<Perl_mg_find>,  C<Perl_mg_findext>, C<Perl_mg_magical>,
2208 C<Perl_mini_mktime>, C<Perl_my_dirfd>, C<Perl_sv_backoff>, C<Perl_utf8_hop>.
2209
2210 Users of the public API prefix-less calls remain unaffected.
2211
2212 =item *
2213
2214 The PADNAME and PADNAMELIST types are now separate types, and no longer
2215 simply aliases for SV and AV.
2216 L<[perl #123223]|https://rt.perl.org/Ticket/Display.html?id=123223>.
2217
2218 =item *
2219
2220 Pad names are now always UTF8.  The C<PadnameUTF8> macro always returns
2221 true.  Previously, this was effectively the case already, but any support
2222 for two different internal representations of pad names has now been
2223 removed.
2224
2225 =item *
2226
2227 A new op class, C<UNOP_AUX>, has been added. This is a subclass of
2228 C<UNOP> with an C<op_aux> field added, which points to an array of unions
2229 of C<UV>, C<SV*> etc. It is intended for where an op needs to store more data
2230 than a simple C<op_sv> or whatever. Currently the only op of this type is
2231 C<OP_MULTIDEREF> (see below).
2232
2233 =item *
2234
2235 A new op has been added, C<OP_MULTIDEREF>, which performs one or more
2236 nested array and hash lookups where the key is a constant or simple
2237 variable. For example the expression C<$a[0]{$k}[$i]>, which previously
2238 involved ten C<rv2Xv>, C<Xelem>, C<gvsv> and C<const> ops is now performed
2239 by a single C<multideref> op. It can also handle C<local>, C<exists> and
2240 C<delete>. A non-simple index expression, such as C<[$i+1]> is still done
2241 using C<aelem>/C<helem>, and single-level array lookup with a small constant
2242 index is still done using C<aelemfast>.
2243
2244 =back
2245
2246 =head1 Selected Bug Fixes
2247
2248 =over 4
2249
2250 =item *
2251
2252 C<pack("D", $x)> and C<pack("F", $x)> now zero the padding on x86 long double
2253 builds.  GCC 4.8 and later, under some build options, would either overwrite
2254 the zero-initialized padding, or bypass the initialized buffer entirely.  This
2255 caused F<op/pack.t> to fail.
2256 L<[perl #123971]|https://rt.perl.org/Ticket/Display.html?id=123971>
2257
2258 =item *
2259
2260 Extending an array cloned from a parent thread could result in "Modification of
2261 a read-only value attempted" errors when attempting to modify the new elements.
2262 L<[perl #124127]|https://rt.perl.org/Ticket/Display.html?id=124127>
2263
2264 =item *
2265
2266 An assertion failure and subsequent crash with C<< *x=<y> >> has been fixed.
2267 L<[perl #123790]|https://rt.perl.org/Ticket/Display.html?id=123790>
2268
2269 =item *
2270
2271 An optimization for state variable initialization introduced in Perl 5.21.6 has
2272 been reverted because it was found to exacerbate some other existing buggy
2273 behaviour.
2274 L<[perl #124160]|https://rt.perl.org/Ticket/Display.html?id=124160>
2275
2276 =item *
2277
2278 The extension of another optimization to cover more ops in Perl 5.21 has also
2279 been reverted to its Perl 5.20 state as a temporary fix for regression issues
2280 that it caused.
2281 L<[perl #123790]|https://rt.perl.org/Ticket/Display.html?id=123790>
2282
2283 =item *
2284
2285 New bitwise ops added in Perl 5.21.9 accidentally caused C<$^H |= 0x1c020000>
2286 to enable all features.  This has now been fixed.
2287
2288 =item *
2289
2290 A possible crashing/looping bug has been fixed.
2291 L<[perl #124099]|https://rt.perl.org/Ticket/Display.html?id=124099>
2292
2293 =item *
2294
2295 UTF-8 variable names used in array indexes, unquoted UTF-8 HERE-document
2296 terminators and UTF-8 function names all now work correctly.
2297 L<[perl #124113]|https://rt.perl.org/Ticket/Display.html?id=124113>
2298
2299 =item *
2300
2301 Repeated global pattern matches in scalar context on large tainted strings were
2302 exponentially slow depending on the current match position in the string.
2303 L<[perl #123202]|https://rt.perl.org/Ticket/Display.html?id=123202>
2304
2305 =item *
2306
2307 Various crashes due to the parser getting confused by syntax errors have been
2308 fixed.
2309 L<[perl #123801]|https://rt.perl.org/Ticket/Display.html?id=123801>
2310 L<[perl #123802]|https://rt.perl.org/Ticket/Display.html?id=123802>
2311 L<[perl #123955]|https://rt.perl.org/Ticket/Display.html?id=123955>
2312 L<[perl #123995]|https://rt.perl.org/Ticket/Display.html?id=123995>
2313
2314 =item *
2315
2316 C<split> in the scope of lexical C<$>_ has been fixed not to fail assertions.
2317 L<[perl #123763]|https://rt.perl.org/Ticket/Display.html?id=123763>
2318
2319 =item *
2320
2321 C<my $x : attr> syntax inside various list operators no longer fails
2322 assertions.
2323 L<[perl #123817]|https://rt.perl.org/Ticket/Display.html?id=123817>
2324
2325 =item *
2326
2327 An C<@> sign in quotes followed by a non-ASCII digit (which is not a valid
2328 identifier) would cause the parser to crash, instead of simply trying the C<@> as
2329 literal.  This has been fixed.
2330 L<[perl #123963]|https://rt.perl.org/Ticket/Display.html?id=123963>
2331
2332 =item *
2333
2334 C<*bar::=*foo::=*glob_with_hash> has been crashing since Perl 5.14, but no
2335 longer does.
2336 L<[perl #123847]|https://rt.perl.org/Ticket/Display.html?id=123847>
2337
2338 =item *
2339
2340 C<foreach> in scalar context was not pushing an item on to the stack, resulting
2341 in bugs.  (S<C<print 4, scalar do { foreach(@x){} } + 1>> would print 5.)  It has
2342 been fixed to return C<undef>.
2343 L<[perl #124004]|https://rt.perl.org/Ticket/Display.html?id=124004>
2344
2345 =item *
2346
2347 A memory leak introduced in Perl 5.21.6 has been fixed.
2348 L<[perl #123922]|https://rt.perl.org/Ticket/Display.html?id=123922>
2349
2350 =item *
2351
2352 A regression in the behaviour of the C<readline> built-in function, caused by
2353 the introduction of the C<< <<>> >> operator, has been fixed.
2354 L<[perl #123990]|https://rt.perl.org/Ticket/Display.html?id=123990>
2355
2356 =item *
2357
2358 Several cases of data used to store environment variable contents in core C
2359 code being potentially overwritten before being used have been fixed.
2360 L<[perl #123748]|https://rt.perl.org/Ticket/Display.html?id=123748>
2361
2362 =item *
2363
2364 Patterns starting with C</.*/> are now fast again.
2365 L<[perl #123743]|https://rt.perl.org/Ticket/Display.html?id=123743>.
2366
2367 =item *
2368
2369 The original visible value of C<$/> is now preserved when it is set to
2370 an invalid value.  Previously if you set C<$/> to a reference to an
2371 array, for example, perl would produce a runtime error and not set
2372 C<PL_rs>, but perl code that checked C<$/> would see the array
2373 reference.
2374 L<[perl #123218]|https://rt.perl.org/Ticket/Display.html?id=123218>.
2375
2376 =item *
2377
2378 In a regular expression pattern, a POSIX class, like C<[:ascii:]>, must
2379 be inside a bracketed character class, like C<qr/[[:ascii:]]/>.  A
2380 warning is issued when something looking like a POSIX class is not
2381 inside a bracketed class.  That warning wasn't getting generated when
2382 the POSIX class was negated: C<[:^ascii:]>.  This is now fixed.
2383
2384 =item *
2385
2386 Fix a couple of size calculation overflows.
2387 L<[perl #123554]|https://rt.perl.org/Ticket/Display.html?id=123554>.
2388
2389 =item *
2390
2391 A bug introduced in 5.21.6, C<dump LABEL> acted the same as C<goto
2392 LABEL>.  This has been fixed.
2393 L<[perl #123836]|https://rt.perl.org/Ticket/Display.html?id=123836>.
2394
2395 =item *
2396
2397 Perl 5.14.0 introduced a bug whereby C<eval { LABEL: }> would crash.  This
2398 has been fixed.
2399 L<[perl #123652]|https://rt.perl.org/Ticket/Display.html?id=123652>.
2400
2401 =item *
2402
2403 Various crashes due to the parser getting confused by syntax errors have
2404 been fixed.
2405 L<[perl #123617]|https://rt.perl.org/Ticket/Display.html?id=123617>.
2406 L<[perl #123737]|https://rt.perl.org/Ticket/Display.html?id=123737>.
2407 L<[perl #123753]|https://rt.perl.org/Ticket/Display.html?id=123753>.
2408 L<[perl #123677]|https://rt.perl.org/Ticket/Display.html?id=123677>.
2409
2410 =item *
2411
2412 Code like C</$a[/> used to read the next line of input and treat it as
2413 though it came immediately after the opening bracket.  Some invalid code
2414 consequently would parse and run, but some code caused crashes, so this is
2415 now disallowed.
2416 L<[perl #123712]|https://rt.perl.org/Ticket/Display.html?id=123712>.
2417
2418 =item *
2419
2420 Fix argument underflow for C<pack>.
2421 L<[perl #123874]|https://rt.perl.org/Ticket/Display.html?id=123874>.
2422
2423 =item *
2424
2425 Fix handling of non-strict C<\x{}>. Now C<\x{}> is equivalent to C<\x{0}>
2426 instead of faulting.
2427
2428 =item *
2429
2430 C<stat -t> is now no longer treated as stackable, just like C<-t stat>.
2431 L<[perl #123816]|https://rt.perl.org/Ticket/Display.html?id=123816>.
2432
2433 =item *
2434
2435 The following no longer causes a SEGV: C<qr{x+(y(?0))*}>.
2436
2437 =item *
2438
2439 Fixed infinite loop in parsing backrefs in regexp patterns.
2440
2441 =item *
2442
2443 Several minor bug fixes in behavior of Inf and NaN, including
2444 warnings when stringifying Inf-like or NaN-like strings. For example,
2445 "NaNcy" doesn't numify to NaN anymore.
2446
2447 =item *
2448
2449 Only stringy classnames are now shared. This fixes some failures in L<autobox>.
2450 L<[perl #100819]|https://rt.cpan.org/Ticket/Display.html?id=100819>.
2451
2452 =item *
2453
2454 A bug in regular expression patterns that could lead to segfaults and
2455 other crashes has been fixed.  This occurred only in patterns compiled
2456 with C<"/i">, while taking into account the current POSIX locale (this usually
2457 means they have to be compiled within the scope of C<S<"use locale">>),
2458 and there must be a string of at least 128 consecutive bytes to match.
2459 L<[perl #123539]|https://rt.perl.org/Ticket/Display.html?id=123539>.
2460
2461 =item *
2462
2463 C<s///> now works on very long strings instead of dying with 'Substitution
2464 loop'.
2465 L<[perl #103260]|https://rt.perl.org/Ticket/Display.html?id=103260>.
2466 L<[perl #123071]|https://rt.perl.org/Ticket/Display.html?id=123071>.
2467
2468 =item *
2469
2470 C<gmtime> no longer crashes with not-a-number values.
2471 L<[perl #123495]|https://rt.perl.org/Ticket/Display.html?id=123495>.
2472
2473 =item *
2474
2475 C<\()> (reference to an empty list) and C<y///> with lexical C<$_> in scope
2476 could do a bad write past the end of the stack.  They have been fixed
2477 to extend the stack first.
2478
2479 =item *
2480
2481 C<prototype()> with no arguments used to read the previous item on the
2482 stack, so C<print "foo", prototype()> would print foo's prototype.  It has
2483 been fixed to infer C<$_> instead.
2484 L<[perl #123514]|https://rt.perl.org/Ticket/Display.html?id=123514>.
2485
2486 =item *
2487
2488 Some cases of lexical state subs inside predeclared subs could crash but no
2489 longer do.
2490
2491 =item *
2492
2493 Some cases of nested lexical state subs inside anonymous subs could cause
2494 'Bizarre copy' errors or possibly even crash.
2495
2496 =item *
2497
2498 When trying to emit warnings, perl's default debugger (F<perl5db.pl>) was
2499 sometimes giving 'Undefined subroutine &DB::db_warn called' instead.  This
2500 bug, which started to occur in Perl 5.18, has been fixed.
2501 L<[perl #123553]|https://rt.perl.org/Ticket/Display.html?id=123553>.
2502
2503 =item *
2504
2505 Certain syntax errors in substitutions, such as C<< s/${E<lt>E<gt>{})// >>, would
2506 crash, and had done so since Perl 5.10.  (In some cases the crash did not
2507 start happening till 5.16.)  The crash has, of course, been fixed.
2508 L<[perl #123542]|https://rt.perl.org/Ticket/Display.html?id=123542>.
2509
2510 =item *
2511
2512 A repeat expression like C<33 x ~3> could cause a large buffer
2513 overflow since the new output buffer size was not correctly handled by
2514 SvGROW().  An expression like this now properly produces a memory wrap
2515 panic.
2516 L<[perl #123554]|https://rt.perl.org/Ticket/Display.html?id=123554>.
2517
2518 =item *
2519
2520 C<< formline("@...", "a"); >> would crash.  The C<FF_CHECKNL> case in
2521 pp_formline() didn't set the pointer used to mark the chop position,
2522 which led to the C<FF_MORE> case crashing with a segmentation fault.
2523 This has been fixed.
2524 L<[perl #123538]|https://rt.perl.org/Ticket/Display.html?id=123538>.
2525
2526 =item *
2527
2528 A possible buffer overrun and crash when parsing a literal pattern during
2529 regular expression compilation has been fixed.
2530 L<[perl #123604]|https://rt.perl.org/Ticket/Display.html?id=123604>.
2531
2532 =item *
2533
2534 C<fchmod()> and C<futimes()> now set C<$!> when they fail due to being
2535 passed a closed file handle.
2536 L<[perl #122703]|https://rt.perl.org/Ticket/Display.html?id=122703>.
2537
2538 =item *
2539
2540 op_free() no longer crashes due to a stack overflow when freeing a
2541 deeply recursive op tree.
2542 L<[perl #108276]|https://rt.perl.org/Ticket/Display.html?id=108276>.
2543
2544 =item *
2545
2546 scalarvoid() would crash due to a stack overflow when processing a
2547 deeply recursive op tree.
2548 L<[perl #108276]|https://rt.perl.org/Ticket/Display.html?id=108276>.
2549
2550 =item *
2551
2552 In Perl 5.20.0, C<$^N> accidentally had the internal UTF8 flag turned off
2553 if accessed from a code block within a regular expression, effectively
2554 UTF8-encoding the value.  This has been fixed.
2555 L<[perl #123135]|https://rt.perl.org/Ticket/Display.html?id=123135>.
2556
2557 =item *
2558
2559 A failed C<semctl> call no longer overwrites existing items on the stack,
2560 causing C<(semctl(-1,0,0,0))[0]> to give an "uninitialized" warning.
2561
2562 =item *
2563
2564 C<else{foo()}> with no space before C<foo> is now better at assigning the
2565 right line number to that statement.
2566 L<[perl #122695]|https://rt.perl.org/Ticket/Display.html?id=122695>.
2567
2568 =item *
2569
2570 Sometimes the assignment in C<@array = split> gets optimised and C<split>
2571 itself writes directly to the array.  This caused a bug, preventing this
2572 assignment from being used in lvalue context.  So
2573 C<(@a=split//,"foo")=bar()> was an error.  (This bug probably goes back to
2574 Perl 3, when the optimisation was added.)  This optimisation, and the bug,
2575 started to happen in more cases in 5.21.5.  It has now been fixed.
2576 L<[perl #123057]|https://rt.perl.org/Ticket/Display.html?id=123057>.
2577
2578 =item *
2579
2580 When argument lists that fail the checks installed by subroutine
2581 signatures, the resulting error messages now give the file and line number
2582 of the caller, not of the called subroutine.
2583 L<[perl #121374]|https://rt.perl.org/Ticket/Display.html?id=121374>.
2584
2585 =item *
2586
2587 Flip-flop operators (C<..> and C<...> in scalar context) used to maintain
2588 a separate state for each recursion level (the number of times the
2589 enclosing sub was called recursively), contrary to the documentation.  Now
2590 each closure has one internal state for each flip-flop.
2591 L<[perl #122829]|https://rt.perl.org/Ticket/Display.html?id=122829>.
2592
2593 =item *
2594
2595 C<use>, C<no>, statement labels, special blocks (C<BEGIN>) and pod are now
2596 permitted as the first thing in a C<map> or C<grep> block, the block after
2597 C<print> or C<say> (or other functions) returning a handle, and within
2598 C<${...}>, C<@{...}>, etc.
2599 L<[perl #122782]|https://rt.perl.org/Ticket/Display.html?id=122782>.
2600
2601 =item *
2602
2603 The repetition operator C<x> now propagates lvalue context to its left-hand
2604 argument when used in contexts like C<foreach>.  That allows
2605 S<C<for(($#that_array)x2) { ... }>> to work as expected if the loop modifies
2606 $_.
2607
2608 =item *
2609
2610 C<(...) x ...> in scalar context used to corrupt the stack if one operand
2611 were an object with "x" overloading, causing erratic behaviour.
2612 L<[perl #121827]|https://rt.perl.org/Ticket/Display.html?id=121827>.
2613
2614 =item *
2615
2616 Assignment to a lexical scalar is often optimised away (as mentioned under
2617 L</Performance Enhancements>).  Various bugs related to this optimisation
2618 have been fixed.  Certain operators on the right-hand side would sometimes
2619 fail to assign the value at all or assign the wrong value, or would call
2620 STORE twice or not at all on tied variables.  The operators affected were
2621 C<$foo++>, C<$foo-->, and C<-$foo> under C<use integer>, C<chomp>, C<chr>
2622 and C<setpgrp>.
2623
2624 =item *
2625
2626 List assignments were sometimes buggy if the same scalar ended up on both
2627 sides of the assignment due to used of C<tied>, C<values> or C<each>.  The
2628 result would be the wrong value getting assigned.
2629
2630 =item *
2631
2632 C<setpgrp($nonzero)> (with one argument) was accidentally changed in 5.16
2633 to mean C<setpgrp(0)>.  This has been fixed.
2634
2635 =item *
2636
2637 C<__SUB__> could return the wrong value or even corrupt memory under the
2638 debugger (the C<-d> switch) and in subs containing C<eval $string>.
2639
2640 =item *
2641
2642 When S<C<sub () { $var }>> becomes inlinable, it now returns a different
2643 scalar each time, just as a non-inlinable sub would, though Perl still
2644 optimises the copy away in cases where it would make no observable
2645 difference.
2646
2647 =item *
2648
2649 S<C<my sub f () { $var }>> and S<C<sub () : attr { $var }>> are no longer
2650 eligible for inlining.  The former would crash; the latter would just
2651 throw the attributes away.  An exception is made for the little-known
2652 ":method" attribute, which does nothing much.
2653
2654 =item *
2655
2656 Inlining of subs with an empty prototype is now more consistent than
2657 before.  Previously, a sub with multiple statements, all but the last
2658 optimised away, would be inlinable only if it were an anonymous sub
2659 containing a string C<eval> or C<state> declaration or closing over an
2660 outer lexical variable (or any anonymous sub under the debugger).  Now any
2661 sub that gets folded to a single constant after statements have been
2662 optimised away is eligible for inlining.  This applies to things like C<sub
2663 () { jabber() if DEBUG; 42 }>.
2664
2665 Some subroutines with an explicit C<return> were being made inlinable,
2666 contrary to the documentation,  Now C<return> always prevents inlining.
2667
2668 =item *
2669
2670 On some systems, such as VMS, C<crypt> can return a non-ASCII string.  If a
2671 scalar assigned to had contained a UTF8 string previously, then C<crypt>
2672 would not turn off the UTF8 flag, thus corrupting the return value.  This
2673 would happen with C<$lexical = crypt ...>.
2674
2675 =item *
2676
2677 C<crypt> no longer calls C<FETCH> twice on a tied first argument.
2678
2679 =item *
2680
2681 An unterminated here-doc on the last line of a quote-like operator
2682 (C<qq[${ <<END }]>, C</(?{ <<END })/>) no longer causes a double free.  It
2683 started doing so in 5.18.
2684
2685 =item *
2686
2687 Fixed two assertion failures introduced into C<-DPERL_OP_PARENT>
2688 builds.
2689 L<[perl #108276]|https://rt.perl.org/Ticket/Display.html?id=108276>.
2690
2691 =item *
2692
2693 C<index()> and C<rindex()> no longer crash when used on strings over 2GB in
2694 size.
2695 L<[perl #121562]|https://rt.perl.org/Ticket/Display.html?id=121562>.
2696
2697 =item *
2698
2699 A small previously intentional memory leak in PERL_SYS_INIT/PERL_SYS_INIT3 on
2700 Win32 builds was fixed. This might affect embedders who repeatedly create and
2701 destroy perl engines within the same process.
2702
2703 =item *
2704
2705 C<POSIX::localeconv()> now returns the data for the program's underlying
2706 locale even when called from outside the scope of S<C<use locale>>.
2707
2708 =item *
2709
2710 C<POSIX::localeconv()> now works properly on platforms which don't have
2711 C<LC_NUMERIC> and/or C<LC_MONETARY>, or for which Perl has been compiled
2712 to disregard either or both of these locale categories.  In such
2713 circumstances, there are now no entries for the corresponding values in
2714 the hash returned by C<localeconv()>.
2715
2716 =item *
2717
2718 C<POSIX::localeconv()> now marks appropriately the values it returns as
2719 UTF-8 or not.  Previously they were always returned as bytes, even if
2720 they were supposed to be encoded as UTF-8.
2721
2722 =item *
2723
2724 On Microsoft Windows, within the scope of C<S<use locale>>, the following
2725 POSIX character classes gave results for many locales that did not
2726 conform to the POSIX standard:
2727 C<[[:alnum:]]>,
2728 C<[[:alpha:]]>,
2729 C<[[:blank:]]>,
2730 C<[[:digit:]]>,
2731 C<[[:graph:]]>,
2732 C<[[:lower:]]>,
2733 C<[[:print:]]>,
2734 C<[[:punct:]]>,
2735 C<[[:upper:]]>,
2736 C<[[:word:]]>,
2737 and
2738 C<[[:xdigit:]]>.
2739 These are because the underlying Microsoft implementation does not
2740 follow the standard.  Perl now takes special precautions to correct for
2741 this.
2742
2743 =item *
2744
2745 Many issues have been detected by L<Coverity|http://www.coverity.com/> and
2746 fixed.
2747
2748 =item *
2749
2750 system() and friends should now work properly on more Android builds.
2751
2752 Due to an oversight, the value specified through C<-Dtargetsh> to F<Configure>
2753 would end up being ignored by some of the build process.  This caused perls
2754 cross-compiled for Android to end up with defective versions of C<system()>,
2755 exec() and backticks: the commands would end up looking for C</bin/sh>
2756 instead of C</system/bin/sh>, and so would fail for the vast majority
2757 of devices, leaving C<$!> as C<ENOENT>.
2758
2759 =item *
2760
2761 C<qr(...\(...\)...)>,
2762 C<qr[...\[...\]...]>,
2763 and
2764 C<qr{...\{...\}...}>
2765 now work.  Previously it was impossible to escape these three
2766 left-characters with a backslash within a regular expression pattern
2767 where otherwise they would be considered metacharacters, and the pattern
2768 opening delimiter was the character, and the closing delimiter was its
2769 mirror character.
2770
2771 =item *
2772
2773 C<< s///e >> on tainted utf8 strings got C<< pos() >> messed up. This bug,
2774 introduced in 5.20, is now fixed.
2775 L<[perl #122148]|https://rt.perl.org/Ticket/Display.html?id=122148>.
2776
2777 =item *
2778
2779 A non-word boundary in a regular expression (C<< \B >>) did not always
2780 match the end of the string; in particular C<< q{} =~ /\B/ >> did not
2781 match. This bug, introduced in perl 5.14, is now fixed.
2782 L<[perl #122090]|https://rt.perl.org/Ticket/Display.html?id=122090>.
2783
2784 =item *
2785
2786 C<< " P" =~ /(?=.*P)P/ >> should match, but did not. This is now fixed.
2787 L<[perl #122171]|https://rt.perl.org/Ticket/Display.html?id=122171>.
2788
2789 =item *
2790
2791 Failing to compile C<use Foo> in an eval could leave a spurious
2792 C<BEGIN> subroutine definition, which would produce a "Subroutine
2793 BEGIN redefined" warning on the next use of C<use>, or other C<BEGIN>
2794 block.
2795 L<[perl #122107]|https://rt.perl.org/Ticket/Display.html?id=122107>.
2796
2797 =item *
2798
2799 C<method { BLOCK } ARGS> syntax now correctly parses the arguments if they
2800 begin with an opening brace.
2801 L<[perl #46947]|https://rt.perl.org/Ticket/Display.html?id=46947>.
2802
2803 =item *
2804
2805 External libraries and Perl may have different ideas of what the locale is.
2806 This is problematic when parsing version strings if the locale's numeric
2807 separator has been changed.  Version parsing has been patched to ensure
2808 it handles the locales correctly.
2809 L<[perl #121930]|https://rt.perl.org/Ticket/Display.html?id=121930>.
2810
2811 =item *
2812
2813 A bug has been fixed where zero-length assertions and code blocks inside of a
2814 regex could cause C<pos> to see an incorrect value.
2815 L<[perl #122460]|https://rt.perl.org/Ticket/Display.html?id=122460>.
2816
2817 =item *
2818
2819 Constant dereferencing now works correctly for typeglob constants.  Previously
2820 the glob was stringified and its name looked up.  Now the glob itself is used.
2821 L<[perl #69456]|https://rt.perl.org/Ticket/Display.html?id=69456>
2822
2823 =item *
2824
2825 When parsing a funny character (C<$> C<@> C<%> C<&)> followed by braces,
2826 the parser no
2827 longer tries to guess whether it is a block or a hash constructor (causing a
2828 syntax error when it guesses the latter), since it can only be a block.
2829
2830 =item *
2831
2832 S<C<undef $reference>> now frees the referent immediately, instead of hanging on
2833 to it until the next statement.
2834 L<[perl #122556]|https://rt.perl.org/Ticket/Display.html?id=122556>
2835
2836 =item *
2837
2838 Various cases where the name of a sub is used (autoload, overloading, error
2839 messages) used to crash for lexical subs, but have been fixed.
2840
2841 =item *
2842
2843 Bareword lookup now tries to avoid vivifying packages if it turns out the
2844 bareword is not going to be a subroutine name.
2845
2846 =item *
2847
2848 Compilation of anonymous constants (e.g., C<sub () { 3 }>) no longer deletes
2849 any subroutine named C<__ANON__> in the current package.  Not only was
2850 C<*__ANON__{CODE}> cleared, but there was a memory leak, too.  This bug goes
2851 back to Perl 5.8.0.
2852
2853 =item *
2854
2855 Stub declarations like C<sub f;> and C<sub f ();> no longer wipe out constants
2856 of the same name declared by C<use constant>.  This bug was introduced in Perl
2857 5.10.0.
2858
2859 =item *
2860
2861 Under some conditions a warning raised in compilation of regular expression
2862 patterns could be displayed multiple times.  This is now fixed.
2863
2864 =item *
2865
2866 C<qr/[\N{named sequence}]/> now works properly in many instances.  Some names
2867 known to C<\N{...}> refer to a sequence of multiple characters, instead of the
2868 usual single character.  Bracketed character classes generally only match
2869 single characters, but now special handling has been added so that they can
2870 match named sequences, but not if the class is inverted or the sequence is
2871 specified as the beginning or end of a range.  In these cases, the only
2872 behavior change from before is a slight rewording of the fatal error message
2873 given when this class is part of a C<?[...])> construct.  When the C<[...]>
2874 stands alone, the same non-fatal warning as before is raised, and only the
2875 first character in the sequence is used, again just as before.
2876
2877 =item *
2878
2879 Tainted constants evaluated at compile time no longer cause unrelated
2880 statements to become tainted.
2881 L<[perl #122669]|https://rt.perl.org/Ticket/Display.html?id=122669>
2882
2883 =item *
2884
2885 S<C<open $$fh, ...>>, which vivifies a handle with a name like C<"main::_GEN_0">, was
2886 not giving the handle the right reference count, so a double free could happen.
2887
2888 =item *
2889
2890 When deciding that a bareword was a method name, the parser would get confused
2891 if an C<our> sub with the same name existed, and look up the method in the
2892 package of the C<our> sub, instead of the package of the invocant.
2893
2894 =item *
2895
2896 The parser no longer gets confused by C<\U=> within a double-quoted string.  It
2897 used to produce a syntax error, but now compiles it correctly.
2898 L<[perl #80368]|https://rt.perl.org/Ticket/Display.html?id=80368>
2899
2900 =item *
2901
2902 It has always been the intention for the C<-B> and C<-T> file test operators to
2903 treat UTF-8 encoded files as text.  (L<perlfunc|perlfunc/-X FILEHANDLE> has
2904 been updated to say this.)  Previously, it was possible for some files to be
2905 considered UTF-8 that actually weren't valid UTF-8.  This is now fixed.  The
2906 operators now work on EBCDIC platforms as well.
2907
2908 =item *
2909
2910 Under some conditions warning messages raised during regular expression pattern
2911 compilation were being output more than once.  This has now been fixed.
2912
2913 =item *
2914
2915 A regression has been fixed that was introduced in Perl 5.20.0 (fixed in Perl
2916 5.20.1 as well as here) in which a UTF-8 encoded regular expression pattern
2917 that contains a single ASCII lowercase letter does not match its uppercase
2918 counterpart.
2919 L<[perl #122655]|https://rt.perl.org/Ticket/Display.html?id=122655>
2920
2921 =item *
2922
2923 Constant folding could incorrectly suppress warnings if lexical warnings (C<use
2924 warnings> or C<no warnings>) were not in effect and C<$^W> were false at
2925 compile time and true at run time.
2926
2927 =item *
2928
2929 Loading UTF8 tables during a regular expression match could cause assertion
2930 failures under debugging builds if the previous match used the very same
2931 regular expression.
2932 L<[perl #122747]|https://rt.perl.org/Ticket/Display.html?id=122747>
2933
2934 =item *
2935
2936 Thread cloning used to work incorrectly for lexical subs, possibly causing
2937 crashes or double frees on exit.
2938
2939 =item *
2940
2941 Since Perl 5.14.0, deleting C<$SomePackage::{__ANON__}> and then undefining an
2942 anonymous subroutine could corrupt things internally, resulting in
2943 L<Devel::Peek> crashing or L<B.pm|B> giving nonsensical data.  This has been
2944 fixed.
2945
2946 =item *
2947
2948 S<C<(caller $n)[3]>> now reports names of lexical subs, instead of treating them
2949 as C<"(unknown)">.
2950
2951 =item *
2952
2953 C<sort subname LIST> now supports lexical subs for the comparison routine.
2954
2955 =item *
2956
2957 Aliasing (e.g., via C<*x = *y>) could confuse list assignments that mention the
2958 two names for the same variable on either side, causing wrong values to be
2959 assigned.
2960 L<[perl #15667]|https://rt.perl.org/Ticket/Display.html?id=15667>
2961
2962 =item *
2963
2964 Long here-doc terminators could cause a bad read on short lines of input.  This
2965 has been fixed.  It is doubtful that any crash could have occurred.  This bug
2966 goes back to when here-docs were introduced in Perl 3.000 twenty-five years
2967 ago.
2968
2969 =item *
2970
2971 An optimization in C<split> to treat C<split/^/> like C<split/^/m> had the
2972 unfortunate side-effect of also treating C<split/\A/> like C<split/^/m>, which
2973 it should not.  This has been fixed.  (Note, however, that C<split/^x/> does
2974 not behave like C<split/^x/m>, which is also considered to be a bug and will be
2975 fixed in a future version.)
2976 L<[perl #122761]|https://rt.perl.org/Ticket/Display.html?id=122761>
2977
2978 =item *
2979
2980 The little-known S<C<my Class $var>> syntax (see L<fields> and L<attributes>)
2981 could get confused in the scope of C<use utf8> if C<Class> were a constant
2982 whose value contained Latin-1 characters.
2983
2984 =item *
2985
2986 Locking and unlocking values via L<Hash::Util> or C<Internals::SvREADONLY>
2987 no longer has any effect on values that are read-only to begin.
2988 Previously, unlocking such values could result in crashes, hangs or
2989 other erratic behaviour.
2990
2991 =item *
2992
2993 The internal C<looks_like_number> function (which L<Scalar::Util> provides
2994 access to) began erroneously to return true for "-e1" in 5.21.4, affecting
2995 also C<-'-e1'>.  This has been fixed.
2996
2997 =item *
2998
2999 The flip-flop operator (C<..> in scalar context) would return the same
3000 scalar each time, unless the containing subroutine was called recursively.
3001 Now it always returns a new scalar.
3002 L<[perl #122829]|https://rt.perl.org/Ticket/Display.html?id=122829>.
3003
3004 =item *
3005
3006 Some unterminated C<(?(...)...)> constructs in regular expressions would
3007 either crash or give erroneous error messages.  C</(?(1)/> is one such
3008 example.
3009
3010 =item *
3011
3012 S<C<pack "w", $tied>> no longer calls FETCH twice.
3013
3014 =item *
3015
3016 List assignments like S<C<($x, $z) = (1, $y)>> now work correctly if C<$x> and
3017 C<$y> have been aliased by C<foreach>.
3018
3019 =item *
3020
3021 Some patterns including code blocks with syntax errors, such as
3022 C</ (?{(^{})/>, would hang or fail assertions on debugging builds.  Now
3023 they produce errors.
3024
3025 =item *
3026
3027 An assertion failure when parsing C<sort> with debugging enabled has been
3028 fixed.
3029 L<[perl #122771]|https://rt.perl.org/Ticket/Display.html?id=122771>.
3030
3031 =item *
3032
3033 S<C<*a = *b; @a = split //, $b[1]>> could do a bad read and produce junk
3034 results.
3035
3036 =item *
3037
3038 In S<C<() = @array = split>>, the S<C<() =>> at the beginning no longer confuses
3039 the optimizer, making it assume a limit of 1.
3040
3041 =item *
3042
3043 Fatal warnings no longer prevent the output of syntax errors.
3044 L<[perl #122966]|https://rt.perl.org/Ticket/Display.html?id=122966>.
3045
3046 =item *
3047
3048 Fixed a NaN double to long double conversion error on VMS. For quiet NaNs
3049 (and only on Itanium, not Alpha) negative infinity instead of NaN was
3050 produced.
3051
3052 =item *
3053
3054 Fixed the issue that caused C<< make distclean >> to leave files behind
3055 that shouldn't.
3056 L<[perl #122820]|https://rt.perl.org/Ticket/Display.html?id=122820>.
3057
3058 =item *
3059
3060 AIX now sets the length in C<< getsockopt >> correctly.
3061 L<[perl #120835]|https://rt.perl.org/Ticket/Display.html?id=120835>.
3062 L<[cpan #91183]|https://rt.cpan.org/Ticket/Display.html?id=91183>.
3063 L<[cpan #85570]|https://rt.cpan.org/Ticket/Display.html?id=85570>.
3064
3065 =item *
3066
3067 During the pattern optimization phase, we no longer recurse into
3068 C<GOSUB>/C<GOSTART> when not C<SCF_DO_SUBSTR>. This prevents the optimizer
3069 to run "forever" and exhaust all memory.
3070 L<[perl #122283]|https://rt.perl.org/Ticket/Display.html?id=122283>.
3071
3072 =item *
3073
3074 F<< t/op/crypt.t >> now performs SHA-256 algorithm if the default one
3075 is disabled.
3076 L<[perl #121591]|https://rt.perl.org/Ticket/Display.html?id=121591>.
3077
3078 =item *
3079
3080 Fixed an off-by-one error when setting the size of shared array.
3081 L<[perl #122950]|https://rt.perl.org/Ticket/Display.html?id=122950>.
3082
3083 =item *
3084
3085 Fixed a bug that could cause perl to execute an infinite loop during
3086 compilation.
3087 L<[perl #122995]|https://rt.perl.org/Ticket/Display.html?id=122995>.
3088
3089 =item *
3090
3091 On Win32, restoring in a child pseudo-process a variable that was
3092 C<local()>ed in a parent pseudo-process before the C<fork> happened caused
3093 memory corruption and a crash in the child pseudo-process (and therefore OS
3094 process).
3095 L<[perl #40565]|https://rt.perl.org/Ticket/Display.html?id=40565>.
3096
3097 =item *
3098
3099 Calling C<write> on a format with a C<^**> field could produce a panic
3100 in C<sv_chop()> if there were insufficient arguments or if the variable
3101 used to fill the field was empty.
3102 L<[perl #123245]|https://rt.perl.org/Ticket/Display.html?id=123245>.
3103
3104 =item *
3105
3106 Non-ASCII lexical sub names (use in error messages) on longer have extra
3107 junk on the end.
3108
3109 =item *
3110
3111 The C<\@> subroutine prototype no longer flattens parenthesized arrays
3112 (taking a reference to each element), but takes a reference to the array
3113 itself.
3114 L<[perl #47363]|https://rt.perl.org/Ticket/Display.html?id=47363>.
3115
3116 =item *
3117
3118 A block containing nothing except a C-style C<for> loop could corrupt the
3119 stack, causing lists outside the block to lose elements or have elements
3120 overwritten.  This could happen with C<map { for(...){...} } ...> and with
3121 lists containing C<do { for(...){...} }>.
3122 L<[perl #123286]|https://rt.perl.org/Ticket/Display.html?id=123286>.
3123
3124 =item *
3125
3126 C<scalar()> now propagates lvalue context, so that
3127 S<C<for(scalar($#foo)) { ... }>> can modify C<$#foo> through C<$_>.
3128
3129 =item *
3130
3131 C<qr/@array(?{block})/> no longer dies with "Bizarre copy of ARRAY".
3132 L<[perl #123344]|https://rt.perl.org/Ticket/Display.html?id=123344>.
3133
3134 =item *
3135
3136 S<C<eval '$variable'>> in nested named subroutines would sometimes look up a
3137 global variable even with a lexical variable in scope.
3138
3139 =item *
3140
3141 In perl 5.20.0, C<sort CORE::fake> where 'fake' is anything other than a
3142 keyword started chopping of the last 6 characters and treating the result
3143 as a sort sub name.  The previous behaviour of treating "CORE::fake" as a
3144 sort sub name has been restored.
3145 L<[perl #123410]|https://rt.perl.org/Ticket/Display.html?id=123410>.
3146
3147 =item *
3148
3149 Outside of C<use utf8>, a single-character Latin-1 lexical variable is
3150 disallowed.  The error message for it, "Can't use global C<$foo>...", was
3151 giving garbage instead of the variable name.
3152
3153 =item *
3154
3155 C<readline> on a nonexistent handle was causing C<${^LAST_FH}> to produce a
3156 reference to an undefined scalar (or fail an assertion).  Now
3157 C<${^LAST_FH}> ends up undefined.
3158
3159 =item *
3160
3161 C<(...)x...> in void context now applies scalar context to the left-hand
3162 argument, instead of the context the current sub was called in.
3163 L<[perl #123020]|https://rt.perl.org/Ticket/Display.html?id=123020>.
3164
3165 =back
3166
3167 =head1 Known Problems
3168
3169 =over 4
3170
3171 =item *
3172
3173 A goal is for Perl to be able to be recompiled to work reasonably well on any
3174 Unicode version.  In Perl 5.22, though, the earliest such version is Unicode
3175 5.1 (current is 7.0).
3176
3177 =item *
3178
3179 EBCDIC platforms
3180
3181 =over 4
3182
3183 =item *
3184
3185 The C<cmp> (and hence C<sort>) operators do not necessarily give the
3186 correct results when both operands are UTF-EBCDIC encoded strings and
3187 there is a mixture of ASCII and/or control characters, along with other
3188 characters.
3189
3190 =item *
3191
3192 Ranges containing C<\N{...}> in the C<tr///> (and C<y///>)
3193 transliteration operators are treated differently than the equivalent
3194 ranges in regular expression pattersn.  They should, but don't, cause
3195 the values in the ranges to all be treated as Unicode code points, and
3196 not native ones.  (L<perlre/Version 8 Regular Expressions> gives
3197 details as to how it should work.)
3198
3199 =item *
3200
3201 Encode and encoding are mostly broken.
3202
3203 =item *
3204
3205 Many CPAN modules that are shipped with core show failing tests.
3206
3207 =item *
3208
3209 C<pack>/C<unpack> with C<"U0"> format may not work properly.
3210
3211 =back
3212
3213 =item *
3214
3215 The following modules are known to have test failures with this version of
3216 Perl.  Patches have been submitted, so there will hopefully be new releases
3217 soon:
3218
3219 =over
3220
3221 =item *
3222
3223 L<B::Generate> version 1.50
3224
3225 =item *
3226
3227 L<B::Utils> version 0.25
3228
3229 =item *
3230
3231 L<Dancer> version 1.3130
3232
3233 =item *
3234
3235 L<Data::Alias> version 1.18
3236
3237 =item *
3238
3239 L<Data::Util> version 0.63
3240
3241 =item *
3242
3243 L<Devel::Spy> version 0.07
3244
3245 =item *
3246
3247 L<Lexical::Var> version 0.009
3248
3249 =item *
3250
3251 L<Mason> version 2.22
3252
3253 =item *
3254
3255 L<Padre> version 1.00
3256
3257 =item *
3258
3259 L<Parse::Keyword> 0.08
3260
3261 =back
3262
3263 =back
3264
3265 =head1 Acknowledgements
3266
3267 XXX Generate this with:
3268
3269   perl Porting/acknowledgements.pl v5.20.0..HEAD
3270
3271 =head1 Reporting Bugs
3272
3273 If you find what you think is a bug, you might check the articles recently
3274 posted to the comp.lang.perl.misc newsgroup and the perl bug database at
3275 https://rt.perl.org/ .  There may also be information at
3276 http://www.perl.org/ , the Perl Home Page.
3277
3278 If you believe you have an unreported bug, please run the L<perlbug> program
3279 included with your release.  Be sure to trim your bug down to a tiny but
3280 sufficient test case.  Your bug report, along with the output of C<perl -V>,
3281 will be sent off to perlbug@perl.org to be analysed by the Perl porting team.
3282
3283 If the bug you are reporting has security implications, which make it
3284 inappropriate to send to a publicly archived mailing list, then please send it
3285 to perl5-security-report@perl.org.  This points to a closed subscription
3286 unarchived mailing list, which includes all the core committers, who will be
3287 able to help assess the impact of issues, figure out a resolution, and help
3288 co-ordinate the release of patches to mitigate or fix the problem across all
3289 platforms on which Perl is supported.  Please only use this address for
3290 security issues in the Perl core, not for modules independently distributed on
3291 CPAN.
3292
3293 =head1 SEE ALSO
3294
3295 The F<Changes> file for an explanation of how to view exhaustive details on
3296 what changed.
3297
3298 The F<INSTALL> file for how to build Perl.
3299
3300 The F<README> file for general stuff.
3301
3302 The F<Artistic> and F<Copying> files for copyright information.
3303
3304 =cut