xref: /openbsd/gnu/usr.bin/perl/pod/perldiag.pod (revision d415bd75)
1=head1 NAME
2
3perldiag - various Perl diagnostics
4
5=head1 DESCRIPTION
6
7These messages are classified as follows (listed in increasing order of
8desperation):
9
10    (W) A warning (optional).
11    (D) A deprecation (enabled by default).
12    (S) A severe warning (enabled by default).
13    (F) A fatal error (trappable).
14    (P) An internal error you should never see (trappable).
15    (X) A very fatal error (nontrappable).
16    (A) An alien error message (not generated by Perl).
17
18The majority of messages from the first three classifications above
19(W, D & S) can be controlled using the C<warnings> pragma.
20
21If a message can be controlled by the C<warnings> pragma, its warning
22category is included with the classification letter in the description
23below.  E.g. C<(W closed)> means a warning in the C<closed> category.
24
25Optional warnings are enabled by using the C<warnings> pragma or the B<-w>
26and B<-W> switches.  Warnings may be captured by setting C<$SIG{__WARN__}>
27to a reference to a routine that will be called on each warning instead
28of printing it.  See L<perlvar>.
29
30Severe warnings are always enabled, unless they are explicitly disabled
31with the C<warnings> pragma or the B<-X> switch.
32
33Trappable errors may be trapped using the eval operator.  See
34L<perlfunc/eval>.  In almost all cases, warnings may be selectively
35disabled or promoted to fatal errors using the C<warnings> pragma.
36See L<warnings>.
37
38The messages are in alphabetical order, without regard to upper or
39lower-case.  Some of these messages are generic.  Spots that vary are
40denoted with a %s or other printf-style escape.  These escapes are
41ignored by the alphabetical order, as are all characters other than
42letters.  To look up your message, just ignore anything that is not a
43letter.
44
45=over 4
46
47=item accept() on closed socket %s
48
49(W closed) You tried to do an accept on a closed socket.  Did you forget
50to check the return value of your socket() call?  See
51L<perlfunc/accept>.
52
53=item Aliasing via reference is experimental
54
55(S experimental::refaliasing) This warning is emitted if you use
56a reference constructor on the left-hand side of an assignment to
57alias one variable to another.  Simply suppress the warning if you
58want to use the feature, but know that in doing so you are taking
59the risk of using an experimental feature which may change or be
60removed in a future Perl version:
61
62    no warnings "experimental::refaliasing";
63    use feature "refaliasing";
64    \$x = \$y;
65
66=item '%c' allowed only after types %s in %s
67
68(F) The modifiers '!', '<' and '>' are allowed in pack() or unpack() only
69after certain types.  See L<perlfunc/pack>.
70
71=item alpha->numify() is lossy
72
73(W numeric) An alpha version can not be numified without losing
74information.
75
76=item Ambiguous call resolved as CORE::%s(), qualify as such or use &
77
78(W ambiguous) A subroutine you have declared has the same name as a Perl
79keyword, and you have used the name without qualification for calling
80one or the other.  Perl decided to call the builtin because the
81subroutine is not imported.
82
83To force interpretation as a subroutine call, either put an ampersand
84before the subroutine name, or qualify the name with its package.
85Alternatively, you can import the subroutine (or pretend that it's
86imported with the C<use subs> pragma).
87
88To silently interpret it as the Perl operator, use the C<CORE::> prefix
89on the operator (e.g. C<CORE::log($x)>) or declare the subroutine
90to be an object method (see L<perlsub/"Subroutine Attributes"> or
91L<attributes>).
92
93=item Ambiguous range in transliteration operator
94
95(F) You wrote something like C<tr/a-z-0//> which doesn't mean anything at
96all.  To include a C<-> character in a transliteration, put it either
97first or last.  (In the past, C<tr/a-z-0//> was synonymous with
98C<tr/a-y//>, which was probably not what you would have expected.)
99
100=item Ambiguous use of %s resolved as %s
101
102(S ambiguous) You said something that may not be interpreted the way
103you thought.  Normally it's pretty easy to disambiguate it by supplying
104a missing quote, operator, parenthesis pair or declaration.
105
106=item Ambiguous use of -%s resolved as -&%s()
107
108(S ambiguous) You wrote something like C<-foo>, which might be the
109string C<"-foo">, or a call to the function C<foo>, negated.  If you meant
110the string, just write C<"-foo">.  If you meant the function call,
111write C<-foo()>.
112
113=item Ambiguous use of %c resolved as operator %c
114
115(S ambiguous) C<%>, C<&>, and C<*> are both infix operators (modulus,
116bitwise and, and multiplication) I<and> initial special characters
117(denoting hashes, subroutines and typeglobs), and you said something
118like C<*foo * foo> that might be interpreted as either of them.  We
119assumed you meant the infix operator, but please try to make it more
120clear -- in the example given, you might write C<*foo * foo()> if you
121really meant to multiply a glob by the result of calling a function.
122
123=item Ambiguous use of %c{%s} resolved to %c%s
124
125(W ambiguous) You wrote something like C<@{foo}>, which might be
126asking for the variable C<@foo>, or it might be calling a function
127named foo, and dereferencing it as an array reference.  If you wanted
128the variable, you can just write C<@foo>.  If you wanted to call the
129function, write C<@{foo()}> ... or you could just not have a variable
130and a function with the same name, and save yourself a lot of trouble.
131
132=item Ambiguous use of %c{%s[...]} resolved to %c%s[...]
133
134=item Ambiguous use of %c{%s{...}} resolved to %c%s{...}
135
136(W ambiguous) You wrote something like C<${foo[2]}> (where foo represents
137the name of a Perl keyword), which might be looking for element number
1382 of the array named C<@foo>, in which case please write C<$foo[2]>, or you
139might have meant to pass an anonymous arrayref to the function named
140foo, and then do a scalar deref on the value it returns.  If you meant
141that, write C<${foo([2])}>.
142
143In regular expressions, the C<${foo[2]}> syntax is sometimes necessary
144to disambiguate between array subscripts and character classes.
145C</$length[2345]/>, for instance, will be interpreted as C<$length> followed
146by the character class C<[2345]>.  If an array subscript is what you
147want, you can avoid the warning by changing C</${length[2345]}/> to the
148unsightly C</${\$length[2345]}/>, by renaming your array to something
149that does not coincide with a built-in keyword, or by simply turning
150off warnings with C<no warnings 'ambiguous';>.
151
152=item '|' and '<' may not both be specified on command line
153
154(F) An error peculiar to VMS.  Perl does its own command line
155redirection, and found that STDIN was a pipe, and that you also tried to
156redirect STDIN using '<'.  Only one STDIN stream to a customer, please.
157
158=item '|' and '>' may not both be specified on command line
159
160(F) An error peculiar to VMS.  Perl does its own command line
161redirection, and thinks you tried to redirect stdout both to a file and
162into a pipe to another command.  You need to choose one or the other,
163though nothing's stopping you from piping into a program or Perl script
164which 'splits' output into two streams, such as
165
166    open(OUT,">$ARGV[0]") or die "Can't write to $ARGV[0]: $!";
167    while (<STDIN>) {
168        print;
169        print OUT;
170    }
171    close OUT;
172
173=item Applying %s to %s will act on scalar(%s)
174
175(W misc) The pattern match (C<//>), substitution (C<s///>), and
176transliteration (C<tr///>) operators work on scalar values.  If you apply
177one of them to an array or a hash, it will convert the array or hash to
178a scalar value (the length of an array, or the population info of a
179hash) and then work on that scalar value.  This is probably not what
180you meant to do.  See L<perlfunc/grep> and L<perlfunc/map> for
181alternatives.
182
183=item Arg too short for msgsnd
184
185(F) msgsnd() requires a string at least as long as sizeof(long).
186
187=item Argument "%s" isn't numeric%s
188
189(W numeric) The indicated string was fed as an argument to an operator
190that expected a numeric value instead.  If you're fortunate the message
191will identify which operator was so unfortunate.
192
193Note that for the C<Inf> and C<NaN> (infinity and not-a-number) the
194definition of "numeric" is somewhat unusual: the strings themselves
195(like "Inf") are considered numeric, and anything following them is
196considered non-numeric.
197
198=item Argument list not closed for PerlIO layer "%s"
199
200(W layer) When pushing a layer with arguments onto the Perl I/O
201system you forgot the ) that closes the argument list.  (Layers
202take care of transforming data between external and internal
203representations.)  Perl stopped parsing the layer list at this
204point and did not attempt to push this layer.  If your program
205didn't explicitly request the failing operation, it may be the
206result of the value of the environment variable PERLIO.
207
208=item Argument "%s" treated as 0 in increment (++)
209
210(W numeric) The indicated string was fed as an argument to the C<++>
211operator which expects either a number or a string matching
212C</^[a-zA-Z]*[0-9]*\z/>.  See L<perlop/Auto-increment and
213Auto-decrement> for details.
214
215=item Array passed to stat will be coerced to a scalar%s
216
217(W syntax) You called stat() on an array, but the array will be
218coerced to a scalar - the number of elements in the array.
219
220=item A signature parameter must start with '$', '@' or '%'
221
222(F) Each subroutine signature parameter declaration must start with a valid
223sigil; for example:
224
225    sub foo ($a, $, $b = 1, @c) {}
226
227=item A slurpy parameter may not have a default value
228
229(F) Only scalar subroutine signature parameters may have a default value;
230for example:
231
232    sub foo ($a = 1)        {} # legal
233    sub foo (@a = (1))      {} # invalid
234    sub foo (%a = (a => b)) {} # invalid
235
236=item assertion botched: %s
237
238(X) The malloc package that comes with Perl had an internal failure.
239
240=item Assertion %s failed: file "%s", line %d
241
242(X) A general assertion failed.  The file in question must be examined.
243
244=item Assigned value is not a reference
245
246(F) You tried to assign something that was not a reference to an lvalue
247reference (e.g., C<\$x = $y>).  If you meant to make $x an alias to $y, use
248C<\$x = \$y>.
249
250=item Assigned value is not %s reference
251
252(F) You tried to assign a reference to a reference constructor, but the
253two references were not of the same type.  You cannot alias a scalar to
254an array, or an array to a hash; the two types must match.
255
256    \$x = \@y;  # error
257    \@x = \%y;  # error
258     $y = [];
259    \$x = $y;   # error; did you mean \$y?
260
261=item Assigning non-zero to $[ is no longer possible
262
263(F) When the "array_base" feature is disabled
264(e.g., and under C<use v5.16;>, and as of Perl 5.30)
265the special variable C<$[>, which is deprecated, is now a fixed zero value.
266
267=item Assignment to both a list and a scalar
268
269(F) If you assign to a conditional operator, the 2nd and 3rd arguments
270must either both be scalars or both be lists.  Otherwise Perl won't
271know which context to supply to the right side.
272
273=item Assuming NOT a POSIX class since %s in regex; marked by S<<-- HERE> in m/%s/
274
275(W regexp) You had something like these:
276
277 [[:alnum]]
278 [[:digit:xyz]
279
280They look like they might have been meant to be the POSIX classes
281C<[:alnum:]> or C<[:digit:]>.  If so, they should be written:
282
283 [[:alnum:]]
284 [[:digit:]xyz]
285
286Since these aren't legal POSIX class specifications, but are legal
287bracketed character classes, Perl treats them as the latter.  In the
288first example, it matches the characters C<":">, C<"[">, C<"a">, C<"l">,
289C<"m">, C<"n">, and C<"u">.
290
291If these weren't meant to be POSIX classes, this warning message is
292spurious, and can be suppressed by reordering things, such as
293
294 [[al:num]]
295
296or
297
298 [[:munla]]
299
300=item <> at require-statement should be quotes
301
302(F) You wrote C<< require <file> >> when you should have written
303C<require 'file'>.
304
305=item Attempt to access disallowed key '%s' in a restricted hash
306
307(F) The failing code has attempted to get or set a key which is not in
308the current set of allowed keys of a restricted hash.
309
310=item Attempt to bless into a freed package
311
312(F) You wrote C<bless $foo> with one argument after somehow causing
313the current package to be freed.  Perl cannot figure out what to
314do, so it throws up its hands in despair.
315
316=item Attempt to bless into a reference
317
318(F) The CLASSNAME argument to the bless() operator is expected to be
319the name of the package to bless the resulting object into.  You've
320supplied instead a reference to something: perhaps you wrote
321
322    bless $self, $proto;
323
324when you intended
325
326    bless $self, ref($proto) || $proto;
327
328If you actually want to bless into the stringified version
329of the reference supplied, you need to stringify it yourself, for
330example by:
331
332    bless $self, "$proto";
333
334=item Attempt to clear deleted array
335
336(S debugging) An array was assigned to when it was being freed.
337Freed values are not supposed to be visible to Perl code.  This
338can also happen if XS code calls C<av_clear> from a custom magic
339callback on the array.
340
341=item Attempt to delete disallowed key '%s' from a restricted hash
342
343(F) The failing code attempted to delete from a restricted hash a key
344which is not in its key set.
345
346=item Attempt to delete readonly key '%s' from a restricted hash
347
348(F) The failing code attempted to delete a key whose value has been
349declared readonly from a restricted hash.
350
351=item Attempt to free non-arena SV: 0x%x
352
353(S internal) All SV objects are supposed to be allocated from arenas
354that will be garbage collected on exit.  An SV was discovered to be
355outside any of those arenas.
356
357=item Attempt to free nonexistent shared string '%s'%s
358
359(S internal) Perl maintains a reference-counted internal table of
360strings to optimize the storage and access of hash keys and other
361strings.  This indicates someone tried to decrement the reference count
362of a string that can no longer be found in the table.
363
364=item Attempt to free temp prematurely: SV 0x%x
365
366(S debugging) Mortalized values are supposed to be freed by the
367free_tmps() routine.  This indicates that something else is freeing the
368SV before the free_tmps() routine gets a chance, which means that the
369free_tmps() routine will be freeing an unreferenced scalar when it does
370try to free it.
371
372=item Attempt to free unreferenced glob pointers
373
374(S internal) The reference counts got screwed up on symbol aliases.
375
376=item Attempt to free unreferenced scalar: SV 0x%x
377
378(S internal) Perl went to decrement the reference count of a scalar to
379see if it would go to 0, and discovered that it had already gone to 0
380earlier, and should have been freed, and in fact, probably was freed.
381This could indicate that SvREFCNT_dec() was called too many times, or
382that SvREFCNT_inc() was called too few times, or that the SV was
383mortalized when it shouldn't have been, or that memory has been
384corrupted.
385
386=item Attempt to pack pointer to temporary value
387
388(W pack) You tried to pass a temporary value (like the result of a
389function, or a computed expression) to the "p" pack() template.  This
390means the result contains a pointer to a location that could become
391invalid anytime, even before the end of the current statement.  Use
392literals or global values as arguments to the "p" pack() template to
393avoid this warning.
394
395=item Attempt to reload %s aborted.
396
397(F) You tried to load a file with C<use> or C<require> that failed to
398compile once already.  Perl will not try to compile this file again
399unless you delete its entry from %INC.  See L<perlfunc/require> and
400L<perlvar/%INC>.
401
402=item Attempt to set length of freed array
403
404(W misc) You tried to set the length of an array which has
405been freed.  You can do this by storing a reference to the
406scalar representing the last index of an array and later
407assigning through that reference.  For example
408
409    $r = do {my @a; \$#a};
410    $$r = 503
411
412=item Attempt to use reference as lvalue in substr
413
414(W substr) You supplied a reference as the first argument to substr()
415used as an lvalue, which is pretty strange.  Perhaps you forgot to
416dereference it first.  See L<perlfunc/substr>.
417
418=item Attribute prototype(%s) discards earlier prototype attribute in same sub
419
420(W misc) A sub was declared as sub foo : prototype(A) : prototype(B) {}, for
421example.  Since each sub can only have one prototype, the earlier
422declaration(s) are discarded while the last one is applied.
423
424=item av_reify called on tied array
425
426(S debugging) This indicates that something went wrong and Perl got I<very>
427confused about C<@_> or C<@DB::args> being tied.
428
429=item Bad arg length for %s, is %u, should be %d
430
431(F) You passed a buffer of the wrong size to one of msgctl(), semctl()
432or shmctl().  In C parlance, the correct sizes are, respectively,
433S<sizeof(struct msqid_ds *)>, S<sizeof(struct semid_ds *)>, and
434S<sizeof(struct shmid_ds *)>.
435
436=item Bad evalled substitution pattern
437
438(F) You've used the C</e> switch to evaluate the replacement for a
439substitution, but perl found a syntax error in the code to evaluate,
440most likely an unexpected right brace '}'.
441
442=item Bad filehandle: %s
443
444(F) A symbol was passed to something wanting a filehandle, but the
445symbol has no filehandle associated with it.  Perhaps you didn't do an
446open(), or did it in another package.
447
448=item Bad free() ignored
449
450(S malloc) An internal routine called free() on something that had never
451been malloc()ed in the first place.  Mandatory, but can be disabled by
452setting environment variable C<PERL_BADFREE> to 0.
453
454This message can be seen quite often with DB_File on systems with "hard"
455dynamic linking, like C<AIX> and C<OS/2>.  It is a bug of C<Berkeley DB>
456which is left unnoticed if C<DB> uses I<forgiving> system malloc().
457
458=item Badly placed ()'s
459
460(A) You've accidentally run your script through B<csh> instead
461of Perl.  Check the #! line, or manually feed your script into
462Perl yourself.
463
464=item Bad name after %s
465
466(F) You started to name a symbol by using a package prefix, and then
467didn't finish the symbol.  In particular, you can't interpolate outside
468of quotes, so
469
470    $var = 'myvar';
471    $sym = mypack::$var;
472
473is not the same as
474
475    $var = 'myvar';
476    $sym = "mypack::$var";
477
478=item Bad plugin affecting keyword '%s'
479
480(F) An extension using the keyword plugin mechanism violated the
481plugin API.
482
483=item Bad realloc() ignored
484
485(S malloc) An internal routine called realloc() on something that
486had never been malloc()ed in the first place.  Mandatory, but can
487be disabled by setting the environment variable C<PERL_BADFREE> to 1.
488
489=item Bad symbol for array
490
491(P) An internal request asked to add an array entry to something that
492wasn't a symbol table entry.
493
494=item Bad symbol for dirhandle
495
496(P) An internal request asked to add a dirhandle entry to something
497that wasn't a symbol table entry.
498
499=item Bad symbol for filehandle
500
501(P) An internal request asked to add a filehandle entry to something
502that wasn't a symbol table entry.
503
504=item Bad symbol for hash
505
506(P) An internal request asked to add a hash entry to something that
507wasn't a symbol table entry.
508
509=item Bad symbol for scalar
510
511(P) An internal request asked to add a scalar entry to something that
512wasn't a symbol table entry.
513
514=item Bareword found in conditional
515
516(W bareword) The compiler found a bareword where it expected a
517conditional, which often indicates that an || or && was parsed as part
518of the last argument of the previous construct, for example:
519
520    open FOO || die;
521
522It may also indicate a misspelled constant that has been interpreted as
523a bareword:
524
525    use constant TYPO => 1;
526    if (TYOP) { print "foo" }
527
528The C<strict> pragma is useful in avoiding such errors.
529
530=item Bareword in require contains "%s"
531
532=item Bareword in require maps to disallowed filename "%s"
533
534=item Bareword in require maps to empty filename
535
536(F) The bareword form of require has been invoked with a filename which could
537not have been generated by a valid bareword permitted by the parser.  You
538shouldn't be able to get this error from Perl code, but XS code may throw it
539if it passes an invalid module name to C<Perl_load_module>.
540
541=item Bareword in require must not start with a double-colon: "%s"
542
543(F) In C<require Bare::Word>, the bareword is not allowed to start with a
544double-colon.  Write C<require ::Foo::Bar> as  C<require Foo::Bar> instead.
545
546=item Bareword "%s" not allowed while "strict subs" in use
547
548(F) With "strict subs" in use, a bareword is only allowed as a
549subroutine identifier, in curly brackets or to the left of the "=>"
550symbol.  Perhaps you need to predeclare a subroutine?
551
552=item Bareword "%s" refers to nonexistent package
553
554(W bareword) You used a qualified bareword of the form C<Foo::>, but the
555compiler saw no other uses of that namespace before that point.  Perhaps
556you need to predeclare a package?
557
558=item Bareword filehandle "%s" not allowed under 'no feature "bareword_filehandles"'
559
560(F) You attempted to use a bareword filehandle with the
561C<bareword_filehandles> feature disabled.
562
563Only the built-in handles C<STDIN>, C<STDOUT>, C<STDERR>, C<ARGV>,
564C<ARGVOUT> and C<DATA> can be used with the C<bareword_filehandles>
565feature disabled.
566
567=item BEGIN failed--compilation aborted
568
569(F) An untrapped exception was raised while executing a BEGIN
570subroutine.  Compilation stops immediately and the interpreter is
571exited.
572
573=item BEGIN not safe after errors--compilation aborted
574
575(F) Perl found a C<BEGIN {}> subroutine (or a C<use> directive, which
576implies a C<BEGIN {}>) after one or more compilation errors had already
577occurred.  Since the intended environment for the C<BEGIN {}> could not
578be guaranteed (due to the errors), and since subsequent code likely
579depends on its correct operation, Perl just gave up.
580
581=item \%d better written as $%d
582
583(W syntax) Outside of patterns, backreferences live on as variables.
584The use of backslashes is grandfathered on the right-hand side of a
585substitution, but stylistically it's better to use the variable form
586because other Perl programmers will expect it, and it works better if
587there are more than 9 backreferences.
588
589=item Binary number > 0b11111111111111111111111111111111 non-portable
590
591(W portable) The binary number you specified is larger than 2**32-1
592(4294967295) and therefore non-portable between systems.  See
593L<perlport> for more on portability concerns.
594
595=item bind() on closed socket %s
596
597(W closed) You tried to do a bind on a closed socket.  Did you forget to
598check the return value of your socket() call?  See L<perlfunc/bind>.
599
600=item binmode() on closed filehandle %s
601
602(W unopened) You tried binmode() on a filehandle that was never opened.
603Check your control flow and number of arguments.
604
605=item Bit vector size > 32 non-portable
606
607(W portable) Using bit vector sizes larger than 32 is non-portable.
608
609=item Bizarre copy of %s
610
611(P) Perl detected an attempt to copy an internal value that is not
612copiable.
613
614=item Bizarre SvTYPE [%d]
615
616(P) When starting a new thread or returning values from a thread, Perl
617encountered an invalid data type.
618
619=item Both or neither range ends should be Unicode in regex; marked by
620S<<-- HERE> in m/%s/
621
622(W regexp) (only under C<S<use re 'strict'>> or within C<(?[...])>)
623
624In a bracketed character class in a regular expression pattern, you
625had a range which has exactly one end of it specified using C<\N{}>, and
626the other end is specified using a non-portable mechanism.  Perl treats
627the range as a Unicode range, that is, all the characters in it are
628considered to be the Unicode characters, and which may be different code
629points on some platforms Perl runs on.  For example, C<[\N{U+06}-\x08]>
630is treated as if you had instead said C<[\N{U+06}-\N{U+08}]>, that is it
631matches the characters whose code points in Unicode are 6, 7, and 8.
632But that C<\x08> might indicate that you meant something different, so
633the warning gets raised.
634
635=item Buffer overflow in prime_env_iter: %s
636
637(W internal) A warning peculiar to VMS.  While Perl was preparing to
638iterate over %ENV, it encountered a logical name or symbol definition
639which was too long, so it was truncated to the string shown.
640
641=item Built-in function '%s' is experimental
642
643(S experimental::builtin) A call is being made to a function in the
644C<builtin::> namespace, which is currently experimental. The existence
645or nature of the function may be subject to change in a future version
646of Perl.
647
648=item builtin::import can only be called at compile time
649
650(F) The C<import> method of the C<builtin> package was invoked when no code
651is currently being compiled. Since this method is used to introduce new
652lexical subroutines into the scope currently being compiled, this is not
653going to have any effect.
654
655=item Callback called exit
656
657(F) A subroutine invoked from an external package via call_sv()
658exited by calling exit.
659
660=item %s() called too early to check prototype
661
662(W prototype) You've called a function that has a prototype before the
663parser saw a definition or declaration for it, and Perl could not check
664that the call conforms to the prototype.  You need to either add an
665early prototype declaration for the subroutine in question, or move the
666subroutine definition ahead of the call to get proper prototype
667checking.  Alternatively, if you are certain that you're calling the
668function correctly, you may put an ampersand before the name to avoid
669the warning.  See L<perlsub>.
670
671=item Cannot chr %f
672
673(F) You passed an invalid number (like an infinity or not-a-number) to C<chr>.
674
675=item Cannot complete in-place edit of %s: %s
676
677(F) Your perl script appears to have changed directory while
678performing an in-place edit of a file specified by a relative path,
679and your system doesn't include the directory relative POSIX functions
680needed to handle that.
681
682=item Cannot compress %f in pack
683
684(F) You tried compressing an infinity or not-a-number as an unsigned
685integer with BER, which makes no sense.
686
687=item Cannot compress integer in pack
688
689(F) An argument to pack("w",...) was too large to compress.
690The BER compressed integer format can only be used with positive
691integers, and you attempted to compress a very large number (> 1e308).
692See L<perlfunc/pack>.
693
694=item Cannot compress negative numbers in pack
695
696(F) An argument to pack("w",...) was negative.  The BER compressed integer
697format can only be used with positive integers.  See L<perlfunc/pack>.
698
699=item Cannot convert a reference to %s to typeglob
700
701(F) You manipulated Perl's symbol table directly, stored a reference
702in it, then tried to access that symbol via conventional Perl syntax.
703The access triggers Perl to autovivify that typeglob, but it there is
704no legal conversion from that type of reference to a typeglob.
705
706=item Cannot copy to %s
707
708(P) Perl detected an attempt to copy a value to an internal type that cannot
709be directly assigned to.
710
711=item Cannot find encoding "%s"
712
713(S io) You tried to apply an encoding that did not exist to a filehandle,
714either with open() or binmode().
715
716=item Cannot open %s as a dirhandle: it is already open as a filehandle
717
718(F) You tried to use opendir() to associate a dirhandle to a symbol (glob
719or scalar) that already holds a filehandle.  Since this idiom might render
720your code confusing, it was deprecated in Perl 5.10.  As of Perl 5.28, it
721is a fatal error.
722
723=item Cannot open %s as a filehandle: it is already open as a dirhandle
724
725(F) You tried to use open() to associate a filehandle to a symbol (glob
726or scalar) that already holds a dirhandle.  Since this idiom might render
727your code confusing, it was deprecated in Perl 5.10.  As of Perl 5.28, it
728is a fatal error.
729
730=item Cannot pack %f with '%c'
731
732(F) You tried converting an infinity or not-a-number to an integer,
733which makes no sense.
734
735=item Cannot printf %f with '%c'
736
737(F) You tried printing an infinity or not-a-number as a character (%c),
738which makes no sense.  Maybe you meant '%s', or just stringifying it?
739
740=item Cannot set tied @DB::args
741
742(F) C<caller> tried to set C<@DB::args>, but found it tied.  Tying C<@DB::args>
743is not supported.  (Before this error was added, it used to crash.)
744
745=item Cannot tie unreifiable array
746
747(P) You somehow managed to call C<tie> on an array that does not
748keep a reference count on its arguments and cannot be made to
749do so.  Such arrays are not even supposed to be accessible to
750Perl code, but are only used internally.
751
752=item Cannot yet reorder sv_vcatpvfn() arguments from va_list
753
754(F) Some XS code tried to use C<sv_vcatpvfn()> or a related function with a
755format string that specifies explicit indexes for some of the elements, and
756using a C-style variable-argument list (a C<va_list>).  This is not currently
757supported.  XS authors wanting to do this must instead construct a C array
758of C<SV*> scalars containing the arguments.
759
760=item Can only compress unsigned integers in pack
761
762(F) An argument to pack("w",...) was not an integer.  The BER compressed
763integer format can only be used with positive integers, and you attempted
764to compress something else.  See L<perlfunc/pack>.
765
766=item Can't "%s" out of a "defer" block
767
768(F) An attempt was made to jump out of the scope of a C<defer> block by using
769a control-flow statement such as C<return>, C<goto> or a loop control. This is
770not permitted.
771
772=item Can't "%s" out of a "finally" block
773
774(F) Similar to above, but involving a C<finally> block at the end of a
775C<try>/C<catch> construction rather than a C<defer> block.
776
777=item Can't bless non-reference value
778
779(F) Only hard references may be blessed.  This is how Perl "enforces"
780encapsulation of objects.  See L<perlobj>.
781
782=item Can't "break" in a loop topicalizer
783
784(F) You called C<break>, but you're in a C<foreach> block rather than
785a C<given> block.  You probably meant to use C<next> or C<last>.
786
787=item Can't "break" outside a given block
788
789(F) You called C<break>, but you're not inside a C<given> block.
790
791=item Can't call method "%s" on an undefined value
792
793(F) You used the syntax of a method call, but the slot filled by the
794object reference or package name contains an undefined value.  Something
795like this will reproduce the error:
796
797    $BADREF = undef;
798    process $BADREF 1,2,3;
799    $BADREF->process(1,2,3);
800
801=item Can't call method "%s" on unblessed reference
802
803(F) A method call must know in what package it's supposed to run.  It
804ordinarily finds this out from the object reference you supply, but you
805didn't supply an object reference in this case.  A reference isn't an
806object reference until it has been blessed.  See L<perlobj>.
807
808=item Can't call method "%s" without a package or object reference
809
810(F) You used the syntax of a method call, but the slot filled by the
811object reference or package name contains an expression that returns a
812defined value which is neither an object reference nor a package name.
813Something like this will reproduce the error:
814
815    $BADREF = 42;
816    process $BADREF 1,2,3;
817    $BADREF->process(1,2,3);
818
819=item Can't call mro_isa_changed_in() on anonymous symbol table
820
821(P) Perl got confused as to whether a hash was a plain hash or a
822symbol table hash when trying to update @ISA caches.
823
824=item Can't call mro_method_changed_in() on anonymous symbol table
825
826(F) An XS module tried to call C<mro_method_changed_in> on a hash that was
827not attached to the symbol table.
828
829=item Can't chdir to %s
830
831(F) You called C<perl -x/foo/bar>, but F</foo/bar> is not a directory
832that you can chdir to, possibly because it doesn't exist.
833
834=item Can't coerce %s to %s in %s
835
836(F) Certain types of SVs, in particular real symbol table entries
837(typeglobs), can't be forced to stop being what they are.  So you can't
838say things like:
839
840    *foo += 1;
841
842You CAN say
843
844    $foo = *foo;
845    $foo += 1;
846
847but then $foo no longer contains a glob.
848
849=item Can't "continue" outside a when block
850
851(F) You called C<continue>, but you're not inside a C<when>
852or C<default> block.
853
854=item Can't create pipe mailbox
855
856(P) An error peculiar to VMS.  The process is suffering from exhausted
857quotas or other plumbing problems.
858
859=item Can't declare %s in "%s"
860
861(F) Only scalar, array, and hash variables may be declared as "my", "our" or
862"state" variables.  They must have ordinary identifiers as names.
863
864=item Can't "default" outside a topicalizer
865
866(F) You have used a C<default> block that is neither inside a
867C<foreach> loop nor a C<given> block.  (Note that this error is
868issued on exit from the C<default> block, so you won't get the
869error if you use an explicit C<continue>.)
870
871=item Can't determine class of operator %s, assuming BASEOP
872
873(S) This warning indicates something wrong in the internals of perl.
874Perl was trying to find the class (e.g. LISTOP) of a particular OP,
875and was unable to do so. This is likely to be due to a bug in the perl
876internals, or due to a bug in XS code which manipulates perl optrees.
877
878=item Can't do inplace edit: %s is not a regular file
879
880(S inplace) You tried to use the B<-i> switch on a special file, such as
881a file in /dev, a FIFO or an uneditable directory.  The file was ignored.
882
883=item Can't do inplace edit on %s: %s
884
885(S inplace) The creation of the new file failed for the indicated
886reason.
887
888=item Can't do inplace edit: %s would not be unique
889
890(S inplace) Your filesystem does not support filenames longer than 14
891characters and Perl was unable to create a unique filename during
892inplace editing with the B<-i> switch.  The file was ignored.
893
894=item Can't do %s("%s") on non-UTF-8 locale; resolved to "%s".
895
896(W locale) You are 1) running under "C<use locale>"; 2) the current
897locale is not a UTF-8 one; 3) you tried to do the designated case-change
898operation on the specified Unicode character; and 4) the result of this
899operation would mix Unicode and locale rules, which likely conflict.
900Mixing of different rule types is forbidden, so the operation was not
901done; instead the result is the indicated value, which is the best
902available that uses entirely Unicode rules.  That turns out to almost
903always be the original character, unchanged.
904
905It is generally a bad idea to mix non-UTF-8 locales and Unicode, and
906this issue is one of the reasons why.  This warning is raised when
907Unicode rules would normally cause the result of this operation to
908contain a character that is in the range specified by the locale,
9090..255, and hence is subject to the locale's rules, not Unicode's.
910
911If you are using locale purely for its characteristics related to things
912like its numeric and time formatting (and not C<LC_CTYPE>), consider
913using a restricted form of the locale pragma (see L<perllocale/The "use
914locale" pragma>) like "S<C<use locale ':not_characters'>>".
915
916Note that failed case-changing operations done as a result of
917case-insensitive C</i> regular expression matching will show up in this
918warning as having the C<fc> operation (as that is what the regular
919expression engine calls behind the scenes.)
920
921=item Can't do waitpid with flags
922
923(F) This machine doesn't have either waitpid() or wait4(), so only
924waitpid() without flags is emulated.
925
926=item Can't emulate -%s on #! line
927
928(F) The #! line specifies a switch that doesn't make sense at this
929point.  For example, it'd be kind of silly to put a B<-x> on the #!
930line.
931
932=item Can't %s %s-endian %ss on this platform
933
934(F) Your platform's byte-order is neither big-endian nor little-endian,
935or it has a very strange pointer size.  Packing and unpacking big- or
936little-endian floating point values and pointers may not be possible.
937See L<perlfunc/pack>.
938
939=item Can't exec "%s": %s
940
941(W exec) A system(), exec(), or piped open call could not execute the
942named program for the indicated reason.  Typical reasons include: the
943permissions were wrong on the file, the file wasn't found in
944C<$ENV{PATH}>, the executable in question was compiled for another
945architecture, or the #! line in a script points to an interpreter that
946can't be run for similar reasons.  (Or maybe your system doesn't support
947#! at all.)
948
949=item Can't exec %s
950
951(F) Perl was trying to execute the indicated program for you because
952that's what the #! line said.  If that's not what you wanted, you may
953need to mention "perl" on the #! line somewhere.
954
955=item Can't execute %s
956
957(F) You used the B<-S> switch, but the copies of the script to execute
958found in the PATH did not have correct permissions.
959
960=item Can't find an opnumber for "%s"
961
962(F) A string of a form C<CORE::word> was given to prototype(), but there
963is no builtin with the name C<word>.
964
965=item Can't find label %s
966
967(F) You said to goto a label that isn't mentioned anywhere that it's
968possible for us to go to.  See L<perlfunc/goto>.
969
970=item Can't find %s on PATH
971
972(F) You used the B<-S> switch, but the script to execute could not be
973found in the PATH.
974
975=item Can't find %s on PATH, '.' not in PATH
976
977(F) You used the B<-S> switch, but the script to execute could not be
978found in the PATH, or at least not with the correct permissions.  The
979script exists in the current directory, but PATH prohibits running it.
980
981=item Can't find string terminator %s anywhere before EOF
982
983(F) Perl strings can stretch over multiple lines.  This message means
984that the closing delimiter was omitted.  Because bracketed quotes count
985nesting levels, the following is missing its final parenthesis:
986
987    print q(The character '(' starts a side comment.);
988
989If you're getting this error from a here-document, you may have
990included unseen whitespace before or after your closing tag or there
991may not be a linebreak after it.  A good programmer's editor will have
992a way to help you find these characters (or lack of characters).  See
993L<perlop> for the full details on here-documents.
994
995=item Can't find Unicode property definition "%s"
996
997=item Can't find Unicode property definition "%s" in regex; marked by <-- HERE in m/%s/
998
999(F) The named property which you specified via C<\p> or C<\P> is not one
1000known to Perl.  Perhaps you misspelled the name?  See
1001L<perluniprops/Properties accessible through \p{} and \P{}>
1002for a complete list of available official
1003properties.  If it is a
1004L<user-defined property|perlunicode/User-Defined Character Properties>
1005it must have been defined by the time the regular expression is
1006matched.
1007
1008If you didn't mean to use a Unicode property, escape the C<\p>, either
1009by C<\\p> (just the C<\p>) or by C<\Q\p> (the rest of the string, or
1010until C<\E>).
1011
1012=item Can't fork: %s
1013
1014(F) A fatal error occurred while trying to fork while opening a
1015pipeline.
1016
1017=item Can't fork, trying again in 5 seconds
1018
1019(W pipe) A fork in a piped open failed with EAGAIN and will be retried
1020after five seconds.
1021
1022=item Can't get filespec - stale stat buffer?
1023
1024(S) A warning peculiar to VMS.  This arises because of the difference
1025between access checks under VMS and under the Unix model Perl assumes.
1026Under VMS, access checks are done by filename, rather than by bits in
1027the stat buffer, so that ACLs and other protections can be taken into
1028account.  Unfortunately, Perl assumes that the stat buffer contains all
1029the necessary information, and passes it, instead of the filespec, to
1030the access-checking routine.  It will try to retrieve the filespec using
1031the device name and FID present in the stat buffer, but this works only
1032if you haven't made a subsequent call to the CRTL stat() routine,
1033because the device name is overwritten with each call.  If this warning
1034appears, the name lookup failed, and the access-checking routine gave up
1035and returned FALSE, just to be conservative.  (Note: The access-checking
1036routine knows about the Perl C<stat> operator and file tests, so you
1037shouldn't ever see this warning in response to a Perl command; it arises
1038only if some internal code takes stat buffers lightly.)
1039
1040=item Can't get pipe mailbox device name
1041
1042(P) An error peculiar to VMS.  After creating a mailbox to act as a
1043pipe, Perl can't retrieve its name for later use.
1044
1045=item Can't get SYSGEN parameter value for MAXBUF
1046
1047(P) An error peculiar to VMS.  Perl asked $GETSYI how big you want your
1048mailbox buffers to be, and didn't get an answer.
1049
1050=item Can't "goto" into a binary or list expression
1051
1052(F) A "goto" statement was executed to jump into the middle of a binary
1053or list expression.  You can't get there from here.  The reason for this
1054restriction is that the interpreter would get confused as to how many
1055arguments there are, resulting in stack corruption or crashes.  This
1056error occurs in cases such as these:
1057
1058    goto F;
1059    print do { F: }; # Can't jump into the arguments to print
1060
1061    goto G;
1062    $x + do { G: $y }; # How is + supposed to get its first operand?
1063
1064=item Can't "goto" into a "defer" block
1065
1066(F) A C<goto> statement was executed to jump into the scope of a C<defer>
1067block.  This is not permitted.
1068
1069=item Can't "goto" into a "given" block
1070
1071(F) A "goto" statement was executed to jump into the middle of a C<given>
1072block.  You can't get there from here.  See L<perlfunc/goto>.
1073
1074=item Can't "goto" into the middle of a foreach loop
1075
1076(F) A "goto" statement was executed to jump into the middle of a foreach
1077loop.  You can't get there from here.  See L<perlfunc/goto>.
1078
1079=item Can't "goto" out of a pseudo block
1080
1081(F) A "goto" statement was executed to jump out of what might look like
1082a block, except that it isn't a proper block.  This usually occurs if
1083you tried to jump out of a sort() block or subroutine, which is a no-no.
1084See L<perlfunc/goto>.
1085
1086=item Can't goto subroutine from an eval-%s
1087
1088(F) The "goto subroutine" call can't be used to jump out of an eval
1089"string" or block.
1090
1091=item Can't goto subroutine from a sort sub (or similar callback)
1092
1093(F) The "goto subroutine" call can't be used to jump out of the
1094comparison sub for a sort(), or from a similar callback (such
1095as the reduce() function in List::Util).
1096
1097=item Can't goto subroutine outside a subroutine
1098
1099(F) The deeply magical "goto subroutine" call can only replace one
1100subroutine call for another.  It can't manufacture one out of whole
1101cloth.  In general you should be calling it out of only an AUTOLOAD
1102routine anyway.  See L<perlfunc/goto>.
1103
1104=item Can't ignore signal CHLD, forcing to default
1105
1106(W signal) Perl has detected that it is being run with the SIGCHLD
1107signal (sometimes known as SIGCLD) disabled.  Since disabling this
1108signal will interfere with proper determination of exit status of child
1109processes, Perl has reset the signal to its default value.  This
1110situation typically indicates that the parent program under which Perl
1111may be running (e.g. cron) is being very careless.
1112
1113=item Can't kill a non-numeric process ID
1114
1115(F) Process identifiers must be (signed) integers.  It is a fatal error to
1116attempt to kill() an undefined, empty-string or otherwise non-numeric
1117process identifier.
1118
1119=item Can't "last" outside a loop block
1120
1121(F) A "last" statement was executed to break out of the current block,
1122except that there's this itty bitty problem called there isn't a current
1123block.  Note that an "if" or "else" block doesn't count as a "loopish"
1124block, as doesn't a block given to sort(), map() or grep().  You can
1125usually double the curlies to get the same effect though, because the
1126inner curlies will be considered a block that loops once.  See
1127L<perlfunc/last>.
1128
1129=item Can't linearize anonymous symbol table
1130
1131(F) Perl tried to calculate the method resolution order (MRO) of a
1132package, but failed because the package stash has no name.
1133
1134=item Can't load '%s' for module %s
1135
1136(F) The module you tried to load failed to load a dynamic extension.
1137This may either mean that you upgraded your version of perl to one
1138that is incompatible with your old dynamic extensions (which is known
1139to happen between major versions of perl), or (more likely) that your
1140dynamic extension was built against an older version of the library
1141that is installed on your system.  You may need to rebuild your old
1142dynamic extensions.
1143
1144=item Can't localize lexical variable %s
1145
1146(F) You used local on a variable name that was previously declared as a
1147lexical variable using "my" or "state".  This is not allowed.  If you
1148want to localize a package variable of the same name, qualify it with
1149the package name.
1150
1151=item Can't localize through a reference
1152
1153(F) You said something like C<local $$ref>, which Perl can't currently
1154handle, because when it goes to restore the old value of whatever $ref
1155pointed to after the scope of the local() is finished, it can't be sure
1156that $ref will still be a reference.
1157
1158=item Can't locate %s
1159
1160(F) You said to C<do> (or C<require>, or C<use>) a file that couldn't be found.
1161Perl looks for the file in all the locations mentioned in @INC, unless
1162the file name included the full path to the file.  Perhaps you need
1163to set the PERL5LIB or PERL5OPT environment variable to say where the
1164extra library is, or maybe the script needs to add the library name
1165to @INC.  Or maybe you just misspelled the name of the file.  See
1166L<perlfunc/require> and L<lib>.
1167
1168=item Can't locate auto/%s.al in @INC
1169
1170(F) A function (or method) was called in a package which allows
1171autoload, but there is no function to autoload.  Most probable causes
1172are a misprint in a function/method name or a failure to C<AutoSplit>
1173the file, say, by doing C<make install>.
1174
1175=item Can't locate loadable object for module %s in @INC
1176
1177(F) The module you loaded is trying to load an external library, like
1178for example, F<foo.so> or F<bar.dll>, but the L<DynaLoader> module was
1179unable to locate this library.  See L<DynaLoader>.
1180
1181=item Can't locate object method "%s" via package "%s"
1182
1183(F) You called a method correctly, and it correctly indicated a package
1184functioning as a class, but that package doesn't define that particular
1185method, nor does any of its base classes.  See L<perlobj>.
1186
1187=item Can't locate object method "%s" via package "%s" (perhaps you forgot
1188to load "%s"?)
1189
1190(F) You called a method on a class that did not exist, and the method
1191could not be found in UNIVERSAL.  This often means that a method
1192requires a package that has not been loaded.
1193
1194=item Can't locate package %s for @%s::ISA
1195
1196(W syntax) The @ISA array contained the name of another package that
1197doesn't seem to exist.
1198
1199=item Can't locate PerlIO%s
1200
1201(F) You tried to use in open() a PerlIO layer that does not exist,
1202e.g. open(FH, ">:nosuchlayer", "somefile").
1203
1204=item Can't make list assignment to %ENV on this system
1205
1206(F) List assignment to %ENV is not supported on some systems, notably
1207VMS.
1208
1209=item Can't make loaded symbols global on this platform while loading %s
1210
1211(S) A module passed the flag 0x01 to DynaLoader::dl_load_file() to request
1212that symbols from the stated file are made available globally within the
1213process, but that functionality is not available on this platform.  Whilst
1214the module likely will still work, this may prevent the perl interpreter
1215from loading other XS-based extensions which need to link directly to
1216functions defined in the C or XS code in the stated file.
1217
1218=item Can't modify %s in %s
1219
1220(F) You aren't allowed to assign to the item indicated, or otherwise try
1221to change it, such as with an auto-increment.
1222
1223=item Can't modify non-lvalue subroutine call of &%s
1224
1225=item Can't modify non-lvalue subroutine call of &%s in %s
1226
1227(F) Subroutines meant to be used in lvalue context should be declared as
1228such.  See L<perlsub/"Lvalue subroutines">.
1229
1230=item Can't modify reference to %s in %s assignment
1231
1232(F) Only a limited number of constructs can be used as the argument to a
1233reference constructor on the left-hand side of an assignment, and what
1234you used was not one of them.  See L<perlref/Assigning to References>.
1235
1236=item Can't modify reference to localized parenthesized array in list
1237assignment
1238
1239(F) Assigning to C<\local(@array)> or C<\(local @array)> is not supported, as
1240it is not clear exactly what it should do.  If you meant to make @array
1241refer to some other array, use C<\@array = \@other_array>.  If you want to
1242make the elements of @array aliases of the scalars referenced on the
1243right-hand side, use C<\(@array) = @scalar_refs>.
1244
1245=item Can't modify reference to parenthesized hash in list assignment
1246
1247(F) Assigning to C<\(%hash)> is not supported.  If you meant to make %hash
1248refer to some other hash, use C<\%hash = \%other_hash>.  If you want to
1249make the elements of %hash into aliases of the scalars referenced on the
1250right-hand side, use a hash slice: C<\@hash{@keys} = @those_scalar_refs>.
1251
1252=item Can't msgrcv to read-only var
1253
1254(F) The target of a msgrcv must be modifiable to be used as a receive
1255buffer.
1256
1257=item Can't "next" outside a loop block
1258
1259(F) A "next" statement was executed to reiterate the current block, but
1260there isn't a current block.  Note that an "if" or "else" block doesn't
1261count as a "loopish" block, as doesn't a block given to sort(), map() or
1262grep().  You can usually double the curlies to get the same effect
1263though, because the inner curlies will be considered a block that loops
1264once.  See L<perlfunc/next>.
1265
1266=item Can't open %s: %s
1267
1268(S inplace) The implicit opening of a file through use of the C<< <> >>
1269filehandle, either implicitly under the C<-n> or C<-p> command-line
1270switches, or explicitly, failed for the indicated reason.  Usually
1271this is because you don't have read permission for a file which
1272you named on the command line.
1273
1274(F) You tried to call perl with the B<-e> switch, but F</dev/null> (or
1275your operating system's equivalent) could not be opened.
1276
1277=item Can't open a reference
1278
1279(W io) You tried to open a scalar reference for reading or writing,
1280using the 3-arg open() syntax:
1281
1282    open FH, '>', $ref;
1283
1284but your version of perl is compiled without perlio, and this form of
1285open is not supported.
1286
1287=item Can't open bidirectional pipe
1288
1289(W pipe) You tried to say C<open(CMD, "|cmd|")>, which is not supported.
1290You can try any of several modules in the Perl library to do this, such
1291as IPC::Open2.  Alternately, direct the pipe's output to a file using
1292">", and then read it in under a different file handle.
1293
1294=item Can't open error file %s as stderr
1295
1296(F) An error peculiar to VMS.  Perl does its own command line
1297redirection, and couldn't open the file specified after '2>' or '2>>' on
1298the command line for writing.
1299
1300=item Can't open input file %s as stdin
1301
1302(F) An error peculiar to VMS.  Perl does its own command line
1303redirection, and couldn't open the file specified after '<' on the
1304command line for reading.
1305
1306=item Can't open output file %s as stdout
1307
1308(F) An error peculiar to VMS.  Perl does its own command line
1309redirection, and couldn't open the file specified after '>' or '>>' on
1310the command line for writing.
1311
1312=item Can't open output pipe (name: %s)
1313
1314(P) An error peculiar to VMS.  Perl does its own command line
1315redirection, and couldn't open the pipe into which to send data destined
1316for stdout.
1317
1318=item Can't open perl script "%s": %s
1319
1320(F) The script you specified can't be opened for the indicated reason.
1321
1322If you're debugging a script that uses #!, and normally relies on the
1323shell's $PATH search, the -S option causes perl to do that search, so
1324you don't have to type the path or C<`which $scriptname`>.
1325
1326=item Can't read CRTL environ
1327
1328(S) A warning peculiar to VMS.  Perl tried to read an element of %ENV
1329from the CRTL's internal environment array and discovered the array was
1330missing.  You need to figure out where your CRTL misplaced its environ
1331or define F<PERL_ENV_TABLES> (see L<perlvms>) so that environ is not
1332searched.
1333
1334=item Can't redeclare "%s" in "%s"
1335
1336(F) A "my", "our" or "state" declaration was found within another declaration,
1337such as C<my ($x, my($y), $z)> or C<our (my $x)>.
1338
1339=item Can't "redo" outside a loop block
1340
1341(F) A "redo" statement was executed to restart the current block, but
1342there isn't a current block.  Note that an "if" or "else" block doesn't
1343count as a "loopish" block, as doesn't a block given to sort(), map()
1344or grep().  You can usually double the curlies to get the same effect
1345though, because the inner curlies will be considered a block that
1346loops once.  See L<perlfunc/redo>.
1347
1348=item Can't remove %s: %s, skipping file
1349
1350(S inplace) You requested an inplace edit without creating a backup
1351file.  Perl was unable to remove the original file to replace it with
1352the modified file.  The file was left unmodified.
1353
1354=item Can't rename in-place work file '%s' to '%s': %s
1355
1356(F) When closed implicitly, the temporary file for in-place editing
1357couldn't be renamed to the original filename.
1358
1359=item Can't rename %s to %s: %s, skipping file
1360
1361(F) The rename done by the B<-i> switch failed for some reason,
1362probably because you don't have write permission to the directory.
1363
1364=item Can't reopen input pipe (name: %s) in binary mode
1365
1366(P) An error peculiar to VMS.  Perl thought stdin was a pipe, and tried
1367to reopen it to accept binary data.  Alas, it failed.
1368
1369=item Can't represent character for Ox%X on this platform
1370
1371(F) There is a hard limit to how big a character code point can be due
1372to the fundamental properties of UTF-8, especially on EBCDIC
1373platforms.  The given code point exceeds that.  The only work-around is
1374to not use such a large code point.
1375
1376=item Can't reset %ENV on this system
1377
1378(F) You called C<reset('E')> or similar, which tried to reset
1379all variables in the current package beginning with "E".  In
1380the main package, that includes %ENV.  Resetting %ENV is not
1381supported on some systems, notably VMS.
1382
1383=item Can't resolve method "%s" overloading "%s" in package "%s"
1384
1385(F)(P) Error resolving overloading specified by a method name (as
1386opposed to a subroutine reference): no such method callable via the
1387package.  If the method name is C<???>, this is an internal error.
1388
1389=item Can't return %s from lvalue subroutine
1390
1391(F) Perl detected an attempt to return illegal lvalues (such as
1392temporary or readonly values) from a subroutine used as an lvalue.  This
1393is not allowed.
1394
1395=item Can't return outside a subroutine
1396
1397(F) The return statement was executed in mainline code, that is, where
1398there was no subroutine call to return out of.  See L<perlsub>.
1399
1400=item Can't return %s to lvalue scalar context
1401
1402(F) You tried to return a complete array or hash from an lvalue
1403subroutine, but you called the subroutine in a way that made Perl
1404think you meant to return only one value.  You probably meant to
1405write parentheses around the call to the subroutine, which tell
1406Perl that the call should be in list context.
1407
1408=item Can't take log of %g
1409
1410(F) For ordinary real numbers, you can't take the logarithm of a
1411negative number or zero.  There's a Math::Complex package that comes
1412standard with Perl, though, if you really want to do that for the
1413negative numbers.
1414
1415=item Can't take sqrt of %g
1416
1417(F) For ordinary real numbers, you can't take the square root of a
1418negative number.  There's a Math::Complex package that comes standard
1419with Perl, though, if you really want to do that.
1420
1421=item Can't undef active subroutine
1422
1423(F) You can't undefine a routine that's currently running.  You can,
1424however, redefine it while it's running, and you can even undef the
1425redefined subroutine while the old routine is running.  Go figure.
1426
1427=item Can't unweaken a nonreference
1428
1429(F) You attempted to unweaken something that was not a reference.  Only
1430references can be unweakened.
1431
1432=item Can't upgrade %s (%d) to %d
1433
1434(P) The internal sv_upgrade routine adds "members" to an SV, making it
1435into a more specialized kind of SV.  The top several SV types are so
1436specialized, however, that they cannot be interconverted.  This message
1437indicates that such a conversion was attempted.
1438
1439=item Can't use '%c' after -mname
1440
1441(F) You tried to call perl with the B<-m> switch, but you put something
1442other than "=" after the module name.
1443
1444=item Can't use a hash as a reference
1445
1446(F) You tried to use a hash as a reference, as in
1447C<< %foo->{"bar"} >> or C<< %$ref->{"hello"} >>.  Versions of perl
1448<= 5.22.0 used to allow this syntax, but shouldn't
1449have.  This was deprecated in perl 5.6.1.
1450
1451=item Can't use an array as a reference
1452
1453(F) You tried to use an array as a reference, as in
1454C<< @foo->[23] >> or C<< @$ref->[99] >>.  Versions of perl <= 5.22.0
1455used to allow this syntax, but shouldn't have.  This
1456was deprecated in perl 5.6.1.
1457
1458=item Can't use anonymous symbol table for method lookup
1459
1460(F) The internal routine that does method lookup was handed a symbol
1461table that doesn't have a name.  Symbol tables can become anonymous
1462for example by undefining stashes: C<undef %Some::Package::>.
1463
1464=item Can't use an undefined value as %s reference
1465
1466(F) A value used as either a hard reference or a symbolic reference must
1467be a defined value.  This helps to delurk some insidious errors.
1468
1469=item Can't use bareword ("%s") as %s ref while "strict refs" in use
1470
1471(F) Only hard references are allowed by "strict refs".  Symbolic
1472references are disallowed.  See L<perlref>.
1473
1474=item Can't use %! because Errno.pm is not available
1475
1476(F) The first time the C<%!> hash is used, perl automatically loads the
1477Errno.pm module.  The Errno module is expected to tie the %! hash to
1478provide symbolic names for C<$!> errno values.
1479
1480=item Can't use both '<' and '>' after type '%c' in %s
1481
1482(F) A type cannot be forced to have both big-endian and little-endian
1483byte-order at the same time, so this combination of modifiers is not
1484allowed.  See L<perlfunc/pack>.
1485
1486=item Can't use 'defined(@array)' (Maybe you should just omit the defined()?)
1487
1488(F) defined() is not useful on arrays because it
1489checks for an undefined I<scalar> value.  If you want to see if the
1490array is empty, just use C<if (@array) { # not empty }> for example.
1491
1492=item Can't use 'defined(%hash)' (Maybe you should just omit the defined()?)
1493
1494(F) C<defined()> is not usually right on hashes.
1495
1496Although C<defined %hash> is false on a plain not-yet-used hash, it
1497becomes true in several non-obvious circumstances, including iterators,
1498weak references, stash names, even remaining true after C<undef %hash>.
1499These things make C<defined %hash> fairly useless in practice, so it now
1500generates a fatal error.
1501
1502If a check for non-empty is what you wanted then just put it in boolean
1503context (see L<perldata/Scalar values>):
1504
1505    if (%hash) {
1506       # not empty
1507    }
1508
1509If you had C<defined %Foo::Bar::QUUX> to check whether such a package
1510variable exists then that's never really been reliable, and isn't
1511a good way to enquire about the features of a package, or whether
1512it's loaded, etc.
1513
1514=item Can't use %s for loop variable
1515
1516(P) The parser got confused when trying to parse a C<foreach> loop.
1517
1518=item Can't use global %s in %s
1519
1520(F) You tried to declare a magical variable as a lexical variable.  This
1521is not allowed, because the magic can be tied to only one location
1522(namely the global variable) and it would be incredibly confusing to
1523have variables in your program that looked like magical variables but
1524weren't.
1525
1526=item Can't use '%c' in a group with different byte-order in %s
1527
1528(F) You attempted to force a different byte-order on a type
1529that is already inside a group with a byte-order modifier.
1530For example you cannot force little-endianness on a type that
1531is inside a big-endian group.
1532
1533=item Can't use "my %s" in sort comparison
1534
1535(F) The global variables $a and $b are reserved for sort comparisons.
1536You mentioned $a or $b in the same line as the <=> or cmp operator,
1537and the variable had earlier been declared as a lexical variable.
1538Either qualify the sort variable with the package name, or rename the
1539lexical variable.
1540
1541=item Can't use %s ref as %s ref
1542
1543(F) You've mixed up your reference types.  You have to dereference a
1544reference of the type needed.  You can use the ref() function to
1545test the type of the reference, if need be.
1546
1547=item Can't use string ("%s") as %s ref while "strict refs" in use
1548
1549=item Can't use string ("%s"...) as %s ref while "strict refs" in use
1550
1551(F) You've told Perl to dereference a string, something which
1552C<use strict> blocks to prevent it happening accidentally.  See
1553L<perlref/"Symbolic references">.  This can be triggered by an C<@> or C<$>
1554in a double-quoted string immediately before interpolating a variable,
1555for example in C<"user @$twitter_id">, which says to treat the contents
1556of C<$twitter_id> as an array reference; use a C<\> to have a literal C<@>
1557symbol followed by the contents of C<$twitter_id>: C<"user \@$twitter_id">.
1558
1559=item Can't use subscript on %s
1560
1561(F) The compiler tried to interpret a bracketed expression as a
1562subscript.  But to the left of the brackets was an expression that
1563didn't look like a hash or array reference, or anything else subscriptable.
1564
1565=item Can't use \%c to mean $%c in expression
1566
1567(W syntax) In an ordinary expression, backslash is a unary operator that
1568creates a reference to its argument.  The use of backslash to indicate a
1569backreference to a matched substring is valid only as part of a regular
1570expression pattern.  Trying to do this in ordinary Perl code produces a
1571value that prints out looking like SCALAR(0xdecaf).  Use the $1 form
1572instead.
1573
1574=item Can't weaken a nonreference
1575
1576(F) You attempted to weaken something that was not a reference.  Only
1577references can be weakened.
1578
1579=item Can't "when" outside a topicalizer
1580
1581(F) You have used a when() block that is neither inside a C<foreach>
1582loop nor a C<given> block.  (Note that this error is issued on exit
1583from the C<when> block, so you won't get the error if the match fails,
1584or if you use an explicit C<continue>.)
1585
1586=item Can't x= to read-only value
1587
1588(F) You tried to repeat a constant value (often the undefined value)
1589with an assignment operator, which implies modifying the value itself.
1590Perhaps you need to copy the value to a temporary, and repeat that.
1591
1592=item Character following "\c" must be printable ASCII
1593
1594(F) In C<\cI<X>>, I<X> must be a printable (non-control) ASCII character.
1595
1596Note that ASCII characters that don't map to control characters are
1597discouraged, and will generate the warning (when enabled)
1598L</""\c%c" is more clearly written simply as "%s"">.
1599
1600=item Character following \%c must be '{' or a single-character Unicode property name in regex; marked by <-- HERE in m/%s/
1601
1602(F) (In the above the C<%c> is replaced by either C<p> or C<P>.)  You
1603specified something that isn't a legal Unicode property name.  Most
1604Unicode properties are specified by C<\p{...}>.  But if the name is a
1605single character one, the braces may be omitted.
1606
1607=item Character in 'C' format wrapped in pack
1608
1609(W pack) You said
1610
1611    pack("C", $x)
1612
1613where $x is either less than 0 or more than 255; the C<"C"> format is
1614only for encoding native operating system characters (ASCII, EBCDIC,
1615and so on) and not for Unicode characters, so Perl behaved as if you meant
1616
1617    pack("C", $x & 255)
1618
1619If you actually want to pack Unicode codepoints, use the C<"U"> format
1620instead.
1621
1622=item Character in 'c' format wrapped in pack
1623
1624(W pack) You said
1625
1626    pack("c", $x)
1627
1628where $x is either less than -128 or more than 127; the C<"c"> format
1629is only for encoding native operating system characters (ASCII, EBCDIC,
1630and so on) and not for Unicode characters, so Perl behaved as if you meant
1631
1632    pack("c", $x & 255);
1633
1634If you actually want to pack Unicode codepoints, use the C<"U"> format
1635instead.
1636
1637=item Character in '%c' format wrapped in unpack
1638
1639(W unpack) You tried something like
1640
1641   unpack("H", "\x{2a1}")
1642
1643where the format expects to process a byte (a character with a value
1644below 256), but a higher value was provided instead.  Perl uses the
1645value modulus 256 instead, as if you had provided:
1646
1647   unpack("H", "\x{a1}")
1648
1649=item Character in 'W' format wrapped in pack
1650
1651(W pack) You said
1652
1653    pack("U0W", $x)
1654
1655where $x is either less than 0 or more than 255.  However, C<U0>-mode
1656expects all values to fall in the interval [0, 255], so Perl behaved
1657as if you meant:
1658
1659    pack("U0W", $x & 255)
1660
1661=item Character(s) in '%c' format wrapped in pack
1662
1663(W pack) You tried something like
1664
1665   pack("u", "\x{1f3}b")
1666
1667where the format expects to process a sequence of bytes (character with a
1668value below 256), but some of the characters had a higher value.  Perl
1669uses the character values modulus 256 instead, as if you had provided:
1670
1671   pack("u", "\x{f3}b")
1672
1673=item Character(s) in '%c' format wrapped in unpack
1674
1675(W unpack) You tried something like
1676
1677   unpack("s", "\x{1f3}b")
1678
1679where the format expects to process a sequence of bytes (character with a
1680value below 256), but some of the characters had a higher value.  Perl
1681uses the character values modulus 256 instead, as if you had provided:
1682
1683   unpack("s", "\x{f3}b")
1684
1685=item charnames alias definitions may not contain a sequence of multiple
1686spaces; marked by S<<-- HERE> in %s
1687
1688(F) You defined a character name which had multiple space characters
1689in a row.  Change them to single spaces.  Usually these names are
1690defined in the C<:alias> import argument to C<use charnames>, but they
1691could be defined by a translator installed into C<$^H{charnames}>.  See
1692L<charnames/CUSTOM ALIASES>.
1693
1694=item chdir() on unopened filehandle %s
1695
1696(W unopened) You tried chdir() on a filehandle that was never opened.
1697
1698=item "\c%c" is more clearly written simply as "%s"
1699
1700(W syntax) The C<\cI<X>> construct is intended to be a way to specify
1701non-printable characters.  You used it for a printable one, which
1702is better written as simply itself, perhaps preceded by a backslash
1703for non-word characters.  Doing it the way you did is not portable
1704between ASCII and EBCDIC platforms.
1705
1706=item Cloning substitution context is unimplemented
1707
1708(F) Creating a new thread inside the C<s///> operator is not supported.
1709
1710=item closedir() attempted on invalid dirhandle %s
1711
1712(W io) The dirhandle you tried to close is either closed or not really
1713a dirhandle.  Check your control flow.
1714
1715=item close() on unopened filehandle %s
1716
1717(W unopened) You tried to close a filehandle that was never opened.
1718
1719=item Closure prototype called
1720
1721(F) If a closure has attributes, the subroutine passed to an attribute
1722handler is the prototype that is cloned when a new closure is created.
1723This subroutine cannot be called.
1724
1725=item \C no longer supported in regex; marked by S<<-- HERE> in m/%s/
1726
1727(F) The \C character class used to allow a match of single byte
1728within a multi-byte utf-8 character, but was removed in v5.24 as
1729it broke encapsulation and its implementation was extremely buggy.
1730If you really need to process the individual bytes, you probably
1731want to convert your string to one where each underlying byte is
1732stored as a character, with utf8::encode().
1733
1734=item Code missing after '/'
1735
1736(F) You had a (sub-)template that ends with a '/'.  There must be
1737another template code following the slash.  See L<perlfunc/pack>.
1738
1739=item Code point 0x%X is not Unicode, and not portable
1740
1741(S non_unicode portable) You had a code point that has never been in any
1742standard, so it is likely that languages other than Perl will NOT
1743understand it.  This code point also will not fit in a 32-bit word on
1744ASCII platforms and therefore is non-portable between systems.
1745
1746At one time, it was legal in some standards to have code points up to
17470x7FFF_FFFF, but not higher, and this code point is higher.
1748
1749Acceptance of these code points is a Perl extension, and you should
1750expect that nothing other than Perl can handle them; Perl itself on
1751EBCDIC platforms before v5.24 does not handle them.
1752
1753Perl also makes no guarantees that the representation of these code
1754points won't change at some point in the future, say when machines
1755become available that have larger than a 64-bit word.  At that time,
1756files containing any of these, written by an older Perl might require
1757conversion before being readable by a newer Perl.
1758
1759=item Code point 0x%X is not Unicode, may not be portable
1760
1761(S non_unicode) You had a code point above the Unicode maximum
1762of U+10FFFF.
1763
1764Perl allows strings to contain a superset of Unicode code points, but
1765these may not be accepted by other languages/systems.  Further, even if
1766these languages/systems accept these large code points, they may have
1767chosen a different representation for them than the UTF-8-like one that
1768Perl has, which would mean files are not exchangeable between them and
1769Perl.
1770
1771On EBCDIC platforms, code points above 0x3FFF_FFFF have a different
1772representation in Perl v5.24 than before, so any file containing these
1773that was written before that version will require conversion before
1774being readable by a later Perl.
1775
1776=item %s: Command not found
1777
1778(A) You've accidentally run your script through B<csh> or another shell
1779instead of Perl.  Check the #! line, or manually feed your script into
1780Perl yourself.  The #! line at the top of your file could look like
1781
1782  #!/usr/bin/perl
1783
1784=item %s: command not found
1785
1786(A) You've accidentally run your script through B<bash> or another shell
1787instead of Perl.  Check the #! line, or manually feed your script into
1788Perl yourself.  The #! line at the top of your file could look like
1789
1790  #!/usr/bin/perl
1791
1792=item %s: command not found: %s
1793
1794(A) You've accidentally run your script through B<zsh> or another shell
1795instead of Perl.  Check the #! line, or manually feed your script into
1796Perl yourself.  The #! line at the top of your file could look like
1797
1798  #!/usr/bin/perl
1799
1800=item Compilation failed in require
1801
1802(F) Perl could not compile a file specified in a C<require> statement.
1803Perl uses this generic message when none of the errors that it
1804encountered were severe enough to halt compilation immediately.
1805
1806=item Complex regular subexpression recursion limit (%d) exceeded
1807
1808(W regexp) The regular expression engine uses recursion in complex
1809situations where back-tracking is required.  Recursion depth is limited
1810to 32766, or perhaps less in architectures where the stack cannot grow
1811arbitrarily.  ("Simple" and "medium" situations are handled without
1812recursion and are not subject to a limit.)  Try shortening the string
1813under examination; looping in Perl code (e.g. with C<while>) rather than
1814in the regular expression engine; or rewriting the regular expression so
1815that it is simpler or backtracks less.  (See L<perlfaq2> for information
1816on I<Mastering Regular Expressions>.)
1817
1818=item connect() on closed socket %s
1819
1820(W closed) You tried to do a connect on a closed socket.  Did you forget
1821to check the return value of your socket() call?  See
1822L<perlfunc/connect>.
1823
1824=item Constant(%s): Call to &{$^H{%s}} did not return a defined value
1825
1826(F) The subroutine registered to handle constant overloading
1827(see L<overload>) or a custom charnames handler (see
1828L<charnames/CUSTOM TRANSLATORS>) returned an undefined value.
1829
1830=item Constant(%s): $^H{%s} is not defined
1831
1832(F) The parser found inconsistencies while attempting to define an
1833overloaded constant.  Perhaps you forgot to load the corresponding
1834L<overload> pragma?
1835
1836=item Constant is not %s reference
1837
1838(F) A constant value (perhaps declared using the C<use constant> pragma)
1839is being dereferenced, but it amounts to the wrong type of reference.
1840The message indicates the type of reference that was expected.  This
1841usually indicates a syntax error in dereferencing the constant value.
1842See L<perlsub/"Constant Functions"> and L<constant>.
1843
1844=item Constants from lexical variables potentially modified elsewhere are no longer permitted
1845
1846(F) You wrote something like
1847
1848    my $var;
1849    $sub = sub () { $var };
1850
1851but $var is referenced elsewhere and could be modified after the C<sub>
1852expression is evaluated.  Either it is explicitly modified elsewhere
1853(C<$var = 3>) or it is passed to a subroutine or to an operator like
1854C<printf> or C<map>, which may or may not modify the variable.
1855
1856Traditionally, Perl has captured the value of the variable at that
1857point and turned the subroutine into a constant eligible for inlining.
1858In those cases where the variable can be modified elsewhere, this
1859breaks the behavior of closures, in which the subroutine captures
1860the variable itself, rather than its value, so future changes to the
1861variable are reflected in the subroutine's return value.
1862
1863This usage was deprecated, and as of Perl 5.32 is no longer allowed,
1864making it possible to change the behavior in the future.
1865
1866If you intended for the subroutine to be eligible for inlining, then
1867make sure the variable is not referenced elsewhere, possibly by
1868copying it:
1869
1870    my $var2 = $var;
1871    $sub = sub () { $var2 };
1872
1873If you do want this subroutine to be a closure that reflects future
1874changes to the variable that it closes over, add an explicit C<return>:
1875
1876    my $var;
1877    $sub = sub () { return $var };
1878
1879=item Constant subroutine %s redefined
1880
1881(W redefine)(S) You redefined a subroutine which had previously
1882been eligible for inlining.  See L<perlsub/"Constant Functions">
1883for commentary and workarounds.
1884
1885=item Constant subroutine %s undefined
1886
1887(W misc) You undefined a subroutine which had previously been eligible
1888for inlining.  See L<perlsub/"Constant Functions"> for commentary and
1889workarounds.
1890
1891=item Constant(%s) unknown
1892
1893(F) The parser found inconsistencies either while attempting
1894to define an overloaded constant, or when trying to find the
1895character name specified in the C<\N{...}> escape.  Perhaps you
1896forgot to load the corresponding L<overload> pragma?
1897
1898=item :const is experimental
1899
1900(S experimental::const_attr) The "const" attribute is experimental.
1901If you want to use the feature, disable the warning with C<no warnings
1902'experimental::const_attr'>, but know that in doing so you are taking
1903the risk that your code may break in a future Perl version.
1904
1905=item :const is not permitted on named subroutines
1906
1907(F) The "const" attribute causes an anonymous subroutine to be run and
1908its value captured at the time that it is cloned.  Named subroutines are
1909not cloned like this, so the attribute does not make sense on them.
1910
1911=item Copy method did not return a reference
1912
1913(F) The method which overloads "=" is buggy.  See
1914L<overload/Copy Constructor>.
1915
1916=item &CORE::%s cannot be called directly
1917
1918(F) You tried to call a subroutine in the C<CORE::> namespace
1919with C<&foo> syntax or through a reference.  Some subroutines
1920in this package cannot yet be called that way, but must be
1921called as barewords.  Something like this will work:
1922
1923    BEGIN { *shove = \&CORE::push; }
1924    shove @array, 1,2,3; # pushes on to @array
1925
1926=item CORE::%s is not a keyword
1927
1928(F) The CORE:: namespace is reserved for Perl keywords.
1929
1930=item Corrupted regexp opcode %d > %d
1931
1932(P) This is either an error in Perl, or, if you're using
1933one, your L<custom regular expression engine|perlreapi>.  If not the
1934latter, report the problem to L<https://github.com/Perl/perl5/issues>.
1935
1936=item corrupted regexp pointers
1937
1938(P) The regular expression engine got confused by what the regular
1939expression compiler gave it.
1940
1941=item corrupted regexp program
1942
1943(P) The regular expression engine got passed a regexp program without a
1944valid magic number.
1945
1946=item Corrupt malloc ptr 0x%x at 0x%x
1947
1948(P) The malloc package that comes with Perl had an internal failure.
1949
1950=item Count after length/code in unpack
1951
1952(F) You had an unpack template indicating a counted-length string, but
1953you have also specified an explicit size for the string.  See
1954L<perlfunc/pack>.
1955
1956=item Declaring references is experimental
1957
1958(S experimental::declared_refs) This warning is emitted if you use
1959a reference constructor on the right-hand side of C<my>, C<state>, C<our>, or
1960C<local>.  Simply suppress the warning if you want to use the feature, but
1961know that in doing so you are taking the risk of using an experimental
1962feature which may change or be removed in a future Perl version:
1963
1964    no warnings "experimental::declared_refs";
1965    use feature "declared_refs";
1966    $fooref = my \$foo;
1967
1968=for comment
1969The following are used in lib/diagnostics.t for testing two =items that
1970share the same description.  Changes here need to be propagated to there
1971
1972=item Deep recursion on anonymous subroutine
1973
1974=item Deep recursion on subroutine "%s"
1975
1976(W recursion) This subroutine has called itself (directly or indirectly)
1977100 times more than it has returned.  This probably indicates an
1978infinite recursion, unless you're writing strange benchmark programs, in
1979which case it indicates something else.
1980
1981This threshold can be changed from 100, by recompiling the F<perl> binary,
1982setting the C pre-processor macro C<PERL_SUB_DEPTH_WARN> to the desired value.
1983
1984=item (?(DEFINE)....) does not allow branches in regex; marked by
1985S<<-- HERE> in m/%s/
1986
1987(F) You used something like C<(?(DEFINE)...|..)> which is illegal.  The
1988most likely cause of this error is that you left out a parenthesis inside
1989of the C<....> part.
1990
1991The S<<-- HERE> shows whereabouts in the regular expression the problem was
1992discovered.
1993
1994=item %s defines neither package nor VERSION--version check failed
1995
1996(F) You said something like "use Module 42" but in the Module file
1997there are neither package declarations nor a C<$VERSION>.
1998
1999=item delete argument is not a HASH or ARRAY element or slice
2000
2001(F) The argument to C<delete> must be either a hash or array element,
2002such as:
2003
2004    $foo{$bar}
2005    $ref->{"susie"}[12]
2006
2007or a hash or array slice, such as:
2008
2009    @foo[$bar, $baz, $xyzzy]
2010    $ref->[12]->@{"susie", "queue"}
2011
2012or a hash key/value or array index/value slice, such as:
2013
2014    %foo[$bar, $baz, $xyzzy]
2015    $ref->[12]->%{"susie", "queue"}
2016
2017=item Delimiter for here document is too long
2018
2019(F) In a here document construct like C<<<FOO>, the label C<FOO> is too
2020long for Perl to handle.  You have to be seriously twisted to write code
2021that triggers this error.
2022
2023=item DESTROY created new reference to dead object '%s'
2024
2025(F) A DESTROY() method created a new reference to the object which is
2026just being DESTROYed.  Perl is confused, and prefers to abort rather
2027than to create a dangling reference.
2028
2029=item Did not produce a valid header
2030
2031See L</500 Server error>.
2032
2033=item %s did not return a true value
2034
2035(F) A required (or used) file must return a true value to indicate that
2036it compiled correctly and ran its initialization code correctly.  It's
2037traditional to end such a file with a "1;", though any true value would
2038do.  See L<perlfunc/require>.
2039
2040=item (Did you mean &%s instead?)
2041
2042(W misc) You probably referred to an imported subroutine &FOO as $FOO or
2043some such.
2044
2045=item (Did you mean "local" instead of "our"?)
2046
2047(W shadow) Remember that "our" does not localize the declared global
2048variable.  You have declared it again in the same lexical scope, which
2049seems superfluous.
2050
2051=item (Did you mean $ or @ instead of %?)
2052
2053(W) You probably said %hash{$key} when you meant $hash{$key} or
2054@hash{@keys}.  On the other hand, maybe you just meant %hash and got
2055carried away.
2056
2057=item Died
2058
2059(F) You passed die() an empty string (the equivalent of C<die "">) or
2060you called it with no args and C<$@> was empty.
2061
2062=item Document contains no data
2063
2064See L</500 Server error>.
2065
2066=item %s does not define %s::VERSION--version check failed
2067
2068(F) You said something like "use Module 42" but the Module did not
2069define a C<$VERSION>.
2070
2071=item '/' does not take a repeat count in %s
2072
2073(F) You cannot put a repeat count of any kind right after the '/' code.
2074See L<perlfunc/pack>.
2075
2076=item do "%s" failed, '.' is no longer in @INC; did you mean do "./%s"?
2077
2078(D deprecated) Previously C< do "somefile"; > would search the current
2079directory for the specified file.  Since perl v5.26.0, F<.> has been
2080removed from C<@INC> by default, so this is no longer true.  To search the
2081current directory (and only the current directory) you can write
2082C< do "./somefile"; >.
2083
2084=item Don't know how to get file name
2085
2086(P) C<PerlIO_getname>, a perl internal I/O function specific to VMS, was
2087somehow called on another platform.  This should not happen.
2088
2089=item Don't know how to handle magic of type \%o
2090
2091(P) The internal handling of magical variables has been cursed.
2092
2093=item Downgrading a use VERSION declaration to below v5.11 is deprecated
2094
2095(S deprecated) This warning is emitted on a C<use VERSION> statement that
2096requests a version below v5.11 (when the effects of C<use strict> would be
2097disabled), after a previous declaration of one having a larger number (which
2098would have enabled these effects). Because of a change to the way that
2099C<use VERSION> interacts with the strictness flags, this is no longer
2100supported.
2101
2102=item (Do you need to predeclare %s?)
2103
2104(S syntax) This is an educated guess made in conjunction with the message
2105"%s found where operator expected".  It often means a subroutine or module
2106name is being referenced that hasn't been declared yet.  This may be
2107because of ordering problems in your file, or because of a missing
2108"sub", "package", "require", or "use" statement.  If you're referencing
2109something that isn't defined yet, you don't actually have to define the
2110subroutine or package before the current location.  You can use an empty
2111"sub foo;" or "package FOO;" to enter a "forward" declaration.
2112
2113=item dump() must be written as CORE::dump() as of Perl 5.30
2114
2115(F) You used the obsolete C<dump()> built-in function.  That was deprecated in
2116Perl 5.8.0.  As of Perl 5.30 it must be written in fully qualified format:
2117C<CORE::dump()>.
2118
2119See L<perlfunc/dump>.
2120
2121=item dump is not supported
2122
2123(F) Your machine doesn't support dump/undump.
2124
2125=item Duplicate free() ignored
2126
2127(S malloc) An internal routine called free() on something that had
2128already been freed.
2129
2130=item Duplicate modifier '%c' after '%c' in %s
2131
2132(W unpack) You have applied the same modifier more than once after a
2133type in a pack template.  See L<perlfunc/pack>.
2134
2135=item each on anonymous %s will always start from the beginning
2136
2137(W syntax) You called L<each|perlfunc/each> on an anonymous hash or
2138array.  Since a new hash or array is created each time, each() will
2139restart iterating over your hash or array every time.
2140
2141=item elseif should be elsif
2142
2143(S syntax) There is no keyword "elseif" in Perl because Larry thinks
2144it's ugly.  Your code will be interpreted as an attempt to call a method
2145named "elseif" for the class returned by the following block.  This is
2146unlikely to be what you want.
2147
2148=item Empty \%c in regex; marked by S<<-- HERE> in m/%s/
2149
2150=item Empty \%c{}
2151
2152=item Empty \%c{} in regex; marked by S<<-- HERE> in m/%s/
2153
2154(F) You used something like C<\b{}>, C<\B{}>, C<\o{}>, C<\p>, C<\P>, or
2155C<\x> without specifying anything for it to operate on.
2156
2157Unfortunately, for backwards compatibility reasons, an empty C<\x> is
2158legal outside S<C<use re 'strict'>> and expands to a NUL character.
2159
2160=item Empty (?) without any modifiers in regex; marked by <-- HERE in m/%s/
2161
2162(W regexp) (only under C<S<use re 'strict'>>)
2163C<(?)> does nothing, so perhaps this is a typo.
2164
2165=item ${^ENCODING} is no longer supported
2166
2167(F) The special variable C<${^ENCODING}>, formerly used to implement
2168the C<encoding> pragma, is no longer supported as of Perl 5.26.0.
2169
2170Setting it to anything other than C<undef> is a fatal error as of Perl
21715.28.
2172
2173=item entering effective %s failed
2174
2175(F) While under the C<use filetest> pragma, switching the real and
2176effective uids or gids failed.
2177
2178=item %ENV is aliased to %s
2179
2180(F) You're running under taint mode, and the C<%ENV> variable has been
2181aliased to another hash, so it doesn't reflect anymore the state of the
2182program's environment.  This is potentially insecure.
2183
2184=item Error converting file specification %s
2185
2186(F) An error peculiar to VMS.  Because Perl may have to deal with file
2187specifications in either VMS or Unix syntax, it converts them to a
2188single form when it must operate on them directly.  Either you've passed
2189an invalid file specification to Perl, or you've found a case the
2190conversion routines don't handle.  Drat.
2191
2192=item Error %s in expansion of %s
2193
2194(F) An error was encountered in handling a user-defined property
2195(L<perlunicode/User-Defined Character Properties>).  These are
2196programmer written subroutines, hence subject to errors that may
2197prevent them from compiling or running.  The calls to these subs are
2198C<eval>'d, and if there is a failure, this message is raised, using the
2199contents of C<$@> from the failed C<eval>.
2200
2201Another possibility is that tainted data was encountered somewhere in
2202the chain of expanding the property.  If so, the message wording will
2203indicate that this is the problem.  See L</Insecure user-defined
2204property %s>.
2205
2206=item Eval-group in insecure regular expression
2207
2208(F) Perl detected tainted data when trying to compile a regular
2209expression that contains the C<(?{ ... })> zero-width assertion, which
2210is unsafe.  See L<perlre/(?{ code })>, and L<perlsec>.
2211
2212=item Eval-group not allowed at runtime, use re 'eval' in regex m/%s/
2213
2214(F) Perl tried to compile a regular expression containing the
2215C<(?{ ... })> zero-width assertion at run time, as it would when the
2216pattern contains interpolated values.  Since that is a security risk,
2217it is not allowed.  If you insist, you may still do this by using the
2218C<re 'eval'> pragma or by explicitly building the pattern from an
2219interpolated string at run time and using that in an eval().  See
2220L<perlre/(?{ code })>.
2221
2222=item Eval-group not allowed, use re 'eval' in regex m/%s/
2223
2224(F) A regular expression contained the C<(?{ ... })> zero-width
2225assertion, but that construct is only allowed when the C<use re 'eval'>
2226pragma is in effect.  See L<perlre/(?{ code })>.
2227
2228=item EVAL without pos change exceeded limit in regex; marked by
2229S<<-- HERE> in m/%s/
2230
2231(F) You used a pattern that nested too many EVAL calls without consuming
2232any text.  Restructure the pattern so that text is consumed.
2233
2234The S<<-- HERE> shows whereabouts in the regular expression the problem was
2235discovered.
2236
2237=item Excessively long <> operator
2238
2239(F) The contents of a <> operator may not exceed the maximum size of a
2240Perl identifier.  If you're just trying to glob a long list of
2241filenames, try using the glob() operator, or put the filenames into a
2242variable and glob that.
2243
2244=item exec? I'm not *that* kind of operating system
2245
2246(F) The C<exec> function is not implemented on some systems, e.g.
2247Catamount. See L<perlport>.
2248
2249=item %sExecution of %s aborted due to compilation errors.
2250
2251(F) The final summary message when a Perl compilation fails.
2252
2253=item exists argument is not a HASH or ARRAY element or a subroutine
2254
2255(F) The argument to C<exists> must be a hash or array element or a
2256subroutine with an ampersand, such as:
2257
2258    $foo{$bar}
2259    $ref->{"susie"}[12]
2260    &do_something
2261
2262=item exists argument is not a subroutine name
2263
2264(F) The argument to C<exists> for C<exists &sub> must be a subroutine name,
2265and not a subroutine call.  C<exists &sub()> will generate this error.
2266
2267=item Exiting eval via %s
2268
2269(W exiting) You are exiting an eval by unconventional means, such as a
2270goto, or a loop control statement.
2271
2272=item Exiting format via %s
2273
2274(W exiting) You are exiting a format by unconventional means, such as a
2275goto, or a loop control statement.
2276
2277=item Exiting pseudo-block via %s
2278
2279(W exiting) You are exiting a rather special block construct (like a
2280sort block or subroutine) by unconventional means, such as a goto, or a
2281loop control statement.  See L<perlfunc/sort>.
2282
2283=item Exiting subroutine via %s
2284
2285(W exiting) You are exiting a subroutine by unconventional means, such
2286as a goto, or a loop control statement.
2287
2288=item Exiting substitution via %s
2289
2290(W exiting) You are exiting a substitution by unconventional means, such
2291as a return, a goto, or a loop control statement.
2292
2293=item Expecting close bracket in regex; marked by S<<-- HERE> in m/%s/
2294
2295(F) You wrote something like
2296
2297 (?13
2298
2299to denote a capturing group of the form
2300L<C<(?I<PARNO>)>|perlre/(?PARNO) (?-PARNO) (?+PARNO) (?R) (?0)>,
2301but omitted the C<")">.
2302
2303=item Expecting interpolated extended charclass in regex; marked by <--
2304HERE in m/%s/
2305
2306(F) It looked like you were attempting to interpolate an
2307already-compiled extended character class, like so:
2308
2309 my $thai_or_lao = qr/(?[ \p{Thai} + \p{Lao} ])/;
2310 ...
2311 qr/(?[ \p{Digit} & $thai_or_lao ])/;
2312
2313But the marked code isn't syntactically correct to be such an
2314interpolated class.
2315
2316=item Experimental aliasing via reference not enabled
2317
2318(F) To do aliasing via references, you must first enable the feature:
2319
2320    no warnings "experimental::refaliasing";
2321    use feature "refaliasing";
2322    \$x = \$y;
2323
2324=item Experimental %s on scalar is now forbidden
2325
2326(F) An experimental feature added in Perl 5.14 allowed C<each>, C<keys>,
2327C<push>, C<pop>, C<shift>, C<splice>, C<unshift>, and C<values> to be called with a
2328scalar argument.  This experiment is considered unsuccessful, and
2329has been removed.  The C<postderef> feature may meet your needs better.
2330
2331=item Experimental subroutine signatures not enabled
2332
2333(F) To use subroutine signatures, you must first enable them:
2334
2335    use feature "signatures";
2336    sub foo ($left, $right) { ... }
2337
2338=item Explicit blessing to '' (assuming package main)
2339
2340(W misc) You are blessing a reference to a zero length string.  This has
2341the effect of blessing the reference into the package main.  This is
2342usually not what you want.  Consider providing a default target package,
2343e.g. bless($ref, $p || 'MyPackage');
2344
2345=item %s: Expression syntax
2346
2347(A) You've accidentally run your script through B<csh> instead of Perl.
2348Check the #! line, or manually feed your script into Perl yourself.
2349
2350=item %s failed--call queue aborted
2351
2352(F) An untrapped exception was raised while executing a UNITCHECK,
2353CHECK, INIT, or END subroutine.  Processing of the remainder of the
2354queue of such routines has been prematurely ended.
2355
2356=item Failed to close in-place work file %s: %s
2357
2358(F) Closing an output file from in-place editing, as with the C<-i>
2359command-line switch, failed.
2360
2361=item False [] range "%s" in regex; marked by S<<-- HERE> in m/%s/
2362
2363(W regexp)(F) A character class range must start and end at a literal
2364character, not another character class like C<\d> or C<[:alpha:]>.  The "-"
2365in your false range is interpreted as a literal "-".  In a C<(?[...])>
2366construct, this is an error, rather than a warning.  Consider quoting
2367the "-", "\-".  The S<<-- HERE> shows whereabouts in the regular expression
2368the problem was discovered.  See L<perlre>.
2369
2370=item Fatal VMS error (status=%d) at %s, line %d
2371
2372(P) An error peculiar to VMS.  Something untoward happened in a VMS
2373system service or RTL routine; Perl's exit status should provide more
2374details.  The filename in "at %s" and the line number in "line %d" tell
2375you which section of the Perl source code is distressed.
2376
2377=item fcntl is not implemented
2378
2379(F) Your machine apparently doesn't implement fcntl().  What is this, a
2380PDP-11 or something?
2381
2382=item FETCHSIZE returned a negative value
2383
2384(F) A tied array claimed to have a negative number of elements, which
2385is not possible.
2386
2387=item Field too wide in 'u' format in pack
2388
2389(W pack) Each line in an uuencoded string starts with a length indicator
2390which can't encode values above 63.  So there is no point in asking for
2391a line length bigger than that.  Perl will behave as if you specified
2392C<u63> as the format.
2393
2394=item Filehandle %s opened only for input
2395
2396(W io) You tried to write on a read-only filehandle.  If you intended
2397it to be a read-write filehandle, you needed to open it with "+<" or
2398"+>" or "+>>" instead of with "<" or nothing.  If you intended only to
2399write the file, use ">" or ">>".  See L<perlfunc/open>.
2400
2401=item Filehandle %s opened only for output
2402
2403(W io) You tried to read from a filehandle opened only for writing, If
2404you intended it to be a read/write filehandle, you needed to open it
2405with "+<" or "+>" or "+>>" instead of with ">".  If you intended only to
2406read from the file, use "<".  See L<perlfunc/open>.  Another possibility
2407is that you attempted to open filedescriptor 0 (also known as STDIN) for
2408output (maybe you closed STDIN earlier?).
2409
2410=item Filehandle %s reopened as %s only for input
2411
2412(W io) You opened for reading a filehandle that got the same filehandle id
2413as STDOUT or STDERR.  This occurred because you closed STDOUT or STDERR
2414previously.
2415
2416=item Filehandle STDIN reopened as %s only for output
2417
2418(W io) You opened for writing a filehandle that got the same filehandle id
2419as STDIN.  This occurred because you closed STDIN previously.
2420
2421=item Final $ should be \$ or $name
2422
2423(F) You must now decide whether the final $ in a string was meant to be
2424a literal dollar sign, or was meant to introduce a variable name that
2425happens to be missing.  So you have to put either the backslash or the
2426name.
2427
2428=item defer is experimental
2429
2430(S experimental::defer) The C<defer> block modifier is experimental. If you
2431want to use the feature, disable the warning with
2432C<no warnings 'experimental::defer'>, but know that in doing so you are taking
2433the risk that your code may break in a future Perl version.
2434
2435=item flock() on closed filehandle %s
2436
2437(W closed) The filehandle you're attempting to flock() got itself closed
2438some time before now.  Check your control flow.  flock() operates on
2439filehandles.  Are you attempting to call flock() on a dirhandle by the
2440same name?
2441
2442=item for my (...) is experimental
2443
2444(S experimental::for_list) This warning is emitted if you use C<for> to
2445iterate multiple values at a time. This syntax is currently experimental
2446and its behaviour may change in future releases of Perl.
2447
2448=item Format not terminated
2449
2450(F) A format must be terminated by a line with a solitary dot.  Perl got
2451to the end of your file without finding such a line.
2452
2453=item Format %s redefined
2454
2455(W redefine) You redefined a format.  To suppress this warning, say
2456
2457    {
2458	no warnings 'redefine';
2459	eval "format NAME =...";
2460    }
2461
2462=item Found = in conditional, should be ==
2463
2464(W syntax) You said
2465
2466    if ($foo = 123)
2467
2468when you meant
2469
2470    if ($foo == 123)
2471
2472(or something like that).
2473
2474=item %s found where operator expected
2475
2476(S syntax) The Perl lexer knows whether to expect a term or an operator.
2477If it sees what it knows to be a term when it was expecting to see an
2478operator, it gives you this warning.  Usually it indicates that an
2479operator or delimiter was omitted, such as a semicolon.
2480
2481=item gdbm store returned %d, errno %d, key "%s"
2482
2483(S) A warning from the GDBM_File extension that a store failed.
2484
2485=item gethostent not implemented
2486
2487(F) Your C library apparently doesn't implement gethostent(), probably
2488because if it did, it'd feel morally obligated to return every hostname
2489on the Internet.
2490
2491=item get%sname() on closed socket %s
2492
2493(W closed) You tried to get a socket or peer socket name on a closed
2494socket.  Did you forget to check the return value of your socket() call?
2495
2496=item getpwnam returned invalid UIC %#o for user "%s"
2497
2498(S) A warning peculiar to VMS.  The call to C<sys$getuai> underlying the
2499C<getpwnam> operator returned an invalid UIC.
2500
2501=item getsockopt() on closed socket %s
2502
2503(W closed) You tried to get a socket option on a closed socket.  Did you
2504forget to check the return value of your socket() call?  See
2505L<perlfunc/getsockopt>.
2506
2507=item given is experimental
2508
2509(S experimental::smartmatch) C<given> depends on smartmatch, which
2510is experimental, so its behavior may change or even be removed
2511in any future release of perl.  See the explanation under
2512L<perlsyn/Experimental Details on given and when>.
2513
2514=item Global symbol "%s" requires explicit package name (did you forget to
2515declare "my %s"?)
2516
2517(F) You've said "use strict" or "use strict vars", which indicates
2518that all variables must either be lexically scoped (using "my" or "state"),
2519declared beforehand using "our", or explicitly qualified to say
2520which package the global variable is in (using "::").
2521
2522=item glob failed (%s)
2523
2524(S glob) Something went wrong with the external program(s) used
2525for C<glob> and C<< <*.c> >>.  Usually, this means that you supplied a C<glob>
2526pattern that caused the external program to fail and exit with a
2527nonzero status.  If the message indicates that the abnormal exit
2528resulted in a coredump, this may also mean that your csh (C shell)
2529is broken.  If so, you should change all of the csh-related variables
2530in config.sh:  If you have tcsh, make the variables refer to it as
2531if it were csh (e.g. C<full_csh='/usr/bin/tcsh'>); otherwise, make them
2532all empty (except that C<d_csh> should be C<'undef'>) so that Perl will
2533think csh is missing.  In either case, after editing config.sh, run
2534C<./Configure -S> and rebuild Perl.
2535
2536=item Glob not terminated
2537
2538(F) The lexer saw a left angle bracket in a place where it was expecting
2539a term, so it's looking for the corresponding right angle bracket, and
2540not finding it.  Chances are you left some needed parentheses out
2541earlier in the line, and you really meant a "less than".
2542
2543=item gmtime(%f) failed
2544
2545(W overflow) You called C<gmtime> with a number that it could not handle:
2546too large, too small, or NaN.  The returned value is C<undef>.
2547
2548=item gmtime(%f) too large
2549
2550(W overflow) You called C<gmtime> with a number that was larger than
2551it can reliably handle and C<gmtime> probably returned the wrong
2552date.  This warning is also triggered with NaN (the special
2553not-a-number value).
2554
2555=item gmtime(%f) too small
2556
2557(W overflow) You called C<gmtime> with a number that was smaller than
2558it can reliably handle and C<gmtime> probably returned the wrong date.
2559
2560=item Got an error from DosAllocMem
2561
2562(P) An error peculiar to OS/2.  Most probably you're using an obsolete
2563version of Perl, and this should not happen anyway.
2564
2565=item goto must have label
2566
2567(F) Unlike with "next" or "last", you're not allowed to goto an
2568unspecified destination.  See L<perlfunc/goto>.
2569
2570=item Goto undefined subroutine%s
2571
2572(F) You tried to call a subroutine with C<goto &sub> syntax, but
2573the indicated subroutine hasn't been defined, or if it was, it
2574has since been undefined.
2575
2576=item Group name must start with a non-digit word character in regex; marked by
2577S<<-- HERE> in m/%s/
2578
2579(F) Group names must follow the rules for perl identifiers, meaning
2580they must start with a non-digit word character.  A common cause of
2581this error is using (?&0) instead of (?0).  See L<perlre>.
2582
2583=item ()-group starts with a count
2584
2585(F) A ()-group started with a count.  A count is supposed to follow
2586something: a template character or a ()-group.  See L<perlfunc/pack>.
2587
2588=item %s had compilation errors.
2589
2590(F) The final summary message when a C<perl -c> fails.
2591
2592=item Had to create %s unexpectedly
2593
2594(S internal) A routine asked for a symbol from a symbol table that ought
2595to have existed already, but for some reason it didn't, and had to be
2596created on an emergency basis to prevent a core dump.
2597
2598=item %s has too many errors
2599
2600(F) The parser has given up trying to parse the program after 10 errors.
2601Further error messages would likely be uninformative.
2602
2603=item Hexadecimal float: exponent overflow
2604
2605(W overflow) The hexadecimal floating point has a larger exponent
2606than the floating point supports.
2607
2608=item Hexadecimal float: exponent underflow
2609
2610(W overflow) The hexadecimal floating point has a smaller exponent
2611than the floating point supports.  With the IEEE 754 floating point,
2612this may also mean that the subnormals (formerly known as denormals)
2613are being used, which may or may not be an error.
2614
2615=item Hexadecimal float: internal error (%s)
2616
2617(F) Something went horribly bad in hexadecimal float handling.
2618
2619=item Hexadecimal float: mantissa overflow
2620
2621(W overflow) The hexadecimal floating point literal had more bits in
2622the mantissa (the part between the 0x and the exponent, also known as
2623the fraction or the significand) than the floating point supports.
2624
2625=item Hexadecimal float: precision loss
2626
2627(W overflow) The hexadecimal floating point had internally more
2628digits than could be output.  This can be caused by unsupported
2629long double formats, or by 64-bit integers not being available
2630(needed to retrieve the digits under some configurations).
2631
2632=item Hexadecimal float: unsupported long double format
2633
2634(F) You have configured Perl to use long doubles but
2635the internals of the long double format are unknown;
2636therefore the hexadecimal float output is impossible.
2637
2638=item Hexadecimal number > 0xffffffff non-portable
2639
2640(W portable) The hexadecimal number you specified is larger than 2**32-1
2641(4294967295) and therefore non-portable between systems.  See
2642L<perlport> for more on portability concerns.
2643
2644=item Identifier too long
2645
2646(F) Perl limits identifiers (names for variables, functions, etc.) to
2647about 250 characters for simple names, and somewhat more for compound
2648names (like C<$A::B>).  You've exceeded Perl's limits.  Future versions
2649of Perl are likely to eliminate these arbitrary limitations.
2650
2651=item Ignoring zero length \N{} in character class in regex; marked by
2652S<<-- HERE> in m/%s/
2653
2654(W regexp) Named Unicode character escapes (C<\N{...}>) may return a
2655zero-length sequence.  When such an escape is used in a character
2656class its behavior is not well defined.  Check that the correct
2657escape has been used, and the correct charname handler is in scope.
2658
2659=item Illegal %s digit '%c' ignored
2660
2661(W digit) Here C<%s> is one of "binary", "octal", or "hex".
2662You may have tried to use a digit other than one that is legal for the
2663given type, such as only 0 and 1 for binary.  For octals, this is raised
2664only if the illegal character is an '8' or '9'.  For hex, 'A' - 'F' and
2665'a' - 'f' are legal.
2666Interpretation of the number stopped just before the offending digit or
2667character.
2668
2669=item Illegal binary digit '%c'
2670
2671(F) You used a digit other than 0 or 1 in a binary number.
2672
2673=item Illegal character after '_' in prototype for %s : %s
2674
2675(W illegalproto) An illegal character was found in a prototype
2676declaration.  The '_' in a prototype must be followed by a ';',
2677indicating the rest of the parameters are optional, or one of '@'
2678or '%', since those two will accept 0 or more final parameters.
2679
2680=item Illegal character \%o (carriage return)
2681
2682(F) Perl normally treats carriage returns in the program text as
2683it would any other whitespace, which means you should never see
2684this error when Perl was built using standard options.  For some
2685reason, your version of Perl appears to have been built without
2686this support.  Talk to your Perl administrator.
2687
2688=item Illegal character following sigil in a subroutine signature
2689
2690(F) A parameter in a subroutine signature contained an unexpected character
2691following the C<$>, C<@> or C<%> sigil character.  Normally the sigil
2692should be followed by the variable name or C<=> etc.  Perhaps you are
2693trying use a prototype while in the scope of C<use feature 'signatures'>?
2694For example:
2695
2696    sub foo ($$) {}            # legal - a prototype
2697
2698    use feature 'signatures;
2699    sub foo ($$) {}            # illegal - was expecting a signature
2700    sub foo ($a, $b)
2701            :prototype($$) {}  # legal
2702
2703
2704=item Illegal character in prototype for %s : %s
2705
2706(W illegalproto) An illegal character was found in a prototype declaration.
2707Legal characters in prototypes are $, @, %, *, ;, [, ], &, \, and +.
2708Perhaps you were trying to write a subroutine signature but didn't enable
2709that feature first (C<use feature 'signatures'>), so your signature was
2710instead interpreted as a bad prototype.
2711
2712=item Illegal declaration of anonymous subroutine
2713
2714(F) When using the C<sub> keyword to construct an anonymous subroutine,
2715you must always specify a block of code.  See L<perlsub>.
2716
2717=item Illegal declaration of subroutine %s
2718
2719(F) A subroutine was not declared correctly.  See L<perlsub>.
2720
2721=item Illegal division by zero
2722
2723(F) You tried to divide a number by 0.  Either something was wrong in
2724your logic, or you need to put a conditional in to guard against
2725meaningless input.
2726
2727=item Illegal modulus zero
2728
2729(F) You tried to divide a number by 0 to get the remainder.  Most
2730numbers don't take to this kindly.
2731
2732=item Illegal number of bits in vec
2733
2734(F) The number of bits in vec() (the third argument) must be a power of
2735two from 1 to 32 (or 64, if your platform supports that).
2736
2737=item Illegal octal digit '%c'
2738
2739(F) You used an 8 or 9 in an octal number.
2740
2741=item Illegal operator following parameter in a subroutine signature
2742
2743(F) A parameter in a subroutine signature, was followed by something
2744other than C<=> introducing a default, C<,> or C<)>.
2745
2746    use feature 'signatures';
2747    sub foo ($=1) {}           # legal
2748    sub foo ($a = 1) {}        # legal
2749    sub foo ($a += 1) {}       # illegal
2750    sub foo ($a == 1) {}       # illegal
2751
2752=item Illegal pattern in regex; marked by S<<-- HERE> in m/%s/
2753
2754(F) You wrote something like
2755
2756 (?+foo)
2757
2758The C<"+"> is valid only when followed by digits, indicating a
2759capturing group.  See
2760L<C<(?I<PARNO>)>|perlre/(?PARNO) (?-PARNO) (?+PARNO) (?R) (?0)>.
2761
2762=item Illegal suidscript
2763
2764(F) The script run under suidperl was somehow illegal.
2765
2766=item Illegal switch in PERL5OPT: -%c
2767
2768(X) The PERL5OPT environment variable may only be used to set the
2769following switches: B<-[CDIMUdmtw]>.
2770
2771=item Illegal user-defined property name
2772
2773(F) You specified a Unicode-like property name in a regular expression
2774pattern (using C<\p{}> or C<\P{}>) that Perl knows isn't an official
2775Unicode property, and was likely meant to be a user-defined property
2776name, but it can't be one of those, as they must begin with either C<In>
2777or C<Is>.  Check the spelling.  See also
2778L</Can't find Unicode property definition "%s">.
2779
2780=item Ill-formed CRTL environ value "%s"
2781
2782(W internal) A warning peculiar to VMS.  Perl tried to read the CRTL's
2783internal environ array, and encountered an element without the C<=>
2784delimiter used to separate keys from values.  The element is ignored.
2785
2786=item Ill-formed message in prime_env_iter: |%s|
2787
2788(W internal) A warning peculiar to VMS.  Perl tried to read a logical
2789name or CLI symbol definition when preparing to iterate over %ENV, and
2790didn't see the expected delimiter between key and value, so the line was
2791ignored.
2792
2793=item (in cleanup) %s
2794
2795(W misc) This prefix usually indicates that a DESTROY() method raised
2796the indicated exception.  Since destructors are usually called by the
2797system at arbitrary points during execution, and often a vast number of
2798times, the warning is issued only once for any number of failures that
2799would otherwise result in the same message being repeated.
2800
2801Failure of user callbacks dispatched using the C<G_KEEPERR> flag could
2802also result in this warning.  See L<perlcall/G_KEEPERR>.
2803
2804=item Implicit use of @_ in %s with signatured subroutine is experimental
2805
2806(S experimental::args_array_with_signatures) An expression that implicitly
2807involves the C<@_> arguments array was found in a subroutine that uses a
2808signature.  This is experimental because the interaction between the
2809arguments array and parameter handling via signatures is not guaranteed
2810to remain stable in any future version of Perl, and such code should be
2811avoided.
2812
2813=item Incomplete expression within '(?[ ])' in regex; marked by S<<-- HERE>
2814in m/%s/
2815
2816(F) There was a syntax error within the C<(?[ ])>.  This can happen if the
2817expression inside the construct was completely empty, or if there are
2818too many or few operands for the number of operators.  Perl is not smart
2819enough to give you a more precise indication as to what is wrong.
2820
2821=item Inconsistent hierarchy during C3 merge of class '%s': merging failed on
2822parent '%s'
2823
2824(F) The method resolution order (MRO) of the given class is not
2825C3-consistent, and you have enabled the C3 MRO for this class.  See the C3
2826documentation in L<mro> for more information.
2827
2828=item Indentation on line %d of here-doc doesn't match delimiter
2829
2830(F) You have an indented here-document where one or more of its lines
2831have whitespace at the beginning that does not match the closing
2832delimiter.
2833
2834For example, line 2 below is wrong because it does not have at least
28352 spaces, but lines 1 and 3 are fine because they have at least 2:
2836
2837    if ($something) {
2838      print <<~EOF;
2839        Line 1
2840       Line 2 not
2841          Line 3
2842        EOF
2843    }
2844
2845Note that tabs and spaces are compared strictly, meaning 1 tab will
2846not match 8 spaces.
2847
2848=item Infinite recursion in regex
2849
2850(F) You used a pattern that references itself without consuming any input
2851text.  You should check the pattern to ensure that recursive patterns
2852either consume text or fail.
2853
2854=item Infinite recursion in user-defined property
2855
2856(F) A user-defined property (L<perlunicode/User-Defined Character
2857Properties>) can depend on the definitions of other user-defined
2858properties.  If the chain of dependencies leads back to this property,
2859infinite recursion would occur, were it not for the check that raised
2860this error.
2861
2862Restructure your property definitions to avoid this.
2863
2864=item Infinite recursion via empty pattern
2865
2866(F) You tried to use the empty pattern inside of a regex code block,
2867for instance C</(?{ s!!! })/>, which resulted in re-executing
2868the same pattern, which is an infinite loop which is broken by
2869throwing an exception.
2870
2871=item Initialization of state variables in list currently forbidden
2872
2873(F) C<state> only permits initializing a single variable, specified
2874without parentheses.  So C<state $a = 42> and C<state @a = qw(a b c)> are
2875allowed, but not C<state ($a) = 42> or C<(state $a) = 42>.  To initialize
2876more than one C<state> variable, initialize them one at a time.
2877
2878=item %%s[%s] in scalar context better written as $%s[%s]
2879
2880(W syntax) In scalar context, you've used an array index/value slice
2881(indicated by %) to select a single element of an array.  Generally
2882it's better to ask for a scalar value (indicated by $).  The difference
2883is that C<$foo[&bar]> always behaves like a scalar, both in the value it
2884returns and when evaluating its argument, while C<%foo[&bar]> provides
2885a list context to its subscript, which can do weird things if you're
2886expecting only one subscript.  When called in list context, it also
2887returns the index (what C<&bar> returns) in addition to the value.
2888
2889=item %%s{%s} in scalar context better written as $%s{%s}
2890
2891(W syntax) In scalar context, you've used a hash key/value slice
2892(indicated by %) to select a single element of a hash.  Generally it's
2893better to ask for a scalar value (indicated by $).  The difference
2894is that C<$foo{&bar}> always behaves like a scalar, both in the value
2895it returns and when evaluating its argument, while C<@foo{&bar}> and
2896provides a list context to its subscript, which can do weird things
2897if you're expecting only one subscript.  When called in list context,
2898it also returns the key in addition to the value.
2899
2900=item Insecure dependency in %s
2901
2902(F) You tried to do something that the tainting mechanism didn't like.
2903The tainting mechanism is turned on when you're running setuid or
2904setgid, or when you specify B<-T> to turn it on explicitly.  The
2905tainting mechanism labels all data that's derived directly or indirectly
2906from the user, who is considered to be unworthy of your trust.  If any
2907such data is used in a "dangerous" operation, you get this error.  See
2908L<perlsec> for more information.
2909
2910=item Insecure directory in %s
2911
2912(F) You can't use system(), exec(), or a piped open in a setuid or
2913setgid script if C<$ENV{PATH}> contains a directory that is writable by
2914the world.  Also, the PATH must not contain any relative directory.
2915See L<perlsec>.
2916
2917=item Insecure $ENV{%s} while running %s
2918
2919(F) You can't use system(), exec(), or a piped open in a setuid or
2920setgid script if any of C<$ENV{PATH}>, C<$ENV{IFS}>, C<$ENV{CDPATH}>,
2921C<$ENV{ENV}>, C<$ENV{BASH_ENV}> or C<$ENV{TERM}> are derived from data
2922supplied (or potentially supplied) by the user.  The script must set
2923the path to a known value, using trustworthy data.  See L<perlsec>.
2924
2925=item Insecure user-defined property %s
2926
2927(F) Perl detected tainted data when trying to compile a regular
2928expression that contains a call to a user-defined character property
2929function, i.e. C<\p{IsFoo}> or C<\p{InFoo}>.
2930See L<perlunicode/User-Defined Character Properties> and L<perlsec>.
2931
2932=item Integer overflow in format string for %s
2933
2934(F) The indexes and widths specified in the format string of C<printf()>
2935or C<sprintf()> are too large.  The numbers must not overflow the size of
2936integers for your architecture.
2937
2938=item Integer overflow in %s number
2939
2940(S overflow) The hexadecimal, octal or binary number you have specified
2941either as a literal or as an argument to hex() or oct() is too big for
2942your architecture, and has been converted to a floating point number.
2943On a 32-bit architecture the largest hexadecimal, octal or binary number
2944representable without overflow is 0xFFFFFFFF, 037777777777, or
29450b11111111111111111111111111111111 respectively.  Note that Perl
2946transparently promotes all numbers to a floating point representation
2947internally--subject to loss of precision errors in subsequent
2948operations.
2949
2950=item Integer overflow in srand
2951
2952(S overflow) The number you have passed to srand is too big to fit
2953in your architecture's integer representation.  The number has been
2954replaced with the largest integer supported (0xFFFFFFFF on 32-bit
2955architectures).  This means you may be getting less randomness than
2956you expect, because different random seeds above the maximum will
2957return the same sequence of random numbers.
2958
2959=item Integer overflow in version
2960
2961=item Integer overflow in version %d
2962
2963(W overflow) Some portion of a version initialization is too large for
2964the size of integers for your architecture.  This is not a warning
2965because there is no rational reason for a version to try and use an
2966element larger than typically 2**32.  This is usually caused by trying
2967to use some odd mathematical operation as a version, like 100/9.
2968
2969=item Internal disaster in regex; marked by S<<-- HERE> in m/%s/
2970
2971(P) Something went badly wrong in the regular expression parser.
2972The S<<-- HERE> shows whereabouts in the regular expression the problem was
2973discovered.
2974
2975=item Internal inconsistency in tracking vforks
2976
2977(S) A warning peculiar to VMS.  Perl keeps track of the number of times
2978you've called C<fork> and C<exec>, to determine whether the current call
2979to C<exec> should affect the current script or a subprocess (see
2980L<perlvms/"exec LIST">).  Somehow, this count has become scrambled, so
2981Perl is making a guess and treating this C<exec> as a request to
2982terminate the Perl script and execute the specified command.
2983
2984=item internal %<num>p might conflict with future printf extensions
2985
2986(S internal) Perl's internal routine that handles C<printf> and C<sprintf>
2987formatting follows a slightly different set of rules when called from
2988C or XS code.  Specifically, formats consisting of digits followed
2989by "p" (e.g., "%7p") are reserved for future use.  If you see this
2990message, then an XS module tried to call that routine with one such
2991reserved format.
2992
2993=item Internal urp in regex; marked by S<<-- HERE> in m/%s/
2994
2995(P) Something went badly awry in the regular expression parser.  The
2996S<<-- HERE> shows whereabouts in the regular expression the problem was
2997discovered.
2998
2999=item %s (...) interpreted as function
3000
3001(W syntax) You've run afoul of the rule that says that any list operator
3002followed by parentheses turns into a function, with all the list
3003operators arguments found inside the parentheses.  See
3004L<perlop/Terms and List Operators (Leftward)>.
3005
3006=item In '(?...)', the '(' and '?' must be adjacent in regex;
3007marked by S<<-- HERE> in m/%s/
3008
3009(F) The two-character sequence C<"(?"> in this context in a regular
3010expression pattern should be an indivisible token, with nothing
3011intervening between the C<"("> and the C<"?">, but you separated them
3012with whitespace.
3013
3014=item In '(*...)', the '(' and '*' must be adjacent in regex;
3015marked by S<<-- HERE> in m/%s/
3016
3017(F) The two-character sequence C<"(*"> in this context in a regular
3018expression pattern should be an indivisible token, with nothing
3019intervening between the C<"("> and the C<"*">, but you separated them.
3020Fix the pattern and retry.
3021
3022=item Invalid %s attribute: %s
3023
3024(F) The indicated attribute for a subroutine or variable was not recognized
3025by Perl or by a user-supplied handler.  See L<attributes>.
3026
3027=item Invalid %s attributes: %s
3028
3029(F) The indicated attributes for a subroutine or variable were not
3030recognized by Perl or by a user-supplied handler.  See L<attributes>.
3031
3032=item Invalid character in charnames alias definition; marked by
3033S<<-- HERE> in '%s
3034
3035(F) You tried to create a custom alias for a character name, with
3036the C<:alias> option to C<use charnames> and the specified character in
3037the indicated name isn't valid.  See L<charnames/CUSTOM ALIASES>.
3038
3039=item Invalid \0 character in %s for %s: %s\0%s
3040
3041(W syscalls) Embedded \0 characters in pathnames or other system call
3042arguments produce a warning as of 5.20.  The parts after the \0 were
3043formerly ignored by system calls.
3044
3045=item Invalid character in \N{...}; marked by S<<-- HERE> in \N{%s}
3046
3047(F) Only certain characters are valid for character names.  The
3048indicated one isn't.  See L<charnames/CUSTOM ALIASES>.
3049
3050=item Invalid conversion in %s: "%s"
3051
3052(W printf) Perl does not understand the given format conversion.  See
3053L<perlfunc/sprintf>.
3054
3055=item Invalid escape in the specified encoding in regex; marked by
3056S<<-- HERE> in m/%s/
3057
3058(W regexp)(F) The numeric escape (for example C<\xHH>) of value < 256
3059didn't correspond to a single character through the conversion
3060from the encoding specified by the encoding pragma.
3061The escape was replaced with REPLACEMENT CHARACTER (U+FFFD)
3062instead, except within S<C<(?[   ])>>, where it is a fatal error.
3063The S<<-- HERE> shows whereabouts in the regular expression the
3064escape was discovered.
3065
3066=item Invalid hexadecimal number in \N{U+...}
3067
3068=item Invalid hexadecimal number in \N{U+...} in regex; marked by
3069S<<-- HERE> in m/%s/
3070
3071(F) The character constant represented by C<...> is not a valid hexadecimal
3072number.  Either it is empty, or you tried to use a character other than
30730 - 9 or A - F, a - f in a hexadecimal number.
3074
3075=item Invalid module name %s with -%c option: contains single ':'
3076
3077(F) The module argument to perl's B<-m> and B<-M> command-line options
3078cannot contain single colons in the module name, but only in the
3079arguments after "=".  In other words, B<-MFoo::Bar=:baz> is ok, but
3080B<-MFoo:Bar=baz> is not.
3081
3082=item Invalid mro name: '%s'
3083
3084(F) You tried to C<mro::set_mro("classname", "foo")> or C<use mro 'foo'>,
3085where C<foo> is not a valid method resolution order (MRO).  Currently,
3086the only valid ones supported are C<dfs> and C<c3>, unless you have loaded
3087a module that is a MRO plugin.  See L<mro> and L<perlmroapi>.
3088
3089=item Invalid negative number (%s) in chr
3090
3091(W utf8) You passed a negative number to C<chr>.  Negative numbers are
3092not valid character numbers, so it returns the Unicode replacement
3093character (U+FFFD).
3094
3095=item Invalid number '%s' for -C option.
3096
3097(F) You supplied a number to the -C option that either has extra leading
3098zeroes or overflows perl's unsigned integer representation.
3099
3100=item invalid option -D%c, use -D'' to see choices
3101
3102(S debugging) Perl was called with invalid debugger flags.  Call perl
3103with the B<-D> option with no flags to see the list of acceptable values.
3104See also L<perlrun/-Dletters>.
3105
3106=item Invalid quantifier in {,} in regex; marked by S<<-- HERE> in m/%s/
3107
3108(F) The pattern looks like a {min,max} quantifier, but the min or max
3109could not be parsed as a valid number - either it has leading zeroes,
3110or it represents too big a number to cope with.  The S<<-- HERE> shows
3111where in the regular expression the problem was discovered.  See L<perlre>.
3112
3113=item Invalid [] range "%s" in regex; marked by S<<-- HERE> in m/%s/
3114
3115(F) The range specified in a character class had a minimum character
3116greater than the maximum character.  One possibility is that you forgot the
3117C<{}> from your ending C<\x{}> - C<\x> without the curly braces can go only
3118up to C<ff>.  The S<<-- HERE> shows whereabouts in the regular expression the
3119problem was discovered.  See L<perlre>.
3120
3121=item Invalid range "%s" in transliteration operator
3122
3123(F) The range specified in the tr/// or y/// operator had a minimum
3124character greater than the maximum character.  See L<perlop>.
3125
3126=item Invalid reference to group in regex; marked by S<<-- HERE> in m/%s/
3127
3128(F) The capture group you specified can't possibly exist because the
3129number you used is not within the legal range of possible values for
3130this machine.
3131
3132=item Invalid separator character %s in attribute list
3133
3134(F) Something other than a colon or whitespace was seen between the
3135elements of an attribute list.  If the previous attribute had a
3136parenthesised parameter list, perhaps that list was terminated too soon.
3137See L<attributes>.
3138
3139=item Invalid separator character %s in PerlIO layer specification %s
3140
3141(W layer) When pushing layers onto the Perl I/O system, something other
3142than a colon or whitespace was seen between the elements of a layer list.
3143If the previous attribute had a parenthesised parameter list, perhaps that
3144list was terminated too soon.
3145
3146=item Invalid strict version format (%s)
3147
3148(F) A version number did not meet the "strict" criteria for versions.
3149A "strict" version number is a positive decimal number (integer or
3150decimal-fraction) without exponentiation or else a dotted-decimal
3151v-string with a leading 'v' character and at least three components.
3152The parenthesized text indicates which criteria were not met.
3153See the L<version> module for more details on allowed version formats.
3154
3155=item Invalid type '%s' in %s
3156
3157(F) The given character is not a valid pack or unpack type.
3158See L<perlfunc/pack>.
3159
3160(W) The given character is not a valid pack or unpack type but used to be
3161silently ignored.
3162
3163=item Invalid version format (%s)
3164
3165(F) A version number did not meet the "lax" criteria for versions.
3166A "lax" version number is a positive decimal number (integer or
3167decimal-fraction) without exponentiation or else a dotted-decimal
3168v-string.  If the v-string has fewer than three components, it
3169must have a leading 'v' character.  Otherwise, the leading 'v' is
3170optional.  Both decimal and dotted-decimal versions may have a
3171trailing "alpha" component separated by an underscore character
3172after a fractional or dotted-decimal component.  The parenthesized
3173text indicates which criteria were not met.  See the L<version> module
3174for more details on allowed version formats.
3175
3176=item Invalid version object
3177
3178(F) The internal structure of the version object was invalid.
3179Perhaps the internals were modified directly in some way or
3180an arbitrary reference was blessed into the "version" class.
3181
3182=item In '(*VERB...)', the '(' and '*' must be adjacent in regex;
3183marked by S<<-- HERE> in m/%s/
3184
3185=item Inverting a character class which contains a multi-character
3186sequence is illegal in regex; marked by <-- HERE in m/%s/
3187
3188(F) You wrote something like
3189
3190 qr/\P{name=KATAKANA LETTER AINU P}/
3191 qr/[^\p{name=KATAKANA LETTER AINU P}]/
3192
3193This name actually evaluates to a sequence of two Katakana characters,
3194not just a single one, and it is illegal to try to take the complement
3195of a sequence.  (Mathematically it would mean any sequence of characters
3196from 0 to infinity in length that weren't these two in a row, and that
3197is likely not of any real use.)
3198
3199(F) The two-character sequence C<"(*"> in this context in a regular
3200expression pattern should be an indivisible token, with nothing
3201intervening between the C<"("> and the C<"*">, but you separated them.
3202
3203=item ioctl is not implemented
3204
3205(F) Your machine apparently doesn't implement ioctl(), which is pretty
3206strange for a machine that supports C.
3207
3208=item ioctl() on unopened %s
3209
3210(W unopened) You tried ioctl() on a filehandle that was never opened.
3211Check your control flow and number of arguments.
3212
3213=item IO layers (like '%s') unavailable
3214
3215(F) Your Perl has not been configured to have PerlIO, and therefore
3216you cannot use IO layers.  To have PerlIO, Perl must be configured
3217with 'useperlio'.
3218
3219=item IO::Socket::atmark not implemented on this architecture
3220
3221(F) Your machine doesn't implement the sockatmark() functionality,
3222neither as a system call nor an ioctl call (SIOCATMARK).
3223
3224=item '%s' is an unknown bound type in regex; marked by S<<-- HERE> in m/%s/
3225
3226(F) You used C<\b{...}> or C<\B{...}> and the C<...> is not known to
3227Perl.  The current valid ones are given in
3228L<perlrebackslash/\b{}, \b, \B{}, \B>.
3229
3230=item %s is forbidden - matches null string many times in regex; marked by S<<-- HERE> in
3231m/%s/
3232
3233(F) The pattern you've specified might cause the regular expression to
3234infinite loop so it is forbidden.  The S<<-- HERE>
3235shows whereabouts in the regular expression the problem was discovered.
3236See L<perlre>.
3237
3238=item %s() isn't allowed on :utf8 handles
3239
3240(F) The sysread(), recv(), syswrite() and send() operators are
3241not allowed on handles that have the C<:utf8> layer, either explicitly, or
3242implicitly, eg., with the C<:encoding(UTF-16LE)> layer.
3243
3244Previously sysread() and recv() currently use only the C<:utf8> flag for the stream,
3245ignoring the actual layers.  Since sysread() and recv() did no UTF-8
3246validation they can end up creating invalidly encoded scalars.
3247
3248Similarly, syswrite() and send() used only the C<:utf8> flag, otherwise ignoring
3249any layers.  If the flag is set, both wrote the value UTF-8 encoded, even if
3250the layer is some different encoding, such as the example above.
3251
3252Ideally, all of these operators would completely ignore the C<:utf8> state,
3253working only with bytes, but this would result in silently breaking existing
3254code.
3255
3256=item "%s" is more clearly written simply as "%s" in regex; marked by S<<-- HERE> in m/%s/
3257
3258(W regexp) (only under C<S<use re 'strict'>> or within C<(?[...])>)
3259
3260You specified a character that has the given plainer way of writing it, and
3261which is also portable to platforms running with different character sets.
3262
3263=item $* is no longer supported as of Perl 5.30
3264
3265(F) The special variable C<$*>, deprecated in older perls, was removed in
32665.10.0, is no longer supported and is a fatal error as of Perl 5.30.  In
3267previous versions of perl the use of C<$*> enabled or disabled multi-line
3268matching within a string.
3269
3270Instead of using C<$*> you should use the C</m> (and maybe C</s>) regexp
3271modifiers.  You can enable C</m> for a lexical scope (even a whole file)
3272with C<use re '/m'>.  (In older versions: when C<$*> was set to a true value
3273then all regular expressions behaved as if they were written using C</m>.)
3274
3275Use of this variable will be a fatal error in Perl 5.30.
3276
3277=item $# is no longer supported as of Perl 5.30
3278
3279(F) The special variable C<$#>, deprecated in older perls, was removed as of
32805.10.0, is no longer supported and is a fatal error as of Perl 5.30.  You
3281should use the printf/sprintf functions instead.
3282
3283=item '%s' is not a code reference
3284
3285(W overload) The second (fourth, sixth, ...) argument of
3286overload::constant needs to be a code reference.  Either
3287an anonymous subroutine, or a reference to a subroutine.
3288
3289=item '%s' is not an overloadable type
3290
3291(W overload) You tried to overload a constant type the overload package is
3292unaware of.
3293
3294=item '%s' is not recognised as a builtin function
3295
3296(F) An attempt was made to C<use> the L<builtin> pragma module to create
3297a lexical alias for an unknown function name.
3298
3299=item -i used with no filenames on the command line, reading from STDIN
3300
3301(S inplace) The C<-i> option was passed on the command line, indicating
3302that the script is intended to edit files in place, but no files were
3303given.  This is usually a mistake, since editing STDIN in place doesn't
3304make sense, and can be confusing because it can make perl look like
3305it is hanging when it is really just trying to read from STDIN.  You
3306should either pass a filename to edit, or remove C<-i> from the command
3307line.  See L<perlrun|perlrun/-i[extension]> for more details.
3308
3309=item Junk on end of regexp in regex m/%s/
3310
3311(P) The regular expression parser is confused.
3312
3313=item \K not permitted in lookahead/lookbehind in regex; marked by <-- HERE in m/%s/
3314
3315(F) Your regular expression used C<\K> in a lookahead or lookbehind
3316assertion, which currently isn't permitted.
3317
3318This may change in the future, see L<Support \K in
3319lookarounds|https://github.com/Perl/perl5/issues/18134>.
3320
3321=item Label not found for "last %s"
3322
3323(F) You named a loop to break out of, but you're not currently in a loop
3324of that name, not even if you count where you were called from.  See
3325L<perlfunc/last>.
3326
3327=item Label not found for "next %s"
3328
3329(F) You named a loop to continue, but you're not currently in a loop of
3330that name, not even if you count where you were called from.  See
3331L<perlfunc/last>.
3332
3333=item Label not found for "redo %s"
3334
3335(F) You named a loop to restart, but you're not currently in a loop of
3336that name, not even if you count where you were called from.  See
3337L<perlfunc/last>.
3338
3339=item leaving effective %s failed
3340
3341(F) While under the C<use filetest> pragma, switching the real and
3342effective uids or gids failed.
3343
3344=item length/code after end of string in unpack
3345
3346(F) While unpacking, the string buffer was already used up when an unpack
3347length/code combination tried to obtain more data.  This results in
3348an undefined value for the length.  See L<perlfunc/pack>.
3349
3350=item length() used on %s (did you mean "scalar(%s)"?)
3351
3352(W syntax) You used length() on either an array or a hash when you
3353probably wanted a count of the items.
3354
3355Array size can be obtained by doing:
3356
3357    scalar(@array);
3358
3359The number of items in a hash can be obtained by doing:
3360
3361    scalar(keys %hash);
3362
3363=item Lexing code attempted to stuff non-Latin-1 character into Latin-1 input
3364
3365(F) An extension is attempting to insert text into the current parse
3366(using L<lex_stuff_pvn|perlapi/lex_stuff_pvn> or similar), but tried to insert a character that
3367couldn't be part of the current input.  This is an inherent pitfall
3368of the stuffing mechanism, and one of the reasons to avoid it.  Where
3369it is necessary to stuff, stuffing only plain ASCII is recommended.
3370
3371=item Lexing code internal error (%s)
3372
3373(F) Lexing code supplied by an extension violated the lexer's API in a
3374detectable way.
3375
3376=item listen() on closed socket %s
3377
3378(W closed) You tried to do a listen on a closed socket.  Did you forget
3379to check the return value of your socket() call?  See
3380L<perlfunc/listen>.
3381
3382=item List form of piped open not implemented
3383
3384(F) On some platforms, notably Windows, the three-or-more-arguments
3385form of C<open> does not support pipes, such as C<open($pipe, '|-', @args)>.
3386Use the two-argument C<open($pipe, '|prog arg1 arg2...')> form instead.
3387
3388=item Literal vertical space in [] is illegal except under /x in regex;
3389marked by S<<-- HERE> in m/%s/
3390
3391(F) (only under C<S<use re 'strict'>> or within C<(?[...])>)
3392
3393Likely you forgot the C</x> modifier or there was a typo in the pattern.
3394For example, did you really mean to match a form-feed?  If so, all the
3395ASCII vertical space control characters are representable by escape
3396sequences which won't present such a jarring appearance as your pattern
3397does when displayed.
3398
3399  \r    carriage return
3400  \f    form feed
3401  \n    line feed
3402  \cK   vertical tab
3403
3404=item %s: loadable library and perl binaries are mismatched (got %s handshake key %p, needed %p)
3405
3406(P) A dynamic loading library C<.so> or C<.dll> was being loaded into the
3407process that was built against a different build of perl than the
3408said library was compiled against.  Reinstalling the XS module will
3409likely fix this error.
3410
3411=item Locale '%s' contains (at least) the following characters which
3412have unexpected meanings: %s  The Perl program will use the expected
3413meanings
3414
3415(W locale) You are using the named UTF-8 locale.  UTF-8 locales are
3416expected to have very particular behavior, which most do.  This message
3417arises when perl found some departures from the expectations, and is
3418notifying you that the expected behavior overrides these differences.
3419In some cases the differences are caused by the locale definition being
3420defective, but the most common causes of this warning are when there are
3421ambiguities and conflicts in following the Standard, and the locale has
3422chosen an approach that differs from Perl's.
3423
3424One of these is because that, contrary to the claims, Unicode is not
3425completely locale insensitive.  Turkish and some related languages
3426have two types of C<"I"> characters.  One is dotted in both upper- and
3427lowercase, and the other is dotless in both cases.  Unicode allows a
3428locale to use either the Turkish rules, or the rules used in all other
3429instances, where there is only one type of C<"I">, which is dotless in
3430the uppercase, and dotted in the lower.  The perl core does not (yet)
3431handle the Turkish case, and this message warns you of that.  Instead,
3432the L<Unicode::Casing> module allows you to mostly implement the Turkish
3433casing rules.
3434
3435The other common cause is for the characters
3436
3437 $ + < = > ^ ` | ~
3438
3439These are problematic.  The C standard says that these should be
3440considered punctuation in the C locale (and the POSIX standard defers to
3441the C standard), and Unicode is generally considered a superset of
3442the C locale.  But Unicode has added an extra category, "Symbol", and
3443classifies these particular characters as being symbols.  Most UTF-8
3444locales have them treated as punctuation, so that L<ispunct(2)> returns
3445non-zero for them.  But a few locales have it return 0.   Perl takes
3446the first approach, not using C<ispunct()> at all (see L<Note [5] in
3447perlrecharclass|perlrecharclass/[5]>), and this message is raised to notify you that you
3448are getting Perl's approach, not the locale's.
3449
3450=item Locale '%s' may not work well.%s
3451
3452(W locale) You are using the named locale, which is a non-UTF-8 one, and
3453which perl has determined is not fully compatible with what it can
3454handle.  The second C<%s> gives a reason.
3455
3456By far the most common reason is that the locale has characters in it
3457that are represented by more than one byte.  The only such locales that
3458Perl can handle are the UTF-8 locales.  Most likely the specified locale
3459is a non-UTF-8 one for an East Asian language such as Chinese or
3460Japanese.  If the locale is a superset of ASCII, the ASCII portion of it
3461may work in Perl.
3462
3463Some essentially obsolete locales that aren't supersets of ASCII, mainly
3464those in ISO 646 or other 7-bit locales, such as ASMO 449, can also have
3465problems, depending on what portions of the ASCII character set get
3466changed by the locale and are also used by the program.
3467The warning message lists the determinable conflicting characters.
3468
3469Note that not all incompatibilities are found.
3470
3471If this happens to you, there's not much you can do except switch to use a
3472different locale or use L<Encode> to translate from the locale into
3473UTF-8; if that's impracticable, you have been warned that some things
3474may break.
3475
3476This message is output once each time a bad locale is switched into
3477within the scope of C<S<use locale>>, or on the first possibly-affected
3478operation if the C<S<use locale>> inherits a bad one.  It is not raised
3479for any operations from the L<POSIX> module.
3480
3481=item localtime(%f) failed
3482
3483(W overflow) You called C<localtime> with a number that it could not handle:
3484too large, too small, or NaN.  The returned value is C<undef>.
3485
3486=item localtime(%f) too large
3487
3488(W overflow) You called C<localtime> with a number that was larger
3489than it can reliably handle and C<localtime> probably returned the
3490wrong date.  This warning is also triggered with NaN (the special
3491not-a-number value).
3492
3493=item localtime(%f) too small
3494
3495(W overflow) You called C<localtime> with a number that was smaller
3496than it can reliably handle and C<localtime> probably returned the
3497wrong date.
3498
3499=item Lookbehind longer than %d not implemented in regex m/%s/
3500
3501(F) There is currently a limit on the length of string which lookbehind can
3502handle.  This restriction may be eased in a future release.
3503
3504=item Lost precision when %s %f by 1
3505
3506(W imprecision) You attempted to increment or decrement a value by one,
3507but the result is too large for the underlying floating point
3508representation to store accurately. Hence, the target of C<++> or C<-->
3509is increased or decreased by quite different value than one, such as
3510zero (I<i.e.> the target is unchanged) or two, due to rounding.
3511Perl issues this
3512warning because it has already switched from integers to floating point
3513when values are too large for integers, and now even floating point is
3514insufficient.  You may wish to switch to using L<Math::BigInt> explicitly.
3515
3516=item lstat() on filehandle%s
3517
3518(W io) You tried to do an lstat on a filehandle.  What did you mean
3519by that?  lstat() makes sense only on filenames.  (Perl did a fstat()
3520instead on the filehandle.)
3521
3522=item lvalue attribute %s already-defined subroutine
3523
3524(W misc) Although L<attributes.pm|attributes> allows this, turning the lvalue
3525attribute on or off on a Perl subroutine that is already defined
3526does not always work properly.  It may or may not do what you
3527want, depending on what code is inside the subroutine, with exact
3528details subject to change between Perl versions.  Only do this
3529if you really know what you are doing.
3530
3531=item lvalue attribute ignored after the subroutine has been defined
3532
3533(W misc) Using the C<:lvalue> declarative syntax to make a Perl
3534subroutine an lvalue subroutine after it has been defined is
3535not permitted.  To make the subroutine an lvalue subroutine,
3536add the lvalue attribute to the definition, or put the C<sub
3537foo :lvalue;> declaration before the definition.
3538
3539See also L<attributes.pm|attributes>.
3540
3541=item Magical list constants are not supported
3542
3543(F) You assigned a magical array to a stash element, and then tried
3544to use the subroutine from the same slot.  You are asking Perl to do
3545something it cannot do, details subject to change between Perl versions.
3546
3547=item Malformed integer in [] in pack
3548
3549(F) Between the brackets enclosing a numeric repeat count only digits
3550are permitted.  See L<perlfunc/pack>.
3551
3552=item Malformed integer in [] in unpack
3553
3554(F) Between the brackets enclosing a numeric repeat count only digits
3555are permitted.  See L<perlfunc/pack>.
3556
3557=item Malformed PERLLIB_PREFIX
3558
3559(F) An error peculiar to OS/2.  PERLLIB_PREFIX should be of the form
3560
3561    prefix1;prefix2
3562
3563or
3564    prefix1 prefix2
3565
3566with nonempty prefix1 and prefix2.  If C<prefix1> is indeed a prefix of
3567a builtin library search path, prefix2 is substituted.  The error may
3568appear if components are not found, or are too long.  See
3569"PERLLIB_PREFIX" in L<perlos2>.
3570
3571=item Malformed prototype for %s: %s
3572
3573(F) You tried to use a function with a malformed prototype.  The
3574syntax of function prototypes is given a brief compile-time check for
3575obvious errors like invalid characters.  A more rigorous check is run
3576when the function is called.
3577Perhaps the function's author was trying to write a subroutine signature
3578but didn't enable that feature first (C<use feature 'signatures'>),
3579so the signature was instead interpreted as a bad prototype.
3580
3581=item Malformed UTF-8 character%s
3582
3583(S utf8)(F) Perl detected a string that should be UTF-8, but didn't
3584comply with UTF-8 encoding rules, or represents a code point whose
3585ordinal integer value doesn't fit into the word size of the current
3586platform (overflows).  Details as to the exact malformation are given in
3587the variable, C<%s>, part of the message.
3588
3589One possible cause is that you set the UTF8 flag yourself for data that
3590you thought to be in UTF-8 but it wasn't (it was for example legacy 8-bit
3591data).  To guard against this, you can use C<Encode::decode('UTF-8', ...)>.
3592
3593If you use the C<:encoding(UTF-8)> PerlIO layer for input, invalid byte
3594sequences are handled gracefully, but if you use C<:utf8>, the flag is set
3595without validating the data, possibly resulting in this error message.
3596
3597See also L<Encode/"Handling Malformed Data">.
3598
3599=item Malformed UTF-8 returned by \N{%s} immediately after '%s'
3600
3601(F) The charnames handler returned malformed UTF-8.
3602
3603=item Malformed UTF-8 string in "%s"
3604
3605(F) This message indicates a bug either in the Perl core or in XS
3606code. Such code was trying to find out if a character, allegedly
3607stored internally encoded as UTF-8, was of a given type, such as
3608being punctuation or a digit.  But the character was not encoded
3609in legal UTF-8.  The C<%s> is replaced by a string that can be used
3610by knowledgeable people to determine what the type being checked
3611against was.
3612
3613Passing malformed strings was deprecated in Perl 5.18, and
3614became fatal in Perl 5.26.
3615
3616=item Malformed UTF-8 string in '%c' format in unpack
3617
3618(F) You tried to unpack something that didn't comply with UTF-8 encoding
3619rules and perl was unable to guess how to make more progress.
3620
3621=item Malformed UTF-8 string in pack
3622
3623(F) You tried to pack something that didn't comply with UTF-8 encoding
3624rules and perl was unable to guess how to make more progress.
3625
3626=item Malformed UTF-8 string in unpack
3627
3628(F) You tried to unpack something that didn't comply with UTF-8 encoding
3629rules and perl was unable to guess how to make more progress.
3630
3631=item Malformed UTF-16 surrogate
3632
3633(F) Perl thought it was reading UTF-16 encoded character data but while
3634doing it Perl met a malformed Unicode surrogate.
3635
3636=item Mandatory parameter follows optional parameter
3637
3638(F) In a subroutine signature, you wrote something like "$a = undef,
3639$b", making an earlier parameter optional and a later one mandatory.
3640Parameters are filled from left to right, so it's impossible for the
3641caller to omit an earlier one and pass a later one.  If you want to act
3642as if the parameters are filled from right to left, declare the rightmost
3643optional and then shuffle the parameters around in the subroutine's body.
3644
3645=item Matched non-Unicode code point 0x%X against Unicode property; may
3646not be portable
3647
3648(S non_unicode) Perl allows strings to contain a superset of
3649Unicode code points; each code point may be as large as what is storable
3650in a signed integer on your system, but these may not be accepted by
3651other languages/systems.  This message occurs when you matched a string
3652containing such a code point against a regular expression pattern, and
3653the code point was matched against a Unicode property, C<\p{...}> or
3654C<\P{...}>.  Unicode properties are only defined on Unicode code points,
3655so the result of this match is undefined by Unicode, but Perl (starting
3656in v5.20) treats non-Unicode code points as if they were typical
3657unassigned Unicode ones, and matched this one accordingly.  Whether a
3658given property matches these code points or not is specified in
3659L<perluniprops/Properties accessible through \p{} and \P{}>.
3660
3661This message is suppressed (unless it has been made fatal) if it is
3662immaterial to the results of the match if the code point is Unicode or
3663not.  For example, the property C<\p{ASCII_Hex_Digit}> only can match
3664the 22 characters C<[0-9A-Fa-f]>, so obviously all other code points,
3665Unicode or not, won't match it.  (And C<\P{ASCII_Hex_Digit}> will match
3666every code point except these 22.)
3667
3668Getting this message indicates that the outcome of the match arguably
3669should have been the opposite of what actually happened.  If you think
3670that is the case, you may wish to make the C<non_unicode> warnings
3671category fatal; if you agree with Perl's decision, you may wish to turn
3672off this category.
3673
3674See L<perlunicode/Beyond Unicode code points> for more information.
3675
3676=item %s matches null string many times in regex; marked by S<<-- HERE> in
3677m/%s/
3678
3679(W regexp) The pattern you've specified would be an infinite loop if the
3680regular expression engine didn't specifically check for that.  The S<<-- HERE>
3681shows whereabouts in the regular expression the problem was discovered.
3682See L<perlre>.
3683
3684=item Maximal count of pending signals (%u) exceeded
3685
3686(F) Perl aborted due to too high a number of signals pending.  This
3687usually indicates that your operating system tried to deliver signals
3688too fast (with a very high priority), starving the perl process from
3689resources it would need to reach a point where it can process signals
3690safely.  (See L<perlipc/"Deferred Signals (Safe Signals)">.)
3691
3692=item "%s" may clash with future reserved word
3693
3694(W) This warning may be due to running a perl5 script through a perl4
3695interpreter, especially if the word that is being warned about is
3696"use" or "my".
3697
3698=item '%' may not be used in pack
3699
3700(F) You can't pack a string by supplying a checksum, because the
3701checksumming process loses information, and you can't go the other way.
3702See L<perlfunc/unpack>.
3703
3704=item Method for operation %s not found in package %s during blessing
3705
3706(F) An attempt was made to specify an entry in an overloading table that
3707doesn't resolve to a valid subroutine.  See L<overload>.
3708
3709=item Method %s not permitted
3710
3711See L</500 Server error>.
3712
3713=item Might be a runaway multi-line %s string starting on line %d
3714
3715(S) An advisory indicating that the previous error may have been caused
3716by a missing delimiter on a string or pattern, because it eventually
3717ended earlier on the current line.
3718
3719=item Misplaced _ in number
3720
3721(W syntax) An underscore (underbar) in a numeric constant did not
3722separate two digits.
3723
3724=item Missing argument for %n in %s
3725
3726(F) A C<%n> was used in a format string with no corresponding argument for
3727perl to write the current string length to.
3728
3729=item Missing argument in %s
3730
3731(W missing) You called a function with fewer arguments than other
3732arguments you supplied indicated would be needed.
3733
3734Currently only emitted when a printf-type format required more
3735arguments than were supplied, but might be used in the future for
3736other cases where we can statically determine that arguments to
3737functions are missing, e.g. for the L<perlfunc/pack> function.
3738
3739=item Missing argument to -%c
3740
3741(F) The argument to the indicated command line switch must follow
3742immediately after the switch, without intervening spaces.
3743
3744=item Missing braces on \N{}
3745
3746=item Missing braces on \N{} in regex; marked by S<<-- HERE> in m/%s/
3747
3748(F) Wrong syntax of character name literal C<\N{charname}> within
3749double-quotish context.  This can also happen when there is a space
3750(or comment) between the C<\N> and the C<{> in a regex with the C</x> modifier.
3751This modifier does not change the requirement that the brace immediately
3752follow the C<\N>.
3753
3754=item Missing braces on \o{}
3755
3756(F) A C<\o> must be followed immediately by a C<{> in double-quotish context.
3757
3758=item Missing comma after first argument to %s function
3759
3760(F) While certain functions allow you to specify a filehandle or an
3761"indirect object" before the argument list, this ain't one of them.
3762
3763=item Missing command in piped open
3764
3765(W pipe) You used the C<open(FH, "| command")> or
3766C<open(FH, "command |")> construction, but the command was missing or
3767blank.
3768
3769=item Missing control char name in \c
3770
3771(F) A double-quoted string ended with "\c", without the required control
3772character name.
3773
3774=item Missing ']' in prototype for %s : %s
3775
3776(W illegalproto) A grouping was started with C<[> but never closed with C<]>.
3777
3778=item Missing name in "%s sub"
3779
3780(F) The syntax for lexically scoped subroutines requires that
3781they have a name with which they can be found.
3782
3783=item Missing $ on loop variable
3784
3785(F) Apparently you've been programming in B<csh> too much.  Variables
3786are always mentioned with the $ in Perl, unlike in the shells, where it
3787can vary from one line to the next.
3788
3789=item (Missing operator before %s?)
3790
3791(S syntax) This is an educated guess made in conjunction with the message
3792"%s found where operator expected".  Often the missing operator is a comma.
3793
3794=item Missing or undefined argument to %s
3795
3796(F) You tried to call require or do with no argument or with an undefined
3797value as an argument.  Require expects either a package name or a
3798file-specification as an argument; do expects a filename.  See
3799L<perlfunc/require EXPR> and L<perlfunc/do EXPR>.
3800
3801=item Missing right brace on \%c{} in regex; marked by S<<-- HERE> in m/%s/
3802
3803(F) Missing right brace in C<\x{...}>, C<\p{...}>, C<\P{...}>, or C<\N{...}>.
3804
3805=item Missing right brace on \N{}
3806
3807=item Missing right brace on \N{} or unescaped left brace after \N
3808
3809(F) C<\N> has two meanings.
3810
3811The traditional one has it followed by a name enclosed in braces,
3812meaning the character (or sequence of characters) given by that
3813name.  Thus C<\N{ASTERISK}> is another way of writing C<*>, valid in both
3814double-quoted strings and regular expression patterns.  In patterns,
3815it doesn't have the meaning an unescaped C<*> does.
3816
3817Starting in Perl 5.12.0, C<\N> also can have an additional meaning (only)
3818in patterns, namely to match a non-newline character.  (This is short
3819for C<[^\n]>, and like C<.> but is not affected by the C</s> regex modifier.)
3820
3821This can lead to some ambiguities.  When C<\N> is not followed immediately
3822by a left brace, Perl assumes the C<[^\n]> meaning.  Also, if the braces
3823form a valid quantifier such as C<\N{3}> or C<\N{5,}>, Perl assumes that this
3824means to match the given quantity of non-newlines (in these examples,
38253; and 5 or more, respectively).  In all other case, where there is a
3826C<\N{> and a matching C<}>, Perl assumes that a character name is desired.
3827
3828However, if there is no matching C<}>, Perl doesn't know if it was
3829mistakenly omitted, or if C<[^\n]{> was desired, and raises this error.
3830If you meant the former, add the right brace; if you meant the latter,
3831escape the brace with a backslash, like so: C<\N\{>
3832
3833=item Missing right curly or square bracket
3834
3835(F) The lexer counted more opening curly or square brackets than closing
3836ones.  As a general rule, you'll find it's missing near the place you
3837were last editing.
3838
3839=item (Missing semicolon on previous line?)
3840
3841(S syntax) This is an educated guess made in conjunction with the message
3842"%s found where operator expected".  Don't automatically put a semicolon on
3843the previous line just because you saw this message.
3844
3845=item Modification of a read-only value attempted
3846
3847(F) You tried, directly or indirectly, to change the value of a
3848constant.  You didn't, of course, try "2 = 1", because the compiler
3849catches that.  But an easy way to do the same thing is:
3850
3851    sub mod { $_[0] = 1 }
3852    mod(2);
3853
3854Another way is to assign to a substr() that's off the end of the string.
3855
3856Yet another way is to assign to a C<foreach> loop I<VAR> when I<VAR>
3857is aliased to a constant in the look I<LIST>:
3858
3859    $x = 1;
3860    foreach my $n ($x, 2) {
3861        $n *= 2; # modifies the $x, but fails on attempt to
3862    }            # modify the 2
3863
3864L<PerlIO::scalar> will also produce this message as a warning if you
3865attempt to open a read-only scalar for writing.
3866
3867=item Modification of non-creatable array value attempted, %s
3868
3869(F) You tried to make an array value spring into existence, and the
3870subscript was probably negative, even counting from end of the array
3871backwards.
3872
3873=item Modification of non-creatable hash value attempted, %s
3874
3875(P) You tried to make a hash value spring into existence, and it
3876couldn't be created for some peculiar reason.
3877
3878=item Module name must be constant
3879
3880(F) Only a bare module name is allowed as the first argument to a "use".
3881
3882=item Module name required with -%c option
3883
3884(F) The C<-M> or C<-m> options say that Perl should load some module, but
3885you omitted the name of the module.  Consult
3886L<perlrun|perlrun/-m[-]module> for full details about C<-M> and C<-m>.
3887
3888=item More than one argument to '%s' open
3889
3890(F) The C<open> function has been asked to open multiple files.  This
3891can happen if you are trying to open a pipe to a command that takes a
3892list of arguments, but have forgotten to specify a piped open mode.
3893See L<perlfunc/open> for details.
3894
3895=item mprotect for COW string %p %u failed with %d
3896
3897(S) You compiled perl with B<-D>PERL_DEBUG_READONLY_COW (see
3898L<perlguts/"Copy on Write">), but a shared string buffer
3899could not be made read-only.
3900
3901=item mprotect for %p %u failed with %d
3902
3903(S) You compiled perl with B<-D>PERL_DEBUG_READONLY_OPS (see L<perlhacktips>),
3904but an op tree could not be made read-only.
3905
3906=item mprotect RW for COW string %p %u failed with %d
3907
3908(S) You compiled perl with B<-D>PERL_DEBUG_READONLY_COW (see
3909L<perlguts/"Copy on Write">), but a read-only shared string
3910buffer could not be made mutable.
3911
3912=item mprotect RW for %p %u failed with %d
3913
3914(S) You compiled perl with B<-D>PERL_DEBUG_READONLY_OPS (see
3915L<perlhacktips>), but a read-only op tree could not be made
3916mutable before freeing the ops.
3917
3918=item msg%s not implemented
3919
3920(F) You don't have System V message IPC on your system.
3921
3922=item Multidimensional hash lookup is disabled
3923
3924(F) You supplied a list of subscripts to a hash lookup under
3925C<< no feature "multidimensional"; >>, eg:
3926
3927  $z = $foo{$x, $y};
3928
3929which by default acts like:
3930
3931  $z = $foo{join($;, $x, $y)};
3932
3933=item Multidimensional syntax %s not supported
3934
3935(W syntax) Multidimensional arrays aren't written like C<$foo[1,2,3]>.
3936They're written like C<$foo[1][2][3]>, as in C.
3937
3938=item Multiple slurpy parameters not allowed
3939
3940(F) In subroutine signatures, a slurpy parameter (C<@> or C<%>) must be
3941the last parameter, and there must not be more than one of them; for
3942example:
3943
3944    sub foo ($a, @b)    {} # legal
3945    sub foo ($a, @b, %) {} # invalid
3946
3947=item '/' must follow a numeric type in unpack
3948
3949(F) You had an unpack template that contained a '/', but this did not
3950follow some unpack specification producing a numeric value.
3951See L<perlfunc/pack>.
3952
3953=item %s must not be a named sequence in transliteration operator
3954
3955(F) Transliteration (C<tr///> and C<y///>) transliterates individual
3956characters.  But a named sequence by definition is more than an
3957individual character, and hence doing this operation on it doesn't make
3958sense.
3959
3960=item "my sub" not yet implemented
3961
3962(F) Lexically scoped subroutines are not yet implemented.  Don't try
3963that yet.
3964
3965=item "my" subroutine %s can't be in a package
3966
3967(F) Lexically scoped subroutines aren't in a package, so it doesn't make
3968sense to try to declare one with a package qualifier on the front.
3969
3970=item "my %s" used in sort comparison
3971
3972(W syntax) The package variables $a and $b are used for sort comparisons.
3973You used $a or $b in as an operand to the C<< <=> >> or C<cmp> operator inside a
3974sort comparison block, and the variable had earlier been declared as a
3975lexical variable.  Either qualify the sort variable with the package
3976name, or rename the lexical variable.
3977
3978=item "my" variable %s can't be in a package
3979
3980(F) Lexically scoped variables aren't in a package, so it doesn't make
3981sense to try to declare one with a package qualifier on the front.  Use
3982local() if you want to localize a package variable.
3983
3984=item Name "%s::%s" used only once: possible typo
3985
3986(W once) Typographical errors often show up as unique variable
3987names.  If you had a good reason for having a unique name, then
3988just mention it again somehow to suppress the message.  The C<our>
3989declaration is also provided for this purpose.
3990
3991NOTE: This warning detects package symbols that have been used
3992only once.  This means lexical variables will never trigger this
3993warning.  It also means that all of the package variables $c, @c,
3994%c, as well as *c, &c, sub c{}, c(), and c (the filehandle or
3995format) are considered the same; if a program uses $c only once
3996but also uses any of the others it will not trigger this warning.
3997Symbols beginning with an underscore and symbols using special
3998identifiers (q.v. L<perldata>) are exempt from this warning.
3999
4000=item Need exactly 3 octal digits in regex; marked by S<<-- HERE> in m/%s/
4001
4002(F) Within S<C<(?[   ])>>, all constants interpreted as octal need to be
4003exactly 3 digits long.  This helps catch some ambiguities.  If your
4004constant is too short, add leading zeros, like
4005
4006 (?[ [ \078 ] ])     # Syntax error!
4007 (?[ [ \0078 ] ])    # Works
4008 (?[ [ \007 8 ] ])   # Clearer
4009
4010The maximum number this construct can express is C<\777>.  If you
4011need a larger one, you need to use L<\o{}|perlrebackslash/Octal escapes> instead.  If you meant
4012two separate things, you need to separate them:
4013
4014 (?[ [ \7776 ] ])        # Syntax error!
4015 (?[ [ \o{7776} ] ])     # One meaning
4016 (?[ [ \777 6 ] ])       # Another meaning
4017 (?[ [ \777 \006 ] ])    # Still another
4018
4019=item Negative '/' count in unpack
4020
4021(F) The length count obtained from a length/code unpack operation was
4022negative.  See L<perlfunc/pack>.
4023
4024=item Negative length
4025
4026(F) You tried to do a read/write/send/recv operation with a buffer
4027length that is less than 0.  This is difficult to imagine.
4028
4029=item Negative offset to vec in lvalue context
4030
4031(F) When C<vec> is called in an lvalue context, the second argument must be
4032greater than or equal to zero.
4033
4034=item Negative repeat count does nothing
4035
4036(W numeric) You tried to execute the
4037L<C<x>|perlop/Multiplicative Operators> repetition operator fewer than 0
4038times, which doesn't make sense.
4039
4040=item Nested quantifiers in regex; marked by S<<-- HERE> in m/%s/
4041
4042(F) You can't quantify a quantifier without intervening parentheses.
4043So things like ** or +* or ?* are illegal.  The S<<-- HERE> shows
4044whereabouts in the regular expression the problem was discovered.
4045
4046Note that the minimal matching quantifiers, C<*?>, C<+?>, and
4047C<??> appear to be nested quantifiers, but aren't.  See L<perlre>.
4048
4049=item %s never introduced
4050
4051(S internal) The symbol in question was declared but somehow went out of
4052scope before it could possibly have been used.
4053
4054=item next::method/next::can/maybe::next::method cannot find enclosing method
4055
4056(F) C<next::method> needs to be called within the context of a
4057real method in a real package, and it could not find such a context.
4058See L<mro>.
4059
4060=item \N in a character class must be a named character: \N{...} in regex;
4061marked by S<<-- HERE> in m/%s/
4062
4063(F) The new (as of Perl 5.12) meaning of C<\N> as C<[^\n]> is not valid in a
4064bracketed character class, for the same reason that C<.> in a character
4065class loses its specialness: it matches almost everything, which is
4066probably not what you want.
4067
4068=item \N{} here is restricted to one character in regex; marked by <-- HERE in m/%s/
4069
4070(F) Named Unicode character escapes (C<\N{...}>) may return a
4071multi-character sequence.  Even though a character class is
4072supposed to match just one character of input, perl will match the
4073whole thing correctly, except under certain conditions.  These currently
4074are
4075
4076=over 4
4077
4078=item When the class is inverted (C<[^...]>)
4079
4080The mathematically logical behavior for what matches when inverting
4081is very different from what people expect, so we have decided to
4082forbid it.
4083
4084=item The escape is the beginning or final end point of a range
4085
4086Similarly unclear is what should be generated when the
4087C<\N{...}> is used as one of the end points of the range, such as in
4088
4089 [\x{41}-\N{ARABIC SEQUENCE YEH WITH HAMZA ABOVE WITH AE}]
4090
4091What is meant here is unclear, as the C<\N{...}> escape is a sequence
4092of code points, so this is made an error.
4093
4094=item In a regex set
4095
4096The syntax S<C<(?[   ])>> in a regular expression yields a list of
4097single code points, none can be a sequence.
4098
4099=back
4100
4101=item No %s allowed while running setuid
4102
4103(F) Certain operations are deemed to be too insecure for a setuid or
4104setgid script to even be allowed to attempt.  Generally speaking there
4105will be another way to do what you want that is, if not secure, at least
4106securable.  See L<perlsec>.
4107
4108=item No code specified for -%c
4109
4110(F) Perl's B<-e> and B<-E> command-line options require an argument.  If
4111you want to run an empty program, pass the empty string as a separate
4112argument or run a program consisting of a single 0 or 1:
4113
4114    perl -e ""
4115    perl -e0
4116    perl -e1
4117
4118=item No comma allowed after %s
4119
4120(F) A list operator that has a filehandle or "indirect object" is
4121not allowed to have a comma between that and the following arguments.
4122Otherwise it'd be just another one of the arguments.
4123
4124One possible cause for this is that you expected to have imported
4125a constant to your name space with B<use> or B<import> while no such
4126importing took place, it may for example be that your operating
4127system does not support that particular constant.  Hopefully you did
4128use an explicit import list for the constants you expect to see;
4129please see L<perlfunc/use> and L<perlfunc/import>.  While an
4130explicit import list would probably have caught this error earlier
4131it naturally does not remedy the fact that your operating system
4132still does not support that constant.  Maybe you have a typo in
4133the constants of the symbol import list of B<use> or B<import> or in the
4134constant name at the line where this error was triggered?
4135
4136=item No command into which to pipe on command line
4137
4138(F) An error peculiar to VMS.  Perl handles its own command line
4139redirection, and found a '|' at the end of the command line, so it
4140doesn't know where you want to pipe the output from this command.
4141
4142=item No DB::DB routine defined
4143
4144(F) The currently executing code was compiled with the B<-d> switch, but
4145for some reason the current debugger (e.g. F<perl5db.pl> or a C<Devel::>
4146module) didn't define a routine to be called at the beginning of each
4147statement.
4148
4149=item No dbm on this machine
4150
4151(P) This is counted as an internal error, because every machine should
4152supply dbm nowadays, because Perl comes with SDBM.  See L<SDBM_File>.
4153
4154=item No DB::sub routine defined
4155
4156(F) The currently executing code was compiled with the B<-d> switch, but
4157for some reason the current debugger (e.g. F<perl5db.pl> or a C<Devel::>
4158module) didn't define a C<DB::sub> routine to be called at the beginning
4159of each ordinary subroutine call.
4160
4161=item No digits found for %s literal
4162
4163(F) No hexadecimal digits were found following C<0x> or no binary digits
4164were found following C<0b>.
4165
4166=item No directory specified for -I
4167
4168(F) The B<-I> command-line switch requires a directory name as part of the
4169I<same> argument.  Use B<-Ilib>, for instance.  B<-I lib> won't work.
4170
4171=item No error file after 2> or 2>> on command line
4172
4173(F) An error peculiar to VMS.  Perl handles its own command line
4174redirection, and found a '2>' or a '2>>' on the command line, but can't
4175find the name of the file to which to write data destined for stderr.
4176
4177=item No group ending character '%c' found in template
4178
4179(F) A pack or unpack template has an opening '(' or '[' without its
4180matching counterpart.  See L<perlfunc/pack>.
4181
4182=item No input file after < on command line
4183
4184(F) An error peculiar to VMS.  Perl handles its own command line
4185redirection, and found a '<' on the command line, but can't find the
4186name of the file from which to read data for stdin.
4187
4188=item No next::method '%s' found for %s
4189
4190(F) C<next::method> found no further instances of this method name
4191in the remaining packages of the MRO of this class.  If you don't want
4192it throwing an exception, use C<maybe::next::method>
4193or C<next::can>.  See L<mro>.
4194
4195=item Non-finite repeat count does nothing
4196
4197(W numeric) You tried to execute the
4198L<C<x>|perlop/Multiplicative Operators> repetition operator C<Inf> (or
4199C<-Inf>) or C<NaN> times, which doesn't make sense.
4200
4201=item Non-hex character in regex; marked by S<<-- HERE> in m/%s/
4202
4203(F) In a regular expression, there was a non-hexadecimal character where
4204a hex one was expected, like
4205
4206 (?[ [ \xDG ] ])
4207 (?[ [ \x{DEKA} ] ])
4208
4209=item Non-hex character '%c' terminates \x early.  Resolved as "%s"
4210
4211(W digit) In parsing a hexadecimal numeric constant, a character was
4212unexpectedly encountered that isn't hexadecimal.  The resulting value
4213is as indicated.
4214
4215Note that, within braces, every character starting with the first
4216non-hexadecimal up to the ending brace is ignored.
4217
4218=item Non-octal character in regex; marked by S<<-- HERE> in m/%s/
4219
4220(F) In a regular expression, there was a non-octal character where
4221an octal one was expected, like
4222
4223 (?[ [ \o{1278} ] ])
4224
4225=item Non-octal character '%c' terminates \o early.  Resolved as "%s"
4226
4227(W digit) In parsing an octal numeric constant, a character was
4228unexpectedly encountered that isn't octal.  The resulting value
4229is as indicated.
4230
4231When not using C<\o{...}>, you wrote something like C<\08>, or C<\179>
4232in a double-quotish string.  The resolution is as indicated, with all
4233but the last digit treated as a single character, specified in octal.
4234The last digit is the next character in the string.  To tell Perl that
4235this is indeed what you want, you can use the C<\o{ }> syntax, or use
4236exactly three digits to specify the octal for the character.
4237
4238Note that, within braces, every character starting with the first
4239non-octal up to the ending brace is ignored.
4240
4241=item "no" not allowed in expression
4242
4243(F) The "no" keyword is recognized and executed at compile time, and
4244returns no useful value.  See L<perlmod>.
4245
4246=item Non-string passed as bitmask
4247
4248(W misc) A number has been passed as a bitmask argument to select().
4249Use the vec() function to construct the file descriptor bitmasks for
4250select.  See L<perlfunc/select>.
4251
4252=item No output file after > on command line
4253
4254(F) An error peculiar to VMS.  Perl handles its own command line
4255redirection, and found a lone '>' at the end of the command line, so it
4256doesn't know where you wanted to redirect stdout.
4257
4258=item No output file after > or >> on command line
4259
4260(F) An error peculiar to VMS.  Perl handles its own command line
4261redirection, and found a '>' or a '>>' on the command line, but can't
4262find the name of the file to which to write data destined for stdout.
4263
4264=item No package name allowed for subroutine %s in "our"
4265
4266=item No package name allowed for variable %s in "our"
4267
4268(F) Fully qualified subroutine and variable names are not allowed in "our"
4269declarations, because that doesn't make much sense under existing rules.
4270Such syntax is reserved for future extensions.
4271
4272=item No Perl script found in input
4273
4274(F) You called C<perl -x>, but no line was found in the file beginning
4275with #! and containing the word "perl".
4276
4277=item No setregid available
4278
4279(F) Configure didn't find anything resembling the setregid() call for
4280your system.
4281
4282=item No setreuid available
4283
4284(F) Configure didn't find anything resembling the setreuid() call for
4285your system.
4286
4287=item No such class %s
4288
4289(F) You provided a class qualifier in a "my", "our" or "state"
4290declaration, but this class doesn't exist at this point in your program.
4291
4292=item No such class field "%s" in variable %s of type %s
4293
4294(F) You tried to access a key from a hash through the indicated typed
4295variable but that key is not allowed by the package of the same type.
4296The indicated package has restricted the set of allowed keys using the
4297L<fields> pragma.
4298
4299=item No such hook: %s
4300
4301(F) You specified a signal hook that was not recognized by Perl.
4302Currently, Perl accepts C<__DIE__> and C<__WARN__> as valid signal hooks.
4303
4304=item No such pipe open
4305
4306(P) An error peculiar to VMS.  The internal routine my_pclose() tried to
4307close a pipe which hadn't been opened.  This should have been caught
4308earlier as an attempt to close an unopened filehandle.
4309
4310=item No such signal: SIG%s
4311
4312(W signal) You specified a signal name as a subscript to %SIG that was
4313not recognized.  Say C<kill -l> in your shell to see the valid signal
4314names on your system.
4315
4316=item No Unicode property value wildcard matches:
4317
4318(W regexp) You specified a wildcard for a Unicode property value, but
4319there is no property value in the current Unicode release that matches
4320it.  Check your spelling.
4321
4322=item Not a CODE reference
4323
4324(F) Perl was trying to evaluate a reference to a code value (that is, a
4325subroutine), but found a reference to something else instead.  You can
4326use the ref() function to find out what kind of ref it really was.  See
4327also L<perlref>.
4328
4329=item Not a GLOB reference
4330
4331(F) Perl was trying to evaluate a reference to a "typeglob" (that is, a
4332symbol table entry that looks like C<*foo>), but found a reference to
4333something else instead.  You can use the ref() function to find out what
4334kind of ref it really was.  See L<perlref>.
4335
4336=item Not a HASH reference
4337
4338(F) Perl was trying to evaluate a reference to a hash value, but found a
4339reference to something else instead.  You can use the ref() function to
4340find out what kind of ref it really was.  See L<perlref>.
4341
4342=item '#' not allowed immediately following a sigil in a subroutine signature
4343
4344(F) In a subroutine signature definition, a comment following a sigil
4345(C<$>, C<@> or C<%>), needs to be separated by whitespace or a comma etc., in
4346particular to avoid confusion with the C<$#> variable.  For example:
4347
4348    # bad
4349    sub f ($# ignore first arg
4350           , $b) {}
4351    # good
4352    sub f ($, # ignore first arg
4353           $b) {}
4354
4355=item Not an ARRAY reference
4356
4357(F) Perl was trying to evaluate a reference to an array value, but found
4358a reference to something else instead.  You can use the ref() function
4359to find out what kind of ref it really was.  See L<perlref>.
4360
4361=item Not a SCALAR reference
4362
4363(F) Perl was trying to evaluate a reference to a scalar value, but found
4364a reference to something else instead.  You can use the ref() function
4365to find out what kind of ref it really was.  See L<perlref>.
4366
4367=item Not a subroutine reference
4368
4369(F) Perl was trying to evaluate a reference to a code value (that is, a
4370subroutine), but found a reference to something else instead.  You can
4371use the ref() function to find out what kind of ref it really was.  See
4372also L<perlref>.
4373
4374=item Not a subroutine reference in overload table
4375
4376(F) An attempt was made to specify an entry in an overloading table that
4377doesn't somehow point to a valid subroutine.  See L<overload>.
4378
4379=item Not enough arguments for %s
4380
4381(F) The function requires more arguments than you specified.
4382
4383=item Not enough format arguments
4384
4385(W syntax) A format specified more picture fields than the next line
4386supplied.  See L<perlform>.
4387
4388=item %s: not found
4389
4390(A) You've accidentally run your script through the Bourne shell instead
4391of Perl.  Check the #! line, or manually feed your script into Perl
4392yourself.
4393
4394=item no UTC offset information; assuming local time is UTC
4395
4396(S) A warning peculiar to VMS.  Perl was unable to find the local
4397timezone offset, so it's assuming that local system time is equivalent
4398to UTC.  If it's not, define the logical name
4399F<SYS$TIMEZONE_DIFFERENTIAL> to translate to the number of seconds which
4400need to be added to UTC to get local time.
4401
4402=item NULL OP IN RUN
4403
4404(S debugging) Some internal routine called run() with a null opcode
4405pointer.
4406
4407=item Null picture in formline
4408
4409(F) The first argument to formline must be a valid format picture
4410specification.  It was found to be empty, which probably means you
4411supplied it an uninitialized value.  See L<perlform>.
4412
4413=item NULL regexp parameter
4414
4415(P) The internal pattern matching routines are out of their gourd.
4416
4417=item Number too long
4418
4419(F) Perl limits the representation of decimal numbers in programs to
4420about 250 characters.  You've exceeded that length.  Future
4421versions of Perl are likely to eliminate this arbitrary limitation.  In
4422the meantime, try using scientific notation (e.g. "1e6" instead of
4423"1_000_000").
4424
4425=item Number with no digits
4426
4427(F) Perl was looking for a number but found nothing that looked like
4428a number.  This happens, for example with C<\o{}>, with no number between
4429the braces.
4430
4431=item Numeric format result too large
4432
4433(F) The length of the result of a numeric format supplied to sprintf()
4434or printf() would have been too large for the underlying C function to
4435report.  This limit is typically 2GB.
4436
4437=item Numeric variables with more than one digit may not start with '0'
4438
4439(F) The only numeric variable which is allowed to start with a 0 is C<$0>,
4440and you mentioned a variable that starts with 0 that has more than one
4441digit. You probably want to remove the leading 0, or if the intent was
4442to express a variable name in octal you should convert to decimal.
4443
4444=item Octal number > 037777777777 non-portable
4445
4446(W portable) The octal number you specified is larger than 2**32-1
4447(4294967295) and therefore non-portable between systems.  See
4448L<perlport> for more on portability concerns.
4449
4450=item Odd name/value argument for subroutine '%s'
4451
4452(F) A subroutine using a slurpy hash parameter in its signature
4453received an odd number of arguments to populate the hash.  It requires
4454the arguments to be paired, with the same number of keys as values.
4455The caller of the subroutine is presumably at fault.
4456
4457The message attempts to include the name of the called subroutine. If the
4458subroutine has been aliased, the subroutine's original name will be shown,
4459regardless of what name the caller used.
4460
4461=item Odd number of arguments for overload::constant
4462
4463(W overload) The call to overload::constant contained an odd number of
4464arguments.  The arguments should come in pairs.
4465
4466=item Odd number of elements in anonymous hash
4467
4468(W misc) You specified an odd number of elements to initialize a hash,
4469which is odd, because hashes come in key/value pairs.
4470
4471=item Odd number of elements in hash assignment
4472
4473(W misc) You specified an odd number of elements to initialize a hash,
4474which is odd, because hashes come in key/value pairs.
4475
4476=item Offset outside string
4477
4478(F)(W layer) You tried to do a read/write/send/recv/seek operation
4479with an offset pointing outside the buffer.  This is difficult to
4480imagine.  The sole exceptions to this are that zero padding will
4481take place when going past the end of the string when either
4482C<sysread()>ing a file, or when seeking past the end of a scalar opened
4483for I/O (in anticipation of future reads and to imitate the behavior
4484with real files).
4485
4486=item Old package separator used in string
4487
4488(W syntax) You used the old package separator, "'", in a variable
4489named inside a double-quoted string; e.g., C<"In $name's house">.  This
4490is equivalent to C<"In $name::s house">.  If you meant the former, put
4491a backslash before the apostrophe (C<"In $name\'s house">).
4492
4493=item %s() on unopened %s
4494
4495(W unopened) An I/O operation was attempted on a filehandle that was
4496never initialized.  You need to do an open(), a sysopen(), or a socket()
4497call, or call a constructor from the FileHandle package.
4498
4499=item -%s on unopened filehandle %s
4500
4501(W unopened) You tried to invoke a file test operator on a filehandle
4502that isn't open.  Check your control flow.  See also L<perlfunc/-X>.
4503
4504=item oops: oopsAV
4505
4506(S internal) An internal warning that the grammar is screwed up.
4507
4508=item oops: oopsHV
4509
4510(S internal) An internal warning that the grammar is screwed up.
4511
4512=item Operand with no preceding operator in regex; marked by S<<-- HERE> in
4513m/%s/
4514
4515(F) You wrote something like
4516
4517 (?[ \p{Digit} \p{Thai} ])
4518
4519There are two operands, but no operator giving how you want to combine
4520them.
4521
4522=item Operation "%s": no method found, %s
4523
4524(F) An attempt was made to perform an overloaded operation for which no
4525handler was defined.  While some handlers can be autogenerated in terms
4526of other handlers, there is no default handler for any operation, unless
4527the C<fallback> overloading key is specified to be true.  See L<overload>.
4528
4529=item Operation "%s" returns its argument for non-Unicode code point 0x%X
4530
4531(S non_unicode) You performed an operation requiring Unicode rules
4532on a code point that is not in Unicode, so what it should do is not
4533defined.  Perl has chosen to have it do nothing, and warn you.
4534
4535If the operation shown is "ToFold", it means that case-insensitive
4536matching in a regular expression was done on the code point.
4537
4538If you know what you are doing you can turn off this warning by
4539C<no warnings 'non_unicode';>.
4540
4541=item Operation "%s" returns its argument for UTF-16 surrogate U+%X
4542
4543(S surrogate) You performed an operation requiring Unicode
4544rules on a Unicode surrogate.  Unicode frowns upon the use
4545of surrogates for anything but storing strings in UTF-16, but
4546rules are (reluctantly) defined for the surrogates, and
4547they are to do nothing for this operation.  Because the use of
4548surrogates can be dangerous, Perl warns.
4549
4550If the operation shown is "ToFold", it means that case-insensitive
4551matching in a regular expression was done on the code point.
4552
4553If you know what you are doing you can turn off this warning by
4554C<no warnings 'surrogate';>.
4555
4556=item Operator or semicolon missing before %s
4557
4558(S ambiguous) You used a variable or subroutine call where the parser
4559was expecting an operator.  The parser has assumed you really meant to
4560use an operator, but this is highly likely to be incorrect.  For
4561example, if you say "*foo *foo" it will be interpreted as if you said
4562"*foo * 'foo'".
4563
4564=item Optional parameter lacks default expression
4565
4566(F) In a subroutine signature, you wrote something like "$a =", making a
4567named optional parameter without a default value.  A nameless optional
4568parameter is permitted to have no default value, but a named one must
4569have a specific default.  You probably want "$a = undef".
4570
4571=item "our" variable %s redeclared
4572
4573(W shadow) You seem to have already declared the same global once before
4574in the current lexical scope.
4575
4576=item Out of memory!
4577
4578(X) The malloc() function returned 0, indicating there was insufficient
4579remaining memory (or virtual memory) to satisfy the request.  Perl has
4580no option but to exit immediately.
4581
4582At least in Unix you may be able to get past this by increasing your
4583process datasize limits: in csh/tcsh use C<limit> and
4584C<limit datasize n> (where C<n> is the number of kilobytes) to check
4585the current limits and change them, and in ksh/bash/zsh use C<ulimit -a>
4586and C<ulimit -d n>, respectively.
4587
4588=item Out of memory during %s extend
4589
4590(X) An attempt was made to extend an array, a list, or a string beyond
4591the largest possible memory allocation.
4592
4593=item Out of memory during "large" request for %s
4594
4595(F) The malloc() function returned 0, indicating there was insufficient
4596remaining memory (or virtual memory) to satisfy the request.  However,
4597the request was judged large enough (compile-time default is 64K), so a
4598possibility to shut down by trapping this error is granted.
4599
4600=item Out of memory during request for %s
4601
4602(X)(F) The malloc() function returned 0, indicating there was
4603insufficient remaining memory (or virtual memory) to satisfy the
4604request.
4605
4606The request was judged to be small, so the possibility to trap it
4607depends on the way perl was compiled.  By default it is not trappable.
4608However, if compiled for this, Perl may use the contents of C<$^M> as an
4609emergency pool after die()ing with this message.  In this case the error
4610is trappable I<once>, and the error message will include the line and file
4611where the failed request happened.
4612
4613=item Out of memory during ridiculously large request
4614
4615(F) You can't allocate more than 2^31+"small amount" bytes.  This error
4616is most likely to be caused by a typo in the Perl program. e.g.,
4617C<$arr[time]> instead of C<$arr[$time]>.
4618
4619=item Out of memory for yacc stack
4620
4621(F) The yacc parser wanted to grow its stack so it could continue
4622parsing, but realloc() wouldn't give it more memory, virtual or
4623otherwise.
4624
4625=item '.' outside of string in pack
4626
4627(F) The argument to a '.' in your template tried to move the working
4628position to before the start of the packed string being built.
4629
4630=item '@' outside of string in unpack
4631
4632(F) You had a template that specified an absolute position outside
4633the string being unpacked.  See L<perlfunc/pack>.
4634
4635=item '@' outside of string with malformed UTF-8 in unpack
4636
4637(F) You had a template that specified an absolute position outside
4638the string being unpacked.  The string being unpacked was also invalid
4639UTF-8.  See L<perlfunc/pack>.
4640
4641=item overload arg '%s' is invalid
4642
4643(W overload) The L<overload> pragma was passed an argument it did not
4644recognize.  Did you mistype an operator?
4645
4646=item Overloaded dereference did not return a reference
4647
4648(F) An object with an overloaded dereference operator was dereferenced,
4649but the overloaded operation did not return a reference.  See
4650L<overload>.
4651
4652=item Overloaded qr did not return a REGEXP
4653
4654(F) An object with a C<qr> overload was used as part of a match, but the
4655overloaded operation didn't return a compiled regexp.  See L<overload>.
4656
4657=item %s package attribute may clash with future reserved word: %s
4658
4659(W reserved) A lowercase attribute name was used that had a
4660package-specific handler.  That name might have a meaning to Perl itself
4661some day, even though it doesn't yet.  Perhaps you should use a
4662mixed-case attribute name, instead.  See L<attributes>.
4663
4664=item pack/unpack repeat count overflow
4665
4666(F) You can't specify a repeat count so large that it overflows your
4667signed integers.  See L<perlfunc/pack>.
4668
4669=item page overflow
4670
4671(W io) A single call to write() produced more lines than can fit on a
4672page.  See L<perlform>.
4673
4674=item panic: %s
4675
4676(P) An internal error.
4677
4678=item panic: attempt to call %s in %s
4679
4680(P) One of the file test operators entered a code branch that calls
4681an ACL related-function, but that function is not available on this
4682platform.  Earlier checks mean that it should not be possible to
4683enter this branch on this platform.
4684
4685=item panic: child pseudo-process was never scheduled
4686
4687(P) A child pseudo-process in the ithreads implementation on Windows
4688was not scheduled within the time period allowed and therefore was not
4689able to initialize properly.
4690
4691=item panic: ck_grep, type=%u
4692
4693(P) Failed an internal consistency check trying to compile a grep.
4694
4695=item panic: corrupt saved stack index %ld
4696
4697(P) The savestack was requested to restore more localized values than
4698there are in the savestack.
4699
4700=item panic: del_backref
4701
4702(P) Failed an internal consistency check while trying to reset a weak
4703reference.
4704
4705=item panic: fold_constants JMPENV_PUSH returned %d
4706
4707(P) While attempting folding constants an exception other than an C<eval>
4708failure was caught.
4709
4710=item panic: frexp: %f
4711
4712(P) The library function frexp() failed, making printf("%f") impossible.
4713
4714=item panic: goto, type=%u, ix=%ld
4715
4716(P) We popped the context stack to a context with the specified label,
4717and then discovered it wasn't a context we know how to do a goto in.
4718
4719=item panic: gp_free failed to free glob pointer
4720
4721(P) The internal routine used to clear a typeglob's entries tried
4722repeatedly, but each time something re-created entries in the glob.
4723Most likely the glob contains an object with a reference back to
4724the glob and a destructor that adds a new object to the glob.
4725
4726=item panic: INTERPCASEMOD, %s
4727
4728(P) The lexer got into a bad state at a case modifier.
4729
4730=item panic: INTERPCONCAT, %s
4731
4732(P) The lexer got into a bad state parsing a string with brackets.
4733
4734=item panic: kid popen errno read
4735
4736(F) A forked child returned an incomprehensible message about its errno.
4737
4738=item panic: leave_scope inconsistency %u
4739
4740(P) The savestack probably got out of sync.  At least, there was an
4741invalid enum on the top of it.
4742
4743=item panic: magic_killbackrefs
4744
4745(P) Failed an internal consistency check while trying to reset all weak
4746references to an object.
4747
4748=item panic: malloc, %s
4749
4750(P) Something requested a negative number of bytes of malloc.
4751
4752=item panic: memory wrap
4753
4754(P) Something tried to allocate either more memory than possible or a
4755negative amount.
4756
4757=item panic: newFORLOOP, %s
4758
4759(P) The parser failed an internal consistency check while trying to parse
4760a C<foreach> loop.
4761
4762=item panic: pad_alloc, %p!=%p
4763
4764(P) The compiler got confused about which scratch pad it was allocating
4765and freeing temporaries and lexicals from.
4766
4767=item panic: pad_free curpad, %p!=%p
4768
4769(P) The compiler got confused about which scratch pad it was allocating
4770and freeing temporaries and lexicals from.
4771
4772=item panic: pad_free po
4773
4774(P) A zero scratch pad offset was detected internally.  An attempt was
4775made to free a target that had not been allocated to begin with.
4776
4777=item panic: pad_reset curpad, %p!=%p
4778
4779(P) The compiler got confused about which scratch pad it was allocating
4780and freeing temporaries and lexicals from.
4781
4782=item panic: pad_sv po
4783
4784(P) A zero scratch pad offset was detected internally.  Most likely
4785an operator needed a target but that target had not been allocated
4786for whatever reason.
4787
4788=item panic: pad_swipe curpad, %p!=%p
4789
4790(P) The compiler got confused about which scratch pad it was allocating
4791and freeing temporaries and lexicals from.
4792
4793=item panic: pad_swipe po
4794
4795(P) An invalid scratch pad offset was detected internally.
4796
4797=item panic: pp_iter, type=%u
4798
4799(P) The foreach iterator got called in a non-loop context frame.
4800
4801=item panic: pp_match%s
4802
4803(P) The internal pp_match() routine was called with invalid operational
4804data.
4805
4806=item panic: realloc, %s
4807
4808(P) Something requested a negative number of bytes of realloc.
4809
4810=item panic: reference miscount on nsv in sv_replace() (%d != 1)
4811
4812(P) The internal sv_replace() function was handed a new SV with a
4813reference count other than 1.
4814
4815=item panic: restartop in %s
4816
4817(P) Some internal routine requested a goto (or something like it), and
4818didn't supply the destination.
4819
4820=item panic: return, type=%u
4821
4822(P) We popped the context stack to a subroutine or eval context, and
4823then discovered it wasn't a subroutine or eval context.
4824
4825=item panic: scan_num, %s
4826
4827(P) scan_num() got called on something that wasn't a number.
4828
4829=item panic: Sequence (?{...}): no code block found in regex m/%s/
4830
4831(P) While compiling a pattern that has embedded (?{}) or (??{}) code
4832blocks, perl couldn't locate the code block that should have already been
4833seen and compiled by perl before control passed to the regex compiler.
4834
4835=item panic: sv_chop %s
4836
4837(P) The sv_chop() routine was passed a position that is not within the
4838scalar's string buffer.
4839
4840=item panic: sv_insert, midend=%p, bigend=%p
4841
4842(P) The sv_insert() routine was told to remove more string than there
4843was string.
4844
4845=item panic: top_env
4846
4847(P) The compiler attempted to do a goto, or something weird like that.
4848
4849=item panic: unexpected constant lvalue entersub entry via type/targ %d:%d
4850
4851(P) When compiling a subroutine call in lvalue context, Perl failed an
4852internal consistency check.  It encountered a malformed op tree.
4853
4854=item panic: unimplemented op %s (#%d) called
4855
4856(P) The compiler is screwed up and attempted to use an op that isn't
4857permitted at run time.
4858
4859=item panic: unknown OA_*: %x
4860
4861(P) The internal routine that handles arguments to C<&CORE::foo()>
4862subroutine calls was unable to determine what type of arguments
4863were expected.
4864
4865=item panic: utf16_to_utf8: odd bytelen
4866
4867(P) Something tried to call utf16_to_utf8 with an odd (as opposed
4868to even) byte length.
4869
4870=item panic: utf16_to_utf8_reversed: odd bytelen
4871
4872(P) Something tried to call utf16_to_utf8_reversed with an odd (as opposed
4873to even) byte length.
4874
4875=item panic: yylex, %s
4876
4877(P) The lexer got into a bad state while processing a case modifier.
4878
4879=item Parentheses missing around "%s" list
4880
4881(W parenthesis) You said something like
4882
4883    my $foo, $bar = @_;
4884
4885when you meant
4886
4887    my ($foo, $bar) = @_;
4888
4889Remember that "my", "our", "local" and "state" bind tighter than comma.
4890
4891=item Parsing code internal error (%s)
4892
4893(F) Parsing code supplied by an extension violated the parser's API in
4894a detectable way.
4895
4896=item Pattern subroutine nesting without pos change exceeded limit in regex
4897
4898(F) You used a pattern that uses too many nested subpattern calls without
4899consuming any text.  Restructure the pattern so text is consumed before
4900the nesting limit is exceeded.
4901
4902=item C<-p> destination: %s
4903
4904(F) An error occurred during the implicit output invoked by the C<-p>
4905command-line switch.  (This output goes to STDOUT unless you've
4906redirected it with select().)
4907
4908=item Perl API version %s of %s does not match %s
4909
4910(F) The XS module in question was compiled against a different incompatible
4911version of Perl than the one that has loaded the XS module.
4912
4913=item Perl folding rules are not up-to-date for 0x%X; please use the perlbug
4914utility to report; in regex; marked by S<<-- HERE> in m/%s/
4915
4916(S regexp) You used a regular expression with case-insensitive matching,
4917and there is a bug in Perl in which the built-in regular expression
4918folding rules are not accurate.  This may lead to incorrect results.
4919Please report this as a bug to L<https://github.com/Perl/perl5/issues>.
4920
4921=item Perl_my_%s() not available
4922
4923(F) Your platform has very uncommon byte-order and integer size,
4924so it was not possible to set up some or all fixed-width byte-order
4925conversion functions.  This is only a problem when you're using the
4926'<' or '>' modifiers in (un)pack templates.  See L<perlfunc/pack>.
4927
4928=item Perl %s required (did you mean %s?)--this is only %s, stopped
4929
4930(F) The code you are trying to run has asked for a newer version of
4931Perl than you are running.  Perhaps C<use 5.10> was written instead
4932of C<use 5.010> or C<use v5.10>.  Without the leading C<v>, the number is
4933interpreted as a decimal, with every three digits after the
4934decimal point representing a part of the version number.  So 5.10
4935is equivalent to v5.100.
4936
4937=item Perl %s required--this is only %s, stopped
4938
4939(F) The module in question uses features of a version of Perl more
4940recent than the currently running version.  How long has it been since
4941you upgraded, anyway?  See L<perlfunc/require>.
4942
4943=item PERL_SH_DIR too long
4944
4945(F) An error peculiar to OS/2.  PERL_SH_DIR is the directory to find the
4946C<sh>-shell in.  See "PERL_SH_DIR" in L<perlos2>.
4947
4948=item PERL_SIGNALS illegal: "%s"
4949
4950(X) See L<perlrun/PERL_SIGNALS> for legal values.
4951
4952=item Perls since %s too modern--this is %s, stopped
4953
4954(F) The code you are trying to run claims it will not run
4955on the version of Perl you are using because it is too new.
4956Maybe the code needs to be updated, or maybe it is simply
4957wrong and the version check should just be removed.
4958
4959=item perl: warning: Non hex character in '$ENV{PERL_HASH_SEED}', seed only partially set
4960
4961(S) PERL_HASH_SEED should match /^\s*(?:0x)?[0-9a-fA-F]+\s*\z/ but it
4962contained a non hex character.  This could mean you are not using the
4963hash seed you think you are.
4964
4965=item perl: warning: Setting locale failed.
4966
4967(S) The whole warning message will look something like:
4968
4969	perl: warning: Setting locale failed.
4970	perl: warning: Please check that your locale settings:
4971	        LC_ALL = "En_US",
4972	        LANG = (unset)
4973	    are supported and installed on your system.
4974	perl: warning: Falling back to the standard locale ("C").
4975
4976Exactly what were the failed locale settings varies.  In the above the
4977settings were that the LC_ALL was "En_US" and the LANG had no value.
4978This error means that Perl detected that you and/or your operating
4979system supplier and/or system administrator have set up the so-called
4980locale system but Perl could not use those settings.  This was not
4981dead serious, fortunately: there is a "default locale" called "C" that
4982Perl can and will use, and the script will be run.  Before you really
4983fix the problem, however, you will get the same error message each
4984time you run Perl.  How to really fix the problem can be found in
4985L<perllocale> section B<LOCALE PROBLEMS>.
4986
4987=item perl: warning: strange setting in '$ENV{PERL_PERTURB_KEYS}': '%s'
4988
4989(S) Perl was run with the environment variable PERL_PERTURB_KEYS defined
4990but containing an unexpected value.  The legal values of this setting
4991are as follows.
4992
4993  Numeric | String        | Result
4994  --------+---------------+-----------------------------------------
4995  0       | NO            | Disables key traversal randomization
4996  1       | RANDOM        | Enables full key traversal randomization
4997  2       | DETERMINISTIC | Enables repeatable key traversal
4998          |               | randomization
4999
5000Both numeric and string values are accepted, but note that string values are
5001case sensitive.  The default for this setting is "RANDOM" or 1.
5002
5003=item pid %x not a child
5004
5005(W exec) A warning peculiar to VMS.  Waitpid() was asked to wait for a
5006process which isn't a subprocess of the current process.  While this is
5007fine from VMS' perspective, it's probably not what you intended.
5008
5009=item 'P' must have an explicit size in unpack
5010
5011(F) The unpack format P must have an explicit size, not "*".
5012
5013=item POSIX class [:%s:] unknown in regex; marked by S<<-- HERE> in m/%s/
5014
5015(F) The class in the character class [: :] syntax is unknown.  The S<<-- HERE>
5016shows whereabouts in the regular expression the problem was discovered.
5017Note that the POSIX character classes do B<not> have the C<is> prefix
5018the corresponding C interfaces have: in other words, it's C<[[:print:]]>,
5019not C<isprint>.  See L<perlre>.
5020
5021=item POSIX getpgrp can't take an argument
5022
5023(F) Your system has POSIX getpgrp(), which takes no argument, unlike
5024the BSD version, which takes a pid.
5025
5026=item POSIX syntax [%c %c] belongs inside character classes%s in regex; marked by
5027S<<-- HERE> in m/%s/
5028
5029(W regexp) Perl thinks that you intended to write a POSIX character
5030class, but didn't use enough brackets.  These POSIX class constructs [:
5031:], [= =], and [. .]  go I<inside> character classes, the [] are part of
5032the construct, for example: C<qr/[012[:alpha:]345]/>.  What the regular
5033expression pattern compiled to is probably not what you were intending.
5034For example, C<qr/[:alpha:]/> compiles to a regular bracketed character
5035class consisting of the four characters C<":">,  C<"a">,  C<"l">,
5036C<"h">, and C<"p">.  To specify the POSIX class, it should have been
5037written C<qr/[[:alpha:]]/>.
5038
5039Note that [= =] and [. .] are not currently
5040implemented; they are simply placeholders for future extensions and
5041will cause fatal errors.  The S<<-- HERE> shows whereabouts in the regular
5042expression the problem was discovered.  See L<perlre>.
5043
5044If the specification of the class was not completely valid, the message
5045indicates that.
5046
5047=item POSIX syntax [. .] is reserved for future extensions in regex; marked by
5048S<<-- HERE> in m/%s/
5049
5050(F) Within regular expression character classes ([]) the syntax beginning
5051with "[." and ending with ".]" is reserved for future extensions.  If you
5052need to represent those character sequences inside a regular expression
5053character class, just quote the square brackets with the backslash: "\[."
5054and ".\]".  The S<<-- HERE> shows whereabouts in the regular expression the
5055problem was discovered.  See L<perlre>.
5056
5057=item POSIX syntax [= =] is reserved for future extensions in regex; marked by
5058S<<-- HERE> in m/%s/
5059
5060(F) Within regular expression character classes ([]) the syntax beginning
5061with "[=" and ending with "=]" is reserved for future extensions.  If you
5062need to represent those character sequences inside a regular expression
5063character class, just quote the square brackets with the backslash: "\[="
5064and "=\]".  The S<<-- HERE> shows whereabouts in the regular expression the
5065problem was discovered.  See L<perlre>.
5066
5067=item Possible attempt to put comments in qw() list
5068
5069(W qw) qw() lists contain items separated by whitespace; as with literal
5070strings, comment characters are not ignored, but are instead treated as
5071literal data.  (You may have used different delimiters than the
5072parentheses shown here; braces are also frequently used.)
5073
5074You probably wrote something like this:
5075
5076    @list = qw(
5077	a # a comment
5078        b # another comment
5079    );
5080
5081when you should have written this:
5082
5083    @list = qw(
5084	a
5085        b
5086    );
5087
5088If you really want comments, build your list the
5089old-fashioned way, with quotes and commas:
5090
5091    @list = (
5092        'a',    # a comment
5093        'b',    # another comment
5094    );
5095
5096=item Possible attempt to separate words with commas
5097
5098(W qw) qw() lists contain items separated by whitespace; therefore
5099commas aren't needed to separate the items.  (You may have used
5100different delimiters than the parentheses shown here; braces are also
5101frequently used.)
5102
5103You probably wrote something like this:
5104
5105    qw! a, b, c !;
5106
5107which puts literal commas into some of the list items.  Write it without
5108commas if you don't want them to appear in your data:
5109
5110    qw! a b c !;
5111
5112=item Possible memory corruption: %s overflowed 3rd argument
5113
5114(F) An ioctl() or fcntl() returned more than Perl was bargaining for.
5115Perl guesses a reasonable buffer size, but puts a sentinel byte at the
5116end of the buffer just in case.  This sentinel byte got clobbered, and
5117Perl assumes that memory is now corrupted.  See L<perlfunc/ioctl>.
5118
5119=item Possible precedence issue with control flow operator
5120
5121(W syntax) There is a possible problem with the mixing of a control
5122flow operator (e.g. C<return>) and a low-precedence operator like
5123C<or>.  Consider:
5124
5125    sub { return $a or $b; }
5126
5127This is parsed as:
5128
5129    sub { (return $a) or $b; }
5130
5131Which is effectively just:
5132
5133    sub { return $a; }
5134
5135Either use parentheses or the high-precedence variant of the operator.
5136
5137Note this may be also triggered for constructs like:
5138
5139    sub { 1 if die; }
5140
5141=item Possible precedence problem on bitwise %s operator
5142
5143(W precedence) Your program uses a bitwise logical operator in conjunction
5144with a numeric comparison operator, like this :
5145
5146    if ($x & $y == 0) { ... }
5147
5148This expression is actually equivalent to C<$x & ($y == 0)>, due to the
5149higher precedence of C<==>.  This is probably not what you want.  (If you
5150really meant to write this, disable the warning, or, better, put the
5151parentheses explicitly and write C<$x & ($y == 0)>).
5152
5153=item Possible unintended interpolation of $\ in regex
5154
5155(W ambiguous) You said something like C<m/$\/> in a regex.
5156The regex C<m/foo$\s+bar/m> translates to: match the word 'foo', the output
5157record separator (see L<perlvar/$\>) and the letter 's' (one time or more)
5158followed by the word 'bar'.
5159
5160If this is what you intended then you can silence the warning by using
5161C<m/${\}/> (for example: C<m/foo${\}s+bar/>).
5162
5163If instead you intended to match the word 'foo' at the end of the line
5164followed by whitespace and the word 'bar' on the next line then you can use
5165C<m/$(?)\/> (for example: C<m/foo$(?)\s+bar/>).
5166
5167=item Possible unintended interpolation of %s in string
5168
5169(W ambiguous) You said something like '@foo' in a double-quoted string
5170but there was no array C<@foo> in scope at the time.  If you wanted a
5171literal @foo, then write it as \@foo; otherwise find out what happened
5172to the array you apparently lost track of.
5173
5174=item Precedence problem: open %s should be open(%s)
5175
5176(S precedence) The old irregular construct
5177
5178    open FOO || die;
5179
5180is now misinterpreted as
5181
5182    open(FOO || die);
5183
5184because of the strict regularization of Perl 5's grammar into unary and
5185list operators.  (The old open was a little of both.)  You must put
5186parentheses around the filehandle, or use the new "or" operator instead
5187of "||".
5188
5189=item Premature end of script headers
5190
5191See L</500 Server error>.
5192
5193=item printf() on closed filehandle %s
5194
5195(W closed) The filehandle you're writing to got itself closed sometime
5196before now.  Check your control flow.
5197
5198=item print() on closed filehandle %s
5199
5200(W closed) The filehandle you're printing on got itself closed sometime
5201before now.  Check your control flow.
5202
5203=item Process terminated by SIG%s
5204
5205(W) This is a standard message issued by OS/2 applications, while *nix
5206applications die in silence.  It is considered a feature of the OS/2
5207port.  One can easily disable this by appropriate sighandlers, see
5208L<perlipc/"Signals">.  See also "Process terminated by SIGTERM/SIGINT"
5209in L<perlos2>.
5210
5211=item Prototype after '%c' for %s : %s
5212
5213(W illegalproto) A character follows % or @ in a prototype.  This is
5214useless, since % and @ gobble the rest of the subroutine arguments.
5215
5216=item Prototype mismatch: %s vs %s
5217
5218(S prototype) The subroutine being declared or defined had previously been
5219declared or defined with a different function prototype.
5220
5221=item Prototype not terminated
5222
5223(F) You've omitted the closing parenthesis in a function prototype
5224definition.
5225
5226=item Prototype '%s' overridden by attribute 'prototype(%s)' in %s
5227
5228(W prototype) A prototype was declared in both the parentheses after
5229the sub name and via the prototype attribute.  The prototype in
5230parentheses is useless, since it will be replaced by the prototype
5231from the attribute before it's ever used.
5232
5233=item Quantifier follows nothing in regex; marked by S<<-- HERE> in m/%s/
5234
5235(F) You started a regular expression with a quantifier.  Backslash it if
5236you meant it literally.  The S<<-- HERE> shows whereabouts in the regular
5237expression the problem was discovered.  See L<perlre>.
5238
5239=item Quantifier in {,} bigger than %d in regex; marked by S<<-- HERE> in m/%s/
5240
5241(F) There is currently a limit to the size of the min and max values of
5242the {min,max} construct.  The S<<-- HERE> shows whereabouts in the regular
5243expression the problem was discovered.  See L<perlre>.
5244
5245=item Quantifier {n,m} with n > m can't match in regex
5246
5247=item Quantifier {n,m} with n > m can't match in regex; marked by
5248S<<-- HERE> in m/%s/
5249
5250(W regexp) Minima should be less than or equal to maxima.  If you really
5251want your regexp to match something 0 times, just put {0}.
5252
5253=item Quantifier unexpected on zero-length expression in regex m/%s/
5254
5255(W regexp) You applied a regular expression quantifier in a place where
5256it makes no sense, such as on a zero-width assertion.  Try putting the
5257quantifier inside the assertion instead.  For example, the way to match
5258"abc" provided that it is followed by three repetitions of "xyz" is
5259C</abc(?=(?:xyz){3})/>, not C</abc(?=xyz){3}/>.
5260
5261=item Range iterator outside integer range
5262
5263(F) One (or both) of the numeric arguments to the range operator ".."
5264are outside the range which can be represented by integers internally.
5265One possible workaround is to force Perl to use magical string increment
5266by prepending "0" to your numbers.
5267
5268=item Ranges of ASCII printables should be some subset of "0-9", "A-Z", or
5269"a-z" in regex; marked by S<<-- HERE> in m/%s/
5270
5271(W regexp) (only under C<S<use re 'strict'>> or within C<(?[...])>)
5272
5273Stricter rules help to find typos and other errors.  Perhaps you didn't
5274even intend a range here, if the C<"-"> was meant to be some other
5275character, or should have been escaped (like C<"\-">).  If you did
5276intend a range, the one that was used is not portable between ASCII and
5277EBCDIC platforms, and doesn't have an obvious meaning to a casual
5278reader.
5279
5280 [3-7]    # OK; Obvious and portable
5281 [d-g]    # OK; Obvious and portable
5282 [A-Y]    # OK; Obvious and portable
5283 [A-z]    # WRONG; Not portable; not clear what is meant
5284 [a-Z]    # WRONG; Not portable; not clear what is meant
5285 [%-.]    # WRONG; Not portable; not clear what is meant
5286 [\x41-Z] # WRONG; Not portable; not obvious to non-geek
5287
5288(You can force portability by specifying a Unicode range, which means that
5289the endpoints are specified by
5290L<C<\N{...}>|perlrecharclass/Character Ranges>, but the meaning may
5291still not be obvious.)
5292The stricter rules require that ranges that start or stop with an ASCII
5293character that is not a control have all their endpoints be the literal
5294character, and not some escape sequence (like C<"\x41">), and the ranges
5295must be all digits, or all uppercase letters, or all lowercase letters.
5296
5297=item Ranges of digits should be from the same group in regex; marked by
5298S<<-- HERE> in m/%s/
5299
5300(W regexp) (only under C<S<use re 'strict'>> or within C<(?[...])>)
5301
5302Stricter rules help to find typos and other errors.  You included a
5303range, and at least one of the end points is a decimal digit.  Under the
5304stricter rules, when this happens, both end points should be digits in
5305the same group of 10 consecutive digits.
5306
5307=item readdir() attempted on invalid dirhandle %s
5308
5309(W io) The dirhandle you're reading from is either closed or not really
5310a dirhandle.  Check your control flow.
5311
5312=item readline() on closed filehandle %s
5313
5314(W closed) The filehandle you're reading from got itself closed sometime
5315before now.  Check your control flow.
5316
5317=item readline() on unopened filehandle %s
5318
5319(W unopened) The filehandle you're reading from was never opened.  Check your
5320control flow.
5321
5322=item read() on closed filehandle %s
5323
5324(W closed) You tried to read from a closed filehandle.
5325
5326=item read() on unopened filehandle %s
5327
5328(W unopened) You tried to read from a filehandle that was never opened.
5329
5330=item realloc() of freed memory ignored
5331
5332(S malloc) An internal routine called realloc() on something that had
5333already been freed.
5334
5335=item Recompile perl with B<-D>DEBUGGING to use B<-D> switch
5336
5337(S debugging) You can't use the B<-D> option unless the code to produce
5338the desired output is compiled into Perl, which entails some overhead,
5339which is why it's currently left out of your copy.
5340
5341=item Recursive call to Perl_load_module in PerlIO_find_layer
5342
5343(P) It is currently not permitted to load modules when creating
5344a filehandle inside an %INC hook.  This can happen with C<open my
5345$fh, '<', \$scalar>, which implicitly loads PerlIO::scalar.  Try
5346loading PerlIO::scalar explicitly first.
5347
5348=item Recursive inheritance detected in package '%s'
5349
5350(F) While calculating the method resolution order (MRO) of a package, Perl
5351believes it found an infinite loop in the C<@ISA> hierarchy.  This is a
5352crude check that bails out after 100 levels of C<@ISA> depth.
5353
5354=item Redundant argument in %s
5355
5356(W redundant) You called a function with more arguments than other
5357arguments you supplied indicated would be needed.  Currently only
5358emitted when a printf-type format required fewer arguments than were
5359supplied, but might be used in the future for e.g. L<perlfunc/pack>.
5360
5361=item refcnt_dec: fd %d%s
5362
5363=item refcnt: fd %d%s
5364
5365=item refcnt_inc: fd %d%s
5366
5367(P) Perl's I/O implementation failed an internal consistency check.  If
5368you see this message, something is very wrong.
5369
5370=item Reference found where even-sized list expected
5371
5372(W misc) You gave a single reference where Perl was expecting a list
5373with an even number of elements (for assignment to a hash).  This
5374usually means that you used the anon hash constructor when you meant
5375to use parens.  In any case, a hash requires key/value B<pairs>.
5376
5377    %hash = { one => 1, two => 2, };	# WRONG
5378    %hash = [ qw/ an anon array / ];	# WRONG
5379    %hash = ( one => 1, two => 2, );	# right
5380    %hash = qw( one 1 two 2 );			# also fine
5381
5382=item Reference is already weak
5383
5384(W misc) You have attempted to weaken a reference that is already weak.
5385Doing so has no effect.
5386
5387=item Reference is not weak
5388
5389(W misc) You have attempted to unweaken a reference that is not weak.
5390Doing so has no effect.
5391
5392=item Reference to invalid group 0 in regex; marked by S<<-- HERE> in m/%s/
5393
5394(F) You used C<\g0> or similar in a regular expression.  You may refer
5395to capturing parentheses only with strictly positive integers
5396(normal backreferences) or with strictly negative integers (relative
5397backreferences).  Using 0 does not make sense.
5398
5399=item Reference to nonexistent group in regex; marked by S<<-- HERE> in
5400m/%s/
5401
5402(F) You used something like C<\7> in your regular expression, but there are
5403not at least seven sets of capturing parentheses in the expression.  If
5404you wanted to have the character with ordinal 7 inserted into the regular
5405expression, prepend zeroes to make it three digits long: C<\007>
5406
5407The S<<-- HERE> shows whereabouts in the regular expression the problem was
5408discovered.
5409
5410=item Reference to nonexistent named group in regex; marked by S<<-- HERE>
5411in m/%s/
5412
5413(F) You used something like C<\k'NAME'> or C<< \k<NAME> >> in your regular
5414expression, but there is no corresponding named capturing parentheses
5415such as C<(?'NAME'...)> or C<< (?<NAME>...) >>.  Check if the name has been
5416spelled correctly both in the backreference and the declaration.
5417
5418The S<<-- HERE> shows whereabouts in the regular expression the problem was
5419discovered.
5420
5421=item Reference to nonexistent or unclosed group in regex; marked by
5422S<<-- HERE> in m/%s/
5423
5424(F) You used something like C<\g{-7}> in your regular expression, but there
5425are not at least seven sets of closed capturing parentheses in the
5426expression before where the C<\g{-7}> was located.
5427
5428The S<<-- HERE> shows whereabouts in the regular expression the problem was
5429discovered.
5430
5431=item regexp memory corruption
5432
5433(P) The regular expression engine got confused by what the regular
5434expression compiler gave it.
5435
5436=item Regexp modifier "/%c" may appear a maximum of twice
5437
5438=item Regexp modifier "%c" may appear a maximum of twice in regex; marked
5439by S<<-- HERE> in m/%s/
5440
5441(F) The regular expression pattern had too many occurrences
5442of the specified modifier.  Remove the extraneous ones.
5443
5444=item Regexp modifier "%c" may not appear after the "-" in regex; marked by <--
5445HERE in m/%s/
5446
5447(F) Turning off the given modifier has the side effect of turning on
5448another one.  Perl currently doesn't allow this.  Reword the regular
5449expression to use the modifier you want to turn on (and place it before
5450the minus), instead of the one you want to turn off.
5451
5452=item Regexp modifier "/%c" may not appear twice
5453
5454=item Regexp modifier "%c" may not appear twice in regex; marked by <--
5455HERE in m/%s/
5456
5457(F) The regular expression pattern had too many occurrences
5458of the specified modifier.  Remove the extraneous ones.
5459
5460=item Regexp modifiers "/%c" and "/%c" are mutually exclusive
5461
5462=item Regexp modifiers "%c" and "%c" are mutually exclusive in regex;
5463marked by S<<-- HERE> in m/%s/
5464
5465(F) The regular expression pattern had more than one of these
5466mutually exclusive modifiers.  Retain only the modifier that is
5467supposed to be there.
5468
5469=item Regexp out of space in regex m/%s/
5470
5471(P) A "can't happen" error, because safemalloc() should have caught it
5472earlier.
5473
5474=item Repeated format line will never terminate (~~ and @#)
5475
5476(F) Your format contains the ~~ repeat-until-blank sequence and a
5477numeric field that will never go blank so that the repetition never
5478terminates.  You might use ^# instead.  See L<perlform>.
5479
5480=item Replacement list is longer than search list
5481
5482(W misc) You have used a replacement list that is longer than the
5483search list.  So the additional elements in the replacement list
5484are meaningless.
5485
5486=item '(*%s' requires a terminating ':' in regex; marked by <-- HERE in m/%s/
5487
5488(F) You used a construct that needs a colon and pattern argument.
5489Supply these or check that you are using the right construct.
5490
5491=item '%s' resolved to '\o{%s}%d'
5492
5493As of Perl 5.32, this message is no longer generated.  Instead, see
5494L</Non-octal character '%c' terminates \o early.  Resolved as "%s">.
5495(W misc, regexp)  You wrote something like C<\08>, or C<\179> in a
5496double-quotish string.  All but the last digit is treated as a single
5497character, specified in octal.  The last digit is the next character in
5498the string.  To tell Perl that this is indeed what you want, you can use
5499the C<\o{ }> syntax, or use exactly three digits to specify the octal
5500for the character.
5501
5502=item Reversed %s= operator
5503
5504(W syntax) You wrote your assignment operator backwards.  The = must
5505always come last, to avoid ambiguity with subsequent unary operators.
5506
5507=item rewinddir() attempted on invalid dirhandle %s
5508
5509(W io) The dirhandle you tried to do a rewinddir() on is either closed
5510or not really a dirhandle.  Check your control flow.
5511
5512=item Scalars leaked: %d
5513
5514(S internal) Something went wrong in Perl's internal bookkeeping
5515of scalars: not all scalar variables were deallocated by the time
5516Perl exited.  What this usually indicates is a memory leak, which
5517is of course bad, especially if the Perl program is intended to be
5518long-running.
5519
5520=item Scalar value @%s[%s] better written as $%s[%s]
5521
5522(W syntax) You've used an array slice (indicated by @) to select a
5523single element of an array.  Generally it's better to ask for a scalar
5524value (indicated by $).  The difference is that C<$foo[&bar]> always
5525behaves like a scalar, both when assigning to it and when evaluating its
5526argument, while C<@foo[&bar]> behaves like a list when you assign to it,
5527and provides a list context to its subscript, which can do weird things
5528if you're expecting only one subscript.
5529
5530On the other hand, if you were actually hoping to treat the array
5531element as a list, you need to look into how references work, because
5532Perl will not magically convert between scalars and lists for you.  See
5533L<perlref>.
5534
5535=item Scalar value @%s{%s} better written as $%s{%s}
5536
5537(W syntax) You've used a hash slice (indicated by @) to select a single
5538element of a hash.  Generally it's better to ask for a scalar value
5539(indicated by $).  The difference is that C<$foo{&bar}> always behaves
5540like a scalar, both when assigning to it and when evaluating its
5541argument, while C<@foo{&bar}> behaves like a list when you assign to it,
5542and provides a list context to its subscript, which can do weird things
5543if you're expecting only one subscript.
5544
5545On the other hand, if you were actually hoping to treat the hash element
5546as a list, you need to look into how references work, because Perl will
5547not magically convert between scalars and lists for you.  See
5548L<perlref>.
5549
5550=item Search pattern not terminated
5551
5552(F) The lexer couldn't find the final delimiter of a // or m{}
5553construct.  Remember that bracketing delimiters count nesting level.
5554Missing the leading C<$> from a variable C<$m> may cause this error.
5555
5556Note that since Perl 5.10.0 a // can also be the I<defined-or>
5557construct, not just the empty search pattern.  Therefore code written
5558in Perl 5.10.0 or later that uses the // as the I<defined-or> can be
5559misparsed by pre-5.10.0 Perls as a non-terminated search pattern.
5560
5561=item seekdir() attempted on invalid dirhandle %s
5562
5563(W io) The dirhandle you are doing a seekdir() on is either closed or not
5564really a dirhandle.  Check your control flow.
5565
5566=item %sseek() on unopened filehandle
5567
5568(W unopened) You tried to use the seek() or sysseek() function on a
5569filehandle that was either never opened or has since been closed.
5570
5571=item select not implemented
5572
5573(F) This machine doesn't implement the select() system call.
5574
5575=item Self-ties of arrays and hashes are not supported
5576
5577(F) Self-ties are of arrays and hashes are not supported in
5578the current implementation.
5579
5580=item Semicolon seems to be missing
5581
5582(W semicolon) A nearby syntax error was probably caused by a missing
5583semicolon, or possibly some other missing operator, such as a comma.
5584
5585=item semi-panic: attempt to dup freed string
5586
5587(S internal) The internal newSVsv() routine was called to duplicate a
5588scalar that had previously been marked as free.
5589
5590=item sem%s not implemented
5591
5592(F) You don't have System V semaphore IPC on your system.
5593
5594=item send() on closed socket %s
5595
5596(W closed) The socket you're sending to got itself closed sometime
5597before now.  Check your control flow.
5598
5599=item Sequence "\c{" invalid
5600
5601(F) These three characters may not appear in sequence in a
5602double-quotish context.  This message is raised only on non-ASCII
5603platforms (a different error message is output on ASCII ones).  If you
5604were intending to specify a control character with this sequence, you'll
5605have to use a different way to specify it.
5606
5607=item Sequence (? incomplete in regex; marked by S<<-- HERE> in m/%s/
5608
5609(F) A regular expression ended with an incomplete extension (?.  The
5610S<<-- HERE> shows whereabouts in the regular expression the problem was
5611discovered.  See L<perlre>.
5612
5613=item Sequence (?%c...) not implemented in regex; marked by S<<-- HERE> in
5614m/%s/
5615
5616(F) A proposed regular expression extension has the character reserved
5617but has not yet been written.  The S<<-- HERE> shows whereabouts in the
5618regular expression the problem was discovered.  See L<perlre>.
5619
5620=item Sequence (?%s...) not recognized in regex; marked by S<<-- HERE> in
5621m/%s/
5622
5623(F) You used a regular expression extension that doesn't make sense.
5624The S<<-- HERE> shows whereabouts in the regular expression the problem was
5625discovered.  This may happen when using the C<(?^...)> construct to tell
5626Perl to use the default regular expression modifiers, and you
5627redundantly specify a default modifier.  For other
5628causes, see L<perlre>.
5629
5630=item Sequence (?#... not terminated in regex m/%s/
5631
5632(F) A regular expression comment must be terminated by a closing
5633parenthesis.  Embedded parentheses aren't allowed.  See
5634L<perlre>.
5635
5636=item Sequence (?&... not terminated in regex; marked by S<<-- HERE> in
5637m/%s/
5638
5639(F) A named reference of the form C<(?&...)> was missing the final
5640closing parenthesis after the name.  The S<<-- HERE> shows whereabouts
5641in the regular expression the problem was discovered.
5642
5643=item Sequence (?%c... not terminated in regex; marked by S<<-- HERE>
5644in m/%s/
5645
5646(F) A named group of the form C<(?'...')> or C<< (?<...>) >> was missing the final
5647closing quote or angle bracket.  The S<<-- HERE> shows whereabouts in the
5648regular expression the problem was discovered.
5649
5650=item Sequence (%s... not terminated in regex; marked by S<<-- HERE>
5651in m/%s/
5652
5653(F) A lookahead assertion C<(?=...)> or C<(?!...)> or lookbehind
5654assertion C<< (?<=...) >> or C<< (?<!...) >> was missing the final
5655closing parenthesis.  The S<<-- HERE> shows whereabouts in the
5656regular expression the problem was discovered.
5657
5658=item Sequence (?(%c... not terminated in regex; marked by S<<-- HERE>
5659in m/%s/
5660
5661(F) A named reference of the form C<(?('...')...)> or C<< (?(<...>)...) >> was
5662missing the final closing quote or angle bracket after the name.  The
5663S<<-- HERE> shows whereabouts in the regular expression the problem was
5664discovered.
5665
5666=item Sequence (?... not terminated in regex; marked by S<<-- HERE> in
5667m/%s/
5668
5669(F) There was no matching closing parenthesis for the '('.  The
5670S<<-- HERE> shows whereabouts in the regular expression the problem was
5671discovered.
5672
5673=item Sequence \%s... not terminated in regex; marked by S<<-- HERE> in
5674m/%s/
5675
5676(F) The regular expression expects a mandatory argument following the escape
5677sequence and this has been omitted or incorrectly written.
5678
5679=item Sequence (?{...}) not terminated with ')'
5680
5681(F) The end of the perl code contained within the {...} must be
5682followed immediately by a ')'.
5683
5684=item Sequence (?PE<gt>... not terminated in regex; marked by S<<-- HERE> in m/%s/
5685
5686(F) A named reference of the form C<(?PE<gt>...)> was missing the final
5687closing parenthesis after the name.  The S<<-- HERE> shows whereabouts
5688in the regular expression the problem was discovered.
5689
5690=item Sequence (?PE<lt>... not terminated in regex; marked by S<<-- HERE> in m/%s/
5691
5692(F) A named group of the form C<(?PE<lt>...E<gt>')> was missing the final
5693closing angle bracket.  The S<<-- HERE> shows whereabouts in the
5694regular expression the problem was discovered.
5695
5696=item Sequence ?P=... not terminated in regex; marked by S<<-- HERE> in
5697m/%s/
5698
5699(F) A named reference of the form C<(?P=...)> was missing the final
5700closing parenthesis after the name.  The S<<-- HERE> shows whereabouts
5701in the regular expression the problem was discovered.
5702
5703=item Sequence (?R) not terminated in regex m/%s/
5704
5705(F) An C<(?R)> or C<(?0)> sequence in a regular expression was missing the
5706final parenthesis.
5707
5708=item Z<>500 Server error
5709
5710(A) This is the error message generally seen in a browser window
5711when trying to run a CGI program (including SSI) over the web.  The
5712actual error text varies widely from server to server.  The most
5713frequently-seen variants are "500 Server error", "Method (something)
5714not permitted", "Document contains no data", "Premature end of script
5715headers", and "Did not produce a valid header".
5716
5717B<This is a CGI error, not a Perl error>.
5718
5719You need to make sure your script is executable, is accessible by
5720the user CGI is running the script under (which is probably not the
5721user account you tested it under), does not rely on any environment
5722variables (like PATH) from the user it isn't running under, and isn't
5723in a location where the CGI server can't find it, basically, more or
5724less.  Please see the following for more information:
5725
5726	https://www.perl.org/CGI_MetaFAQ.html
5727	http://www.htmlhelp.org/faq/cgifaq.html
5728	http://www.w3.org/Security/Faq/
5729
5730You should also look at L<perlfaq9>.
5731
5732=item setegid() not implemented
5733
5734(F) You tried to assign to C<$)>, and your operating system doesn't
5735support the setegid() system call (or equivalent), or at least Configure
5736didn't think so.
5737
5738=item seteuid() not implemented
5739
5740(F) You tried to assign to C<< $> >>, and your operating system doesn't
5741support the seteuid() system call (or equivalent), or at least Configure
5742didn't think so.
5743
5744=item setpgrp can't take arguments
5745
5746(F) Your system has the setpgrp() from BSD 4.2, which takes no
5747arguments, unlike POSIX setpgid(), which takes a process ID and process
5748group ID.
5749
5750=item setrgid() not implemented
5751
5752(F) You tried to assign to C<$(>, and your operating system doesn't
5753support the setrgid() system call (or equivalent), or at least Configure
5754didn't think so.
5755
5756=item setruid() not implemented
5757
5758(F) You tried to assign to C<$<>, and your operating system doesn't
5759support the setruid() system call (or equivalent), or at least Configure
5760didn't think so.
5761
5762=item setsockopt() on closed socket %s
5763
5764(W closed) You tried to set a socket option on a closed socket.  Did you
5765forget to check the return value of your socket() call?  See
5766L<perlfunc/setsockopt>.
5767
5768=item Setting $/ to a reference to %s is forbidden
5769
5770(F) You assigned a reference to a scalar to C<$/> where the referenced item is
5771not a positive integer.  In older perls this B<appeared> to work the same as
5772setting it to C<undef> but was in fact internally different, less efficient
5773and with very bad luck could have resulted in your file being split by a
5774stringified form of the reference.
5775
5776In Perl 5.20.0 this was changed so that it would be B<exactly> the same as
5777setting C<$/> to undef, with the exception that this warning would be thrown.
5778
5779You are recommended to change your code to set C<$/> to C<undef> explicitly if
5780you wish to slurp the file.  As of Perl 5.28 assigning C<$/> to a reference
5781to an integer which isn't positive is a fatal error.
5782
5783=item Setting $/ to %s reference is forbidden
5784
5785(F) You tried to assign a reference to a non integer to C<$/>.  In older
5786Perls this would have behaved similarly to setting it to a reference to
5787a positive integer, where the integer was the address of the reference.
5788As of Perl 5.20.0 this is a fatal error, to allow future versions of Perl
5789to use non-integer refs for more interesting purposes.
5790
5791=item shm%s not implemented
5792
5793(F) You don't have System V shared memory IPC on your system.
5794
5795=item !=~ should be !~
5796
5797(W syntax) The non-matching operator is !~, not !=~.  !=~ will be
5798interpreted as the != (numeric not equal) and ~ (1's complement)
5799operators: probably not what you intended.
5800
5801=item /%s/ should probably be written as "%s"
5802
5803(W syntax) You have used a pattern where Perl expected to find a string,
5804as in the first argument to C<join>.  Perl will treat the true or false
5805result of matching the pattern against $_ as the string, which is
5806probably not what you had in mind.
5807
5808=item shutdown() on closed socket %s
5809
5810(W closed) You tried to do a shutdown on a closed socket.  Seems a bit
5811superfluous.
5812
5813=item SIG%s handler "%s" not defined
5814
5815(W signal) The signal handler named in %SIG doesn't, in fact, exist.
5816Perhaps you put it into the wrong package?
5817
5818=item Slab leaked from cv %p
5819
5820(S) If you see this message, then something is seriously wrong with the
5821internal bookkeeping of op trees.  An op tree needed to be freed after
5822a compilation error, but could not be found, so it was leaked instead.
5823
5824=item sleep(%u) too large
5825
5826(W overflow) You called C<sleep> with a number that was larger than
5827it can reliably handle and C<sleep> probably slept for less time than
5828requested.
5829
5830=item Slurpy parameter not last
5831
5832(F) In a subroutine signature, you put something after a slurpy (array or
5833hash) parameter.  The slurpy parameter takes all the available arguments,
5834so there can't be any left to fill later parameters.
5835
5836=item Smart matching a non-overloaded object breaks encapsulation
5837
5838(F) You should not use the C<~~> operator on an object that does not
5839overload it: Perl refuses to use the object's underlying structure
5840for the smart match.
5841
5842=item Smartmatch is experimental
5843
5844(S experimental::smartmatch) This warning is emitted if you
5845use the smartmatch (C<~~>) operator.  This is currently an experimental
5846feature, and its details are subject to change in future releases of
5847Perl.  Particularly, its current behavior is noticed for being
5848unnecessarily complex and unintuitive, and is very likely to be
5849overhauled.
5850
5851=item Sorry, hash keys must be smaller than 2**31 bytes
5852
5853(F) You tried to create a hash containing a very large key, where "very
5854large" means that it needs at least 2 gigabytes to store. Unfortunately,
5855Perl doesn't yet handle such large hash keys. You should
5856reconsider your design to avoid hashing such a long string directly.
5857
5858=item sort is now a reserved word
5859
5860(F) An ancient error message that almost nobody ever runs into anymore.
5861But before sort was a keyword, people sometimes used it as a filehandle.
5862
5863=item Source filters apply only to byte streams
5864
5865(F) You tried to activate a source filter (usually by loading a
5866source filter module) within a string passed to C<eval>.  This is
5867not permitted under the C<unicode_eval> feature.  Consider using
5868C<evalbytes> instead.  See L<feature>.
5869
5870=item splice() offset past end of array
5871
5872(W misc) You attempted to specify an offset that was past the end of
5873the array passed to splice().  Splicing will instead commence at the
5874end of the array, rather than past it.  If this isn't what you want,
5875try explicitly pre-extending the array by assigning $#array = $offset.
5876See L<perlfunc/splice>.
5877
5878=item Split loop
5879
5880(P) The split was looping infinitely.  (Obviously, a split shouldn't
5881iterate more times than there are characters of input, which is what
5882happened.)  See L<perlfunc/split>.
5883
5884=item Statement unlikely to be reached
5885
5886(W exec) You did an exec() with some statement after it other than a
5887die().  This is almost always an error, because exec() never returns
5888unless there was a failure.  You probably wanted to use system()
5889instead, which does return.  To suppress this warning, put the exec() in
5890a block by itself.
5891
5892=item "state" subroutine %s can't be in a package
5893
5894(F) Lexically scoped subroutines aren't in a package, so it doesn't make
5895sense to try to declare one with a package qualifier on the front.
5896
5897=item "state %s" used in sort comparison
5898
5899(W syntax) The package variables $a and $b are used for sort comparisons.
5900You used $a or $b in as an operand to the C<< <=> >> or C<cmp> operator inside a
5901sort comparison block, and the variable had earlier been declared as a
5902lexical variable.  Either qualify the sort variable with the package
5903name, or rename the lexical variable.
5904
5905=item "state" variable %s can't be in a package
5906
5907(F) Lexically scoped variables aren't in a package, so it doesn't make
5908sense to try to declare one with a package qualifier on the front.  Use
5909local() if you want to localize a package variable.
5910
5911=item stat() on unopened filehandle %s
5912
5913(W unopened) You tried to use the stat() function on a filehandle that
5914was either never opened or has since been closed.
5915
5916=item Strings with code points over 0xFF may not be mapped into in-memory file handles
5917
5918(W utf8) You tried to open a reference to a scalar for read or append
5919where the scalar contained code points over 0xFF.  In-memory files
5920model on-disk files and can only contain bytes.
5921
5922=item Stub found while resolving method "%s" overloading "%s" in package "%s"
5923
5924(P) Overloading resolution over @ISA tree may be broken by importation
5925stubs.  Stubs should never be implicitly created, but explicit calls to
5926C<can> may break this.
5927
5928=item Subroutine attributes must come before the signature
5929
5930(F) When subroutine signatures are enabled, any subroutine attributes must
5931come before the signature. Note that this order was the opposite in
5932versions 5.22..5.26. So:
5933
5934    sub foo :lvalue ($a, $b) { ... }  # 5.20 and 5.28 +
5935    sub foo ($a, $b) :lvalue { ... }  # 5.22 .. 5.26
5936
5937=item Subroutine "&%s" is not available
5938
5939(W closure) During compilation, an inner named subroutine or eval is
5940attempting to capture an outer lexical subroutine that is not currently
5941available.  This can happen for one of two reasons.  First, the lexical
5942subroutine may be declared in an outer anonymous subroutine that has
5943not yet been created.  (Remember that named subs are created at compile
5944time, while anonymous subs are created at run-time.)  For example,
5945
5946    sub { my sub a {...} sub f { \&a } }
5947
5948At the time that f is created, it can't capture the current "a" sub,
5949since the anonymous subroutine hasn't been created yet.  Conversely, the
5950following won't give a warning since the anonymous subroutine has by now
5951been created and is live:
5952
5953    sub { my sub a {...} eval 'sub f { \&a }' }->();
5954
5955The second situation is caused by an eval accessing a lexical subroutine
5956that has gone out of scope, for example,
5957
5958    sub f {
5959	my sub a {...}
5960	sub { eval '\&a' }
5961    }
5962    f()->();
5963
5964Here, when the '\&a' in the eval is being compiled, f() is not currently
5965being executed, so its &a is not available for capture.
5966
5967=item "%s" subroutine &%s masks earlier declaration in same %s
5968
5969(W shadow) A "my" or "state" subroutine has been redeclared in the
5970current scope or statement, effectively eliminating all access to
5971the previous instance.  This is almost always a typographical error.
5972Note that the earlier subroutine will still exist until the end of
5973the scope or until all closure references to it are destroyed.
5974
5975=item Subroutine %s redefined
5976
5977(W redefine) You redefined a subroutine.  To suppress this warning, say
5978
5979    {
5980	no warnings 'redefine';
5981	eval "sub name { ... }";
5982    }
5983
5984=item Subroutine "%s" will not stay shared
5985
5986(W closure) An inner (nested) I<named> subroutine is referencing a "my"
5987subroutine defined in an outer named subroutine.
5988
5989When the inner subroutine is called, it will see the value of the outer
5990subroutine's lexical subroutine as it was before and during the *first*
5991call to the outer subroutine; in this case, after the first call to the
5992outer subroutine is complete, the inner and outer subroutines will no
5993longer share a common value for the lexical subroutine.  In other words,
5994it will no longer be shared.  This will especially make a difference
5995if the lexical subroutines accesses lexical variables declared in its
5996surrounding scope.
5997
5998This problem can usually be solved by making the inner subroutine
5999anonymous, using the C<sub {}> syntax.  When inner anonymous subs that
6000reference lexical subroutines in outer subroutines are created, they
6001are automatically rebound to the current values of such lexical subs.
6002
6003=item Substitution loop
6004
6005(P) The substitution was looping infinitely.  (Obviously, a substitution
6006shouldn't iterate more times than there are characters of input, which
6007is what happened.)  See the discussion of substitution in
6008L<perlop/"Regexp Quote-Like Operators">.
6009
6010=item Substitution pattern not terminated
6011
6012(F) The lexer couldn't find the interior delimiter of an s/// or s{}{}
6013construct.  Remember that bracketing delimiters count nesting level.
6014Missing the leading C<$> from variable C<$s> may cause this error.
6015
6016=item Substitution replacement not terminated
6017
6018(F) The lexer couldn't find the final delimiter of an s/// or s{}{}
6019construct.  Remember that bracketing delimiters count nesting level.
6020Missing the leading C<$> from variable C<$s> may cause this error.
6021
6022=item substr outside of string
6023
6024(W substr)(F) You tried to reference a substr() that pointed outside of
6025a string.  That is, the absolute value of the offset was larger than the
6026length of the string.  See L<perlfunc/substr>.  This warning is fatal if
6027substr is used in an lvalue context (as the left hand side of an
6028assignment or as a subroutine argument for example).
6029
6030=item sv_upgrade from type %d down to type %d
6031
6032(P) Perl tried to force the upgrade of an SV to a type which was actually
6033inferior to its current type.
6034
6035=item Switch (?(condition)... contains too many branches in regex; marked by
6036S<<-- HERE> in m/%s/
6037
6038(F) A (?(condition)if-clause|else-clause) construct can have at most
6039two branches (the if-clause and the else-clause).  If you want one or
6040both to contain alternation, such as using C<this|that|other>, enclose
6041it in clustering parentheses:
6042
6043    (?(condition)(?:this|that|other)|else-clause)
6044
6045The S<<-- HERE> shows whereabouts in the regular expression the problem
6046was discovered.  See L<perlre>.
6047
6048=item Switch condition not recognized in regex; marked by S<<-- HERE> in
6049m/%s/
6050
6051(F) The condition part of a (?(condition)if-clause|else-clause) construct
6052is not known.  The condition must be one of the following:
6053
6054 (1) (2) ...        true if 1st, 2nd, etc., capture matched
6055 (<NAME>) ('NAME')  true if named capture matched
6056 (?=...) (?<=...)   true if subpattern matches
6057 (?!...) (?<!...)   true if subpattern fails to match
6058 (?{ CODE })        true if code returns a true value
6059 (R)                true if evaluating inside recursion
6060 (R1) (R2) ...      true if directly inside capture group 1, 2, etc.
6061 (R&NAME)           true if directly inside named capture
6062 (DEFINE)           always false; for defining named subpatterns
6063
6064The S<<-- HERE> shows whereabouts in the regular expression the problem was
6065discovered.  See L<perlre>.
6066
6067=item Switch (?(condition)... not terminated in regex; marked by
6068S<<-- HERE> in m/%s/
6069
6070(F) You omitted to close a (?(condition)...) block somewhere
6071in the pattern.  Add a closing parenthesis in the appropriate
6072position.  See L<perlre>.
6073
6074=item switching effective %s is not implemented
6075
6076(F) While under the C<use filetest> pragma, we cannot switch the real
6077and effective uids or gids.
6078
6079=item syntax error
6080
6081(F) Probably means you had a syntax error.  Common reasons include:
6082
6083    A keyword is misspelled.
6084    A semicolon is missing.
6085    A comma is missing.
6086    An opening or closing parenthesis is missing.
6087    An opening or closing brace is missing.
6088    A closing quote is missing.
6089
6090Often there will be another error message associated with the syntax
6091error giving more information.  (Sometimes it helps to turn on B<-w>.)
6092The error message itself often tells you where it was in the line when
6093it decided to give up.  Sometimes the actual error is several tokens
6094before this, because Perl is good at understanding random input.
6095Occasionally the line number may be misleading, and once in a blue moon
6096the only way to figure out what's triggering the error is to call
6097C<perl -c> repeatedly, chopping away half the program each time to see
6098if the error went away.  Sort of the cybernetic version of S<20 questions>.
6099
6100=item syntax error at line %d: '%s' unexpected
6101
6102(A) You've accidentally run your script through the Bourne shell instead
6103of Perl.  Check the #! line, or manually feed your script into Perl
6104yourself.
6105
6106=item syntax error in file %s at line %d, next 2 tokens "%s"
6107
6108(F) This error is likely to occur if you run a perl5 script through
6109a perl4 interpreter, especially if the next 2 tokens are "use strict"
6110or "my $var" or "our $var".
6111
6112=item Syntax error in (?[...]) in regex; marked by <-- HERE in m/%s/
6113
6114(F) Perl could not figure out what you meant inside this construct; this
6115notifies you that it is giving up trying.
6116
6117=item %s syntax OK
6118
6119(F) The final summary message when a C<perl -c> succeeds.
6120
6121=item sysread() on closed filehandle %s
6122
6123(W closed) You tried to read from a closed filehandle.
6124
6125=item sysread() on unopened filehandle %s
6126
6127(W unopened) You tried to read from a filehandle that was never opened.
6128
6129=item System V %s is not implemented on this machine
6130
6131(F) You tried to do something with a function beginning with "sem",
6132"shm", or "msg" but that System V IPC is not implemented in your
6133machine.  In some machines the functionality can exist but be
6134unconfigured.  Consult your system support.
6135
6136=item syswrite() on closed filehandle %s
6137
6138(W closed) The filehandle you're writing to got itself closed sometime
6139before now.  Check your control flow.
6140
6141=item C<-T> and C<-B> not implemented on filehandles
6142
6143(F) Perl can't peek at the stdio buffer of filehandles when it doesn't
6144know about your kind of stdio.  You'll have to use a filename instead.
6145
6146=item Target of goto is too deeply nested
6147
6148(F) You tried to use C<goto> to reach a label that was too deeply nested
6149for Perl to reach.  Perl is doing you a favor by refusing.
6150
6151=item telldir() attempted on invalid dirhandle %s
6152
6153(W io) The dirhandle you tried to telldir() is either closed or not really
6154a dirhandle.  Check your control flow.
6155
6156=item tell() on unopened filehandle
6157
6158(W unopened) You tried to use the tell() function on a filehandle that
6159was either never opened or has since been closed.
6160
6161=item The crypt() function is unimplemented due to excessive paranoia.
6162
6163(F) Configure couldn't find the crypt() function on your machine,
6164probably because your vendor didn't supply it, probably because they
6165think the U.S. Government thinks it's a secret, or at least that they
6166will continue to pretend that it is.  And if you quote me on that, I
6167will deny it.
6168
6169=item The experimental declared_refs feature is not enabled
6170
6171(F) To declare references to variables, as in C<my \%x>, you must first enable
6172the feature:
6173
6174    no warnings "experimental::declared_refs";
6175    use feature "declared_refs";
6176
6177=item The %s function is unimplemented
6178
6179(F) The function indicated isn't implemented on this architecture,
6180according to the probings of Configure.
6181
6182=item The private_use feature is experimental
6183
6184(S experimental::private_use) This feature is actually a hook for future
6185use.
6186
6187=item The stat preceding %s wasn't an lstat
6188
6189(F) It makes no sense to test the current stat buffer for symbolic
6190linkhood if the last stat that wrote to the stat buffer already went
6191past the symlink to get to the real file.  Use an actual filename
6192instead.
6193
6194=item The Unicode property wildcards feature is experimental
6195
6196(S experimental::uniprop_wildcards) This feature is experimental
6197and its behavior may in any future release of perl.  See
6198L<perlunicode/Wildcards in Property Values>.
6199
6200=item The 'unique' attribute may only be applied to 'our' variables
6201
6202(F) This attribute was never supported on C<my> or C<sub> declarations.
6203
6204=item This Perl can't reset CRTL environ elements (%s)
6205
6206=item This Perl can't set CRTL environ elements (%s=%s)
6207
6208(W internal) Warnings peculiar to VMS.  You tried to change or delete an
6209element of the CRTL's internal environ array, but your copy of Perl
6210wasn't built with a CRTL that contained the setenv() function.  You'll
6211need to rebuild Perl with a CRTL that does, or redefine
6212F<PERL_ENV_TABLES> (see L<perlvms>) so that the environ array isn't the
6213target of the change to
6214%ENV which produced the warning.
6215
6216=item This Perl has not been built with support for randomized hash key traversal but something called Perl_hv_rand_set().
6217
6218(F) Something has attempted to use an internal API call which
6219depends on Perl being compiled with the default support for randomized hash
6220key traversal, but this Perl has been compiled without it.  You should
6221report this warning to the relevant upstream party, or recompile perl
6222with default options.
6223
6224=item This use of my() in false conditional is no longer allowed
6225
6226(F) You used a declaration similar to C<my $x if 0>.  There
6227has been a long-standing bug in Perl that causes a lexical variable
6228not to be cleared at scope exit when its declaration includes a false
6229conditional.  Some people have exploited this bug to achieve a kind of
6230static variable.  Since we intend to fix this bug, we don't want people
6231relying on this behavior.  You can achieve a similar static effect by
6232declaring the variable in a separate block outside the function, eg
6233
6234    sub f { my $x if 0; return $x++ }
6235
6236becomes
6237
6238    { my $x; sub f { return $x++ } }
6239
6240Beginning with perl 5.10.0, you can also use C<state> variables to have
6241lexicals that are initialized only once (see L<feature>):
6242
6243    sub f { state $x; return $x++ }
6244
6245This use of C<my()> in a false conditional was deprecated beginning in
6246Perl 5.10 and became a fatal error in Perl 5.30.
6247
6248=item Timeout waiting for another thread to define \p{%s}
6249
6250(F) The first time a user-defined property
6251(L<perlunicode/User-Defined Character Properties>) is used, its
6252definition is looked up and converted into an internal form for more
6253efficient handling in subsequent uses.  There could be a race if two or
6254more threads tried to do this processing nearly simultaneously.
6255Instead, a critical section is created around this task, locking out all
6256but one thread from doing it.  This message indicates that the thread
6257that is doing the conversion is taking an unexpectedly long time.  The
6258timeout exists solely to prevent deadlock; it's long enough that the
6259system was likely thrashing and about to crash.  There is no real remedy but
6260rebooting.
6261
6262=item times not implemented
6263
6264(F) Your version of the C library apparently doesn't do times().  I
6265suspect you're not running on Unix.
6266
6267=item "-T" is on the #! line, it must also be used on the command line
6268
6269(X) The #! line (or local equivalent) in a Perl script contains
6270the B<-T> option (or the B<-t> option), but Perl was not invoked with
6271B<-T> in its command line.  This is an error because, by the time
6272Perl discovers a B<-T> in a script, it's too late to properly taint
6273everything from the environment.  So Perl gives up.
6274
6275If the Perl script is being executed as a command using the #!
6276mechanism (or its local equivalent), this error can usually be
6277fixed by editing the #! line so that the B<-%c> option is a part of
6278Perl's first argument: e.g. change C<perl -n -%c> to C<perl -%c -n>.
6279
6280If the Perl script is being executed as C<perl scriptname>, then the
6281B<-%c> option must appear on the command line: C<perl -%c scriptname>.
6282
6283=item To%s: illegal mapping '%s'
6284
6285(F) You tried to define a customized To-mapping for lc(), lcfirst,
6286uc(), or ucfirst() (or their string-inlined versions), but you
6287specified an illegal mapping.
6288See L<perlunicode/"User-Defined Character Properties">.
6289
6290=item Too deeply nested ()-groups
6291
6292(F) Your template contains ()-groups with a ridiculously deep nesting level.
6293
6294=item Too few args to syscall
6295
6296(F) There has to be at least one argument to syscall() to specify the
6297system call to call, silly dilly.
6298
6299=item Too few arguments for subroutine '%s' (got %d; expected %d)
6300
6301(F) A subroutine using a signature fewer arguments than required by the
6302signature.  The caller of the subroutine is presumably at fault.
6303
6304The message attempts to include the name of the called subroutine.  If
6305the subroutine has been aliased, the subroutine's original name will be
6306shown, regardless of what name the caller used. It will also indicate the
6307number of arguments given and the number expected.
6308
6309=item Too few arguments for subroutine '%s' (got %d; expected at least %d)
6310
6311Similar to the previous message but for subroutines that accept a variable
6312number of arguments.
6313
6314=item Too late for "-%s" option
6315
6316(X) The #! line (or local equivalent) in a Perl script contains the
6317B<-M>, B<-m> or B<-C> option.
6318
6319In the case of B<-M> and B<-m>, this is an error because those options
6320are not intended for use inside scripts.  Use the C<use> pragma instead.
6321
6322The B<-C> option only works if it is specified on the command line as
6323well (with the same sequence of letters or numbers following).  Either
6324specify this option on the command line, or, if your system supports
6325it, make your script executable and run it directly instead of passing
6326it to perl.
6327
6328=item Too late to run %s block
6329
6330(W void) A CHECK or INIT block is being defined during run time proper,
6331when the opportunity to run them has already passed.  Perhaps you are
6332loading a file with C<require> or C<do> when you should be using C<use>
6333instead.  Or perhaps you should put the C<require> or C<do> inside a
6334BEGIN block.
6335
6336=item Too many args to syscall
6337
6338(F) Perl supports a maximum of only 14 args to syscall().
6339
6340=item Too many arguments for %s
6341
6342(F) The function requires fewer arguments than you specified.
6343
6344=item Too many arguments for subroutine '%s' (got %d; expected %d)
6345
6346(F) A subroutine using a signature received more arguments than permitted
6347by the signature.  The caller of the subroutine is presumably at fault.
6348
6349The message attempts to include the name of the called subroutine. If the
6350subroutine has been aliased, the subroutine's original name will be shown,
6351regardless of what name the caller used. It will also indicate the number
6352of arguments given and the number expected.
6353
6354=item Too many arguments for subroutine '%s' (got %d; expected at most %d)
6355
6356Similar to the previous message but for subroutines that accept a variable
6357number of arguments.
6358
6359=item Too many nested open parens in regex; marked by <-- HERE in m/%s/
6360
6361(F) You have exceeded the number of open C<"("> parentheses that haven't
6362been matched by corresponding closing ones.  This limit prevents eating
6363up too much memory.  It is initially set to 1000, but may be changed by
6364setting C<${^RE_COMPILE_RECURSION_LIMIT}> to some other value.  This may
6365need to be done in a BEGIN block before the regular expression pattern
6366is compiled.
6367
6368=item Too many )'s
6369
6370(A) You've accidentally run your script through B<csh> instead of Perl.
6371Check the #! line, or manually feed your script into Perl yourself.
6372
6373=item Too many ('s
6374
6375(A) You've accidentally run your script through B<csh> instead of Perl.
6376Check the #! line, or manually feed your script into Perl yourself.
6377
6378=item Trailing \ in regex m/%s/
6379
6380(F) The regular expression ends with an unbackslashed backslash.
6381Backslash it.   See L<perlre>.
6382
6383=item Transliteration pattern not terminated
6384
6385(F) The lexer couldn't find the interior delimiter of a tr/// or tr[][]
6386or y/// or y[][] construct.  Missing the leading C<$> from variables
6387C<$tr> or C<$y> may cause this error.
6388
6389=item Transliteration replacement not terminated
6390
6391(F) The lexer couldn't find the final delimiter of a tr///, tr[][],
6392y/// or y[][] construct.
6393
6394=item '%s' trapped by operation mask
6395
6396(F) You tried to use an operator from a Safe compartment in which it's
6397disallowed.  See L<Safe>.
6398
6399=item truncate not implemented
6400
6401(F) Your machine doesn't implement a file truncation mechanism that
6402Configure knows about.
6403
6404=item try/catch is experimental
6405
6406(S experimental::try) This warning is emitted if you use the C<try> and
6407C<catch> syntax. This syntax is currently experimental and its behaviour may
6408change in future releases of Perl.
6409
6410=item try/catch/finally is experimental
6411
6412(S experimental::try) This warning is emitted if you use the C<try> and
6413C<catch> syntax with a C<finally> block. This syntax is currently experimental
6414and its behaviour may change in future releases of Perl.
6415
6416=item Type of arg %d to &CORE::%s must be %s
6417
6418(F) The subroutine in question in the CORE package requires its argument
6419to be a hard reference to data of the specified type.  Overloading is
6420ignored, so a reference to an object that is not the specified type, but
6421nonetheless has overloading to handle it, will still not be accepted.
6422
6423=item Type of arg %d to %s must be %s (not %s)
6424
6425(F) This function requires the argument in that position to be of a
6426certain type.  Arrays must be @NAME or C<@{EXPR}>.  Hashes must be
6427%NAME or C<%{EXPR}>.  No implicit dereferencing is allowed--use the
6428{EXPR} forms as an explicit dereference.  See L<perlref>.
6429
6430=item umask not implemented
6431
6432(F) Your machine doesn't implement the umask function and you tried to
6433use it to restrict permissions for yourself (EXPR & 0700).
6434
6435=item Unbalanced context: %d more PUSHes than POPs
6436
6437(S internal) The exit code detected an internal inconsistency in how
6438many execution contexts were entered and left.
6439
6440=item Unbalanced saves: %d more saves than restores
6441
6442(S internal) The exit code detected an internal inconsistency in how
6443many values were temporarily localized.
6444
6445=item Unbalanced scopes: %d more ENTERs than LEAVEs
6446
6447(S internal) The exit code detected an internal inconsistency in how
6448many blocks were entered and left.
6449
6450=item Unbalanced string table refcount: (%d) for "%s"
6451
6452(S internal) On exit, Perl found some strings remaining in the shared
6453string table used for copy on write and for hash keys.  The entries
6454should have been freed, so this indicates a bug somewhere.
6455
6456=item Unbalanced tmps: %d more allocs than frees
6457
6458(S internal) The exit code detected an internal inconsistency in how
6459many mortal scalars were allocated and freed.
6460
6461=item Undefined format "%s" called
6462
6463(F) The format indicated doesn't seem to exist.  Perhaps it's really in
6464another package?  See L<perlform>.
6465
6466=item Undefined sort subroutine "%s" called
6467
6468(F) The sort comparison routine specified doesn't seem to exist.
6469Perhaps it's in a different package?  See L<perlfunc/sort>.
6470
6471=item Undefined subroutine &%s called
6472
6473(F) The subroutine indicated hasn't been defined, or if it was, it has
6474since been undefined.
6475
6476=item Undefined subroutine called
6477
6478(F) The anonymous subroutine you're trying to call hasn't been defined,
6479or if it was, it has since been undefined.
6480
6481=item Undefined subroutine in sort
6482
6483(F) The sort comparison routine specified is declared but doesn't seem
6484to have been defined yet.  See L<perlfunc/sort>.
6485
6486=item Undefined top format "%s" called
6487
6488(F) The format indicated doesn't seem to exist.  Perhaps it's really in
6489another package?  See L<perlform>.
6490
6491=item Undefined value assigned to typeglob
6492
6493(W misc) An undefined value was assigned to a typeglob, a la
6494C<*foo = undef>.  This does nothing.  It's possible that you really mean
6495C<undef *foo>.
6496
6497=item %s: Undefined variable
6498
6499(A) You've accidentally run your script through B<csh> instead of Perl.
6500Check the #! line, or manually feed your script into Perl yourself.
6501
6502=item Unescaped left brace in regex is illegal here in regex;
6503marked by S<<-- HERE> in m/%s/
6504
6505(F) The simple rule to remember, if you want to
6506match a literal C<"{"> character (U+007B C<LEFT CURLY BRACKET>) in a
6507regular expression pattern, is to escape each literal instance of it in
6508some way.  Generally easiest is to precede it with a backslash, like
6509C<"\{"> or enclose it in square brackets (C<"[{]">).  If the pattern
6510delimiters are also braces, any matching right brace (C<"}">) should
6511also be escaped to avoid confusing the parser, for example,
6512
6513 qr{abc\{def\}ghi}
6514
6515Forcing literal C<"{"> characters to be escaped enables the Perl
6516language to be extended in various ways in future releases.  To avoid
6517needlessly breaking existing code, the restriction is not enforced in
6518contexts where there are unlikely to ever be extensions that could
6519conflict with the use there of C<"{"> as a literal.  Those that are
6520not potentially ambiguous do not warn; those that are do raise a
6521non-deprecation warning.
6522
6523The contexts where no warnings or errors are raised are:
6524
6525=over 4
6526
6527=item *
6528
6529as the first character in a pattern, or following C<"^"> indicating to
6530anchor the match to the beginning of a line.
6531
6532=item *
6533
6534as the first character following a C<"|"> indicating alternation.
6535
6536=item *
6537
6538as the first character in a parenthesized grouping like
6539
6540 /foo({bar)/
6541 /foo(?:{bar)/
6542
6543=item *
6544
6545as the first character following a quantifier
6546
6547 /\s*{/
6548
6549=back
6550
6551=for comment
6552The text of the message above is mostly duplicated below (with changes)
6553to allow splain (and 'use diagnostics') to work.  Since one is fatal,
6554and one not, they can't be combined as one message.  Perhaps perldiag
6555could be enhanced to handle this case.
6556
6557=item Unescaped left brace in regex is passed through in regex; marked by S<<-- HERE> in m/%s/
6558
6559(W regexp)  The simple rule to remember, if you want to
6560match a literal C<"{"> character (U+007B C<LEFT CURLY BRACKET>) in a
6561regular expression pattern, is to escape each literal instance of it in
6562some way.  Generally easiest is to precede it with a backslash, like
6563C<"\{"> or enclose it in square brackets (C<"[{]">).  If the pattern
6564delimiters are also braces, any matching right brace (C<"}">) should
6565also be escaped to avoid confusing the parser, for example,
6566
6567 qr{abc\{def\}ghi}
6568
6569Forcing literal C<"{"> characters to be escaped enables the Perl
6570language to be extended in various ways in future releases.  To avoid
6571needlessly breaking existing code, the restriction is not enforced in
6572contexts where there are unlikely to ever be extensions that could
6573conflict with the use there of C<"{"> as a literal.  Those that are
6574not potentially ambiguous do not warn; those that are raise this
6575warning.  This makes sure that an inadvertent typo doesn't silently
6576cause the pattern to compile to something unintended.
6577
6578The contexts where no warnings or errors are raised are:
6579
6580=over 4
6581
6582=item *
6583
6584as the first character in a pattern, or following C<"^"> indicating to
6585anchor the match to the beginning of a line.
6586
6587=item *
6588
6589as the first character following a C<"|"> indicating alternation.
6590
6591=item *
6592
6593as the first character in a parenthesized grouping like
6594
6595 /foo({bar)/
6596 /foo(?:{bar)/
6597
6598=item *
6599
6600as the first character following a quantifier
6601
6602 /\s*{/
6603
6604=back
6605
6606=item Unescaped literal '%c' in regex; marked by <-- HERE in m/%s/
6607
6608(W regexp) (only under C<S<use re 'strict'>>)
6609
6610Within the scope of C<S<use re 'strict'>> in a regular expression
6611pattern, you included an unescaped C<}> or C<]> which was interpreted
6612literally.  These two characters are sometimes metacharacters, and
6613sometimes literals, depending on what precedes them in the
6614pattern.  This is unlike the similar C<)> which is always a
6615metacharacter unless escaped.
6616
6617This action at a distance, perhaps a large distance, can lead to Perl
6618silently misinterpreting what you meant, so when you specify that you
6619want extra checking by C<S<use re 'strict'>>, this warning is generated.
6620If you meant the character as a literal, simply confirm that to Perl by
6621preceding the character with a backslash, or make it into a bracketed
6622character class (like C<[}]>).  If you meant it as closing a
6623corresponding C<[> or C<{>, you'll need to look back through the pattern
6624to find out why that isn't happening.
6625
6626=item unexec of %s into %s failed!
6627
6628(F) The unexec() routine failed for some reason.  See your local FSF
6629representative, who probably put it there in the first place.
6630
6631=item Unexpected binary operator '%c' with no preceding operand in regex;
6632marked by S<<-- HERE> in m/%s/
6633
6634(F) You had something like this:
6635
6636 (?[ | \p{Digit} ])
6637
6638where the C<"|"> is a binary operator with an operand on the right, but
6639no operand on the left.
6640
6641=item Unexpected character in regex; marked by S<<-- HERE> in m/%s/
6642
6643(F) You had something like this:
6644
6645 (?[ z ])
6646
6647Within C<(?[ ])>, no literal characters are allowed unless they are
6648within an inner pair of square brackets, like
6649
6650 (?[ [ z ] ])
6651
6652Another possibility is that you forgot a backslash.  Perl isn't smart
6653enough to figure out what you really meant.
6654
6655=item Unexpected exit %u
6656
6657(S) exit() was called or the script otherwise finished gracefully when
6658C<PERL_EXIT_WARN> was set in C<PL_exit_flags>.
6659
6660=item Unexpected exit failure %d
6661
6662(S) An uncaught die() was called when C<PERL_EXIT_WARN> was set in
6663C<PL_exit_flags>.
6664
6665=item Unexpected ')' in regex; marked by S<<-- HERE> in m/%s/
6666
6667(F) You had something like this:
6668
6669 (?[ ( \p{Digit} + ) ])
6670
6671The C<")"> is out-of-place.  Something apparently was supposed to
6672be combined with the digits, or the C<"+"> shouldn't be there, or
6673something like that.  Perl can't figure out what was intended.
6674
6675=item Unexpected ']' with no following ')' in (?[... in regex; marked by
6676<-- HERE in m/%s/
6677
6678(F) While parsing an extended character class a ']' character was
6679encountered at a point in the definition where the only legal use of
6680']' is to close the character class definition as part of a '])', you
6681may have forgotten the close paren, or otherwise confused the parser.
6682
6683=item Unexpected '(' with no preceding operator in regex; marked by
6684S<<-- HERE> in m/%s/
6685
6686(F) You had something like this:
6687
6688 (?[ \p{Digit} ( \p{Lao} + \p{Thai} ) ])
6689
6690There should be an operator before the C<"(">, as there's
6691no indication as to how the digits are to be combined
6692with the characters in the Lao and Thai scripts.
6693
6694=item Unicode non-character U+%X is not recommended for open interchange
6695
6696(S nonchar) Certain codepoints, such as U+FFFE and U+FFFF, are
6697defined by the Unicode standard to be non-characters.  Those
6698are legal codepoints, but are reserved for internal use; so,
6699applications shouldn't attempt to exchange them.  An application
6700may not be expecting any of these characters at all, and receiving
6701them may lead to bugs.  If you know what you are doing you can
6702turn off this warning by C<no warnings 'nonchar';>.
6703
6704This is not really a "severe" error, but it is supposed to be
6705raised by default even if warnings are not enabled, and currently
6706the only way to do that in Perl is to mark it as serious.
6707
6708=item Unicode property wildcard not terminated
6709
6710(F) A Unicode property wildcard looks like a delimited regular
6711expression pattern (all within the braces of the enclosing C<\p{...}>.
6712The closing delimtter to match the opening one was not found.  If the
6713opening one is escaped by preceding it with a backslash, the closing one
6714must also be so escaped.
6715
6716=item Unicode string properties are not implemented in (?[...]) in
6717regex; marked by <-- HERE in m/%s/
6718
6719(F) A Unicode string property is one which expands to a sequence of
6720multiple characters.  An example is C<\p{name=KATAKANA LETTER AINU P}>,
6721which is comprised of the sequence C<\N{KATAKANA LETTER SMALL H}>
6722followed by C<\N{COMBINING KATAKANA-HIRAGANA SEMI-VOICED SOUND MARK}>.
6723Extended character classes, C<(?[...])> currently cannot handle these.
6724
6725=item Unicode surrogate U+%X is illegal in UTF-8
6726
6727(S surrogate) You had a UTF-16 surrogate in a context where they are
6728not considered acceptable.  These code points, between U+D800 and
6729U+DFFF (inclusive), are used by Unicode only for UTF-16.  However, Perl
6730internally allows all unsigned integer code points (up to the size limit
6731available on your platform), including surrogates.  But these can cause
6732problems when being input or output, which is likely where this message
6733came from.  If you really really know what you are doing you can turn
6734off this warning by C<no warnings 'surrogate';>.
6735
6736=item Unknown charname '%s'
6737
6738(F) The name you used inside C<\N{}> is unknown to Perl.  Check the
6739spelling.  You can say C<use charnames ":loose"> to not have to be
6740so precise about spaces, hyphens, and capitalization on standard Unicode
6741names.  (Any custom aliases that have been created must be specified
6742exactly, regardless of whether C<:loose> is used or not.)  This error may
6743also happen if the C<\N{}> is not in the scope of the corresponding
6744C<S<use charnames>>.
6745
6746=item Unknown '(*...)' construct '%s' in regex; marked by <-- HERE in m/%s/
6747
6748(F) The C<(*> was followed by something that the regular expression
6749compiler does not recognize.  Check your spelling.
6750
6751=item Unknown error
6752
6753(P) Perl was about to print an error message in C<$@>, but the C<$@> variable
6754did not exist, even after an attempt to create it.
6755
6756=item Unknown locale category %d; can't set it to %s
6757
6758(W locale) You used a locale category that perl doesn't recognize, so it
6759cannot carry out your request.  Check that you are using a valid
6760category.  If so, see L<perllocale/Multi-threaded> for advice on
6761reporting this as a bug, and for modifying perl locally to accommodate
6762your needs.
6763
6764=item Unknown open() mode '%s'
6765
6766(F) The second argument of 3-argument open() is not among the list
6767of valid modes: C<< < >>, C<< > >>, C<<< >> >>>, C<< +< >>,
6768C<< +> >>, C<<< +>> >>>, C<-|>, C<|->, C<< <& >>, C<< >& >>.
6769
6770=item Unknown PerlIO layer "%s"
6771
6772(W layer) An attempt was made to push an unknown layer onto the Perl I/O
6773system.  (Layers take care of transforming data between external and
6774internal representations.)  Note that some layers, such as C<mmap>,
6775are not supported in all environments.  If your program didn't
6776explicitly request the failing operation, it may be the result of the
6777value of the environment variable PERLIO.
6778
6779=item Unknown process %x sent message to prime_env_iter: %s
6780
6781(P) An error peculiar to VMS.  Perl was reading values for %ENV before
6782iterating over it, and someone else stuck a message in the stream of
6783data Perl expected.  Someone's very confused, or perhaps trying to
6784subvert Perl's population of %ENV for nefarious purposes.
6785
6786=item Unknown regexp modifier "/%s"
6787
6788(F) Alphanumerics immediately following the closing delimiter
6789of a regular expression pattern are interpreted by Perl as modifier
6790flags for the regex.  One of the ones you specified is invalid.  One way
6791this can happen is if you didn't put in white space between the end of
6792the regex and a following alphanumeric operator:
6793
6794 if ($a =~ /foo/and $bar == 3) { ... }
6795
6796The C<"a"> is a valid modifier flag, but the C<"n"> is not, and raises
6797this error.  Likely what was meant instead was:
6798
6799 if ($a =~ /foo/ and $bar == 3) { ... }
6800
6801=item Unknown "re" subpragma '%s' (known ones are: %s)
6802
6803(W) You tried to use an unknown subpragma of the "re" pragma.
6804
6805=item Unknown switch condition (?(...)) in regex; marked by S<<-- HERE> in
6806m/%s/
6807
6808(F) The condition part of a (?(condition)if-clause|else-clause) construct
6809is not known.  The condition must be one of the following:
6810
6811 (1) (2) ...            true if 1st, 2nd, etc., capture matched
6812 (<NAME>) ('NAME')      true if named capture matched
6813 (?=...) (?<=...)       true if subpattern matches
6814 (*pla:...) (*plb:...)  true if subpattern matches; also
6815                             (*positive_lookahead:...)
6816                             (*positive_lookbehind:...)
6817 (*nla:...) (*nlb:...)  true if subpattern fails to match; also
6818                             (*negative_lookahead:...)
6819                             (*negative_lookbehind:...)
6820 (?{ CODE })            true if code returns a true value
6821 (R)                    true if evaluating inside recursion
6822 (R1) (R2) ...          true if directly inside capture group 1, 2,
6823                             etc.
6824 (R&NAME)               true if directly inside named capture
6825 (DEFINE)               always false; for defining named subpatterns
6826
6827The S<<-- HERE> shows whereabouts in the regular expression the problem was
6828discovered.  See L<perlre>.
6829
6830=item Unknown Unicode option letter '%c'
6831
6832(F) You specified an unknown Unicode option.  See
6833L<perlrun|perlrun/-C [numberE<sol>list]> documentation of the C<-C> switch
6834for the list of known options.
6835
6836=item Unknown Unicode option value %d
6837
6838(F) You specified an unknown Unicode option.  See
6839L<perlrun|perlrun/-C [numberE<sol>list]> documentation of the C<-C> switch
6840for the list of known options.
6841
6842=item Unknown user-defined property name \p{%s}
6843
6844(F) You specified to use a property within the C<\p{...}> which was a
6845syntactically valid user-defined property, but no definition was found
6846for it by the time one was required to proceed.  Check your spelling.
6847See L<perlunicode/User-Defined Character Properties>.
6848
6849=item Unknown verb pattern '%s' in regex; marked by S<<-- HERE> in m/%s/
6850
6851(F) You either made a typo or have incorrectly put a C<*> quantifier
6852after an open brace in your pattern.  Check the pattern and review
6853L<perlre> for details on legal verb patterns.
6854
6855=item Unknown warnings category '%s'
6856
6857(F) An error issued by the C<warnings> pragma.  You specified a warnings
6858category that is unknown to perl at this point.
6859
6860Note that if you want to enable a warnings category registered by a
6861module (e.g. C<use warnings 'File::Find'>), you must have loaded this
6862module first.
6863
6864=item Unmatched [ in regex; marked by S<<-- HERE> in m/%s/
6865
6866(F) The brackets around a character class must match.  If you wish to
6867include a closing bracket in a character class, backslash it or put it
6868first.  The S<<-- HERE> shows whereabouts in the regular expression the
6869problem was discovered.  See L<perlre>.
6870
6871=item Unmatched ( in regex; marked by S<<-- HERE> in m/%s/
6872
6873=item Unmatched ) in regex; marked by S<<-- HERE> in m/%s/
6874
6875(F) Unbackslashed parentheses must always be balanced in regular
6876expressions.  If you're a vi user, the % key is valuable for finding
6877the matching parenthesis.  The S<<-- HERE> shows whereabouts in the
6878regular expression the problem was discovered.  See L<perlre>.
6879
6880=item Unmatched right %s bracket
6881
6882(F) The lexer counted more closing curly or square brackets than opening
6883ones, so you're probably missing a matching opening bracket.  As a
6884general rule, you'll find the missing one (so to speak) near the place
6885you were last editing.
6886
6887=item Unquoted string "%s" may clash with future reserved word
6888
6889(W reserved) You used a bareword that might someday be claimed as a
6890reserved word.  It's best to put such a word in quotes, or capitalize it
6891somehow, or insert an underbar into it.  You might also declare it as a
6892subroutine.
6893
6894=item Unrecognized character %s; marked by S<<-- HERE> after %s near column
6895%d
6896
6897(F) The Perl parser has no idea what to do with the specified character
6898in your Perl script (or eval) near the specified column.  Perhaps you
6899tried  to run a compressed script, a binary program, or a directory as
6900a Perl program.
6901
6902=item Unrecognized escape \%c in character class in regex; marked by
6903S<<-- HERE> in m/%s/
6904
6905(F) You used a backslash-character combination which is not
6906recognized by Perl inside character classes.  This is a fatal
6907error when the character class is used within C<(?[ ])>.
6908
6909=item Unrecognized escape \%c in character class passed through in regex;
6910marked by S<<-- HERE> in m/%s/
6911
6912(W regexp) You used a backslash-character combination which is not
6913recognized by Perl inside character classes.  The character was
6914understood literally, but this may change in a future version of Perl.
6915The S<<-- HERE> shows whereabouts in the regular expression the
6916escape was discovered.
6917
6918=item Unrecognized escape \%c passed through
6919
6920(W misc) You used a backslash-character combination which is not
6921recognized by Perl.  The character was understood literally, but this may
6922change in a future version of Perl.
6923
6924=item Unrecognized escape \%s passed through in regex; marked by
6925S<<-- HERE> in m/%s/
6926
6927(W regexp) You used a backslash-character combination which is not
6928recognized by Perl.  The character(s) were understood literally, but
6929this may change in a future version of Perl.  The S<<-- HERE> shows
6930whereabouts in the regular expression the escape was discovered.
6931
6932=item Unrecognized signal name "%s"
6933
6934(F) You specified a signal name to the kill() function that was not
6935recognized.  Say C<kill -l> in your shell to see the valid signal names
6936on your system.
6937
6938=item Unrecognized switch: -%s  (-h will show valid options)
6939
6940(F) You specified an illegal option to Perl.  Don't do that.  (If you
6941think you didn't do that, check the #! line to see if it's supplying the
6942bad switch on your behalf.)
6943
6944=item Unsuccessful %s on filename containing newline
6945
6946(W newline) A file operation was attempted on a filename, and that
6947operation failed, PROBABLY because the filename contained a newline,
6948PROBABLY because you forgot to chomp() it off.  See L<perlfunc/chomp>.
6949
6950=item Unsupported directory function "%s" called
6951
6952(F) Your machine doesn't support opendir() and readdir().
6953
6954=item Unsupported function %s
6955
6956(F) This machine doesn't implement the indicated function, apparently.
6957At least, Configure doesn't think so.
6958
6959=item Unsupported function fork
6960
6961(F) Your version of executable does not support forking.
6962
6963Note that under some systems, like OS/2, there may be different flavors
6964of Perl executables, some of which may support fork, some not.  Try
6965changing the name you call Perl by to C<perl_>, C<perl__>, and so on.
6966
6967=item Unsupported script encoding %s
6968
6969(F) Your program file begins with a Unicode Byte Order Mark (BOM) which
6970declares it to be in a Unicode encoding that Perl cannot read.
6971
6972=item Unsupported socket function "%s" called
6973
6974(F) Your machine doesn't support the Berkeley socket mechanism, or at
6975least that's what Configure thought.
6976
6977=item Unterminated '(*...' argument in regex; marked by <-- HERE in m/%s/
6978
6979(F) You used a pattern of the form C<(*...:...)> but did not terminate
6980the pattern with a C<)>.  Fix the pattern and retry.
6981
6982=item Unterminated attribute list
6983
6984(F) The lexer found something other than a simple identifier at the
6985start of an attribute, and it wasn't a semicolon or the start of a
6986block.  Perhaps you terminated the parameter list of the previous
6987attribute too soon.  See L<attributes>.
6988
6989=item Unterminated attribute parameter in attribute list
6990
6991(F) The lexer saw an opening (left) parenthesis character while parsing
6992an attribute list, but the matching closing (right) parenthesis
6993character was not found.  You may need to add (or remove) a backslash
6994character to get your parentheses to balance.  See L<attributes>.
6995
6996=item Unterminated compressed integer
6997
6998(F) An argument to unpack("w",...) was incompatible with the BER
6999compressed integer format and could not be converted to an integer.
7000See L<perlfunc/pack>.
7001
7002=item Unterminated '(*...' construct in regex; marked by <-- HERE in m/%s/
7003
7004(F) You used a pattern of the form C<(*...)> but did not terminate
7005the pattern with a C<)>.  Fix the pattern and retry.
7006
7007=item Unterminated delimiter for here document
7008
7009(F) This message occurs when a here document label has an initial
7010quotation mark but the final quotation mark is missing.  Perhaps
7011you wrote:
7012
7013    <<"foo
7014
7015instead of:
7016
7017    <<"foo"
7018
7019=item Unterminated \g... pattern in regex; marked by S<<-- HERE> in m/%s/
7020
7021=item Unterminated \g{...} pattern in regex; marked by S<<-- HERE> in m/%s/
7022
7023(F) In a regular expression, you had a C<\g> that wasn't followed by a
7024proper group reference.  In the case of C<\g{>, the closing brace is
7025missing; otherwise the C<\g> must be followed by an integer.  Fix the
7026pattern and retry.
7027
7028=item Unterminated <> operator
7029
7030(F) The lexer saw a left angle bracket in a place where it was expecting
7031a term, so it's looking for the corresponding right angle bracket, and
7032not finding it.  Chances are you left some needed parentheses out
7033earlier in the line, and you really meant a "less than".
7034
7035=item Unterminated verb pattern argument in regex; marked by S<<-- HERE> in
7036m/%s/
7037
7038(F) You used a pattern of the form C<(*VERB:ARG)> but did not terminate
7039the pattern with a C<)>.  Fix the pattern and retry.
7040
7041=item Unterminated verb pattern in regex; marked by S<<-- HERE> in m/%s/
7042
7043(F) You used a pattern of the form C<(*VERB)> but did not terminate
7044the pattern with a C<)>.  Fix the pattern and retry.
7045
7046=item untie attempted while %d inner references still exist
7047
7048(W untie) A copy of the object returned from C<tie> (or C<tied>) was
7049still valid when C<untie> was called.
7050
7051=item Usage: POSIX::%s(%s)
7052
7053(F) You called a POSIX function with incorrect arguments.
7054See L<POSIX/FUNCTIONS> for more information.
7055
7056=item Usage: Win32::%s(%s)
7057
7058(F) You called a Win32 function with incorrect arguments.
7059See L<Win32> for more information.
7060
7061=item $[ used in %s (did you mean $] ?)
7062
7063(W syntax) You used C<$[> in a comparison, such as:
7064
7065    if ($[ > 5.006) {
7066	...
7067    }
7068
7069You probably meant to use C<$]> instead.  C<$[> is the base for indexing
7070arrays.  C<$]> is the Perl version number in decimal.
7071
7072=item Use "%s" instead of "%s"
7073
7074(F) The second listed construct is no longer legal.  Use the first one
7075instead.
7076
7077=item Useless assignment to a temporary
7078
7079(W misc) You assigned to an lvalue subroutine, but what
7080the subroutine returned was a temporary scalar about to
7081be discarded, so the assignment had no effect.
7082
7083=item Useless (?-%s) - don't use /%s modifier in regex; marked by
7084S<<-- HERE> in m/%s/
7085
7086(W regexp) You have used an internal modifier such as (?-o) that has no
7087meaning unless removed from the entire regexp:
7088
7089    if ($string =~ /(?-o)$pattern/o) { ... }
7090
7091must be written as
7092
7093    if ($string =~ /$pattern/) { ... }
7094
7095The S<<-- HERE> shows whereabouts in the regular expression the problem was
7096discovered.  See L<perlre>.
7097
7098=item Useless localization of %s
7099
7100(W syntax) The localization of lvalues such as C<local($x=10)> is legal,
7101but in fact the local() currently has no effect.  This may change at
7102some point in the future, but in the meantime such code is discouraged.
7103
7104=item Useless (?%s) - use /%s modifier in regex; marked by S<<-- HERE> in
7105m/%s/
7106
7107(W regexp) You have used an internal modifier such as (?o) that has no
7108meaning unless applied to the entire regexp:
7109
7110    if ($string =~ /(?o)$pattern/) { ... }
7111
7112must be written as
7113
7114    if ($string =~ /$pattern/o) { ... }
7115
7116The S<<-- HERE> shows whereabouts in the regular expression the problem was
7117discovered.  See L<perlre>.
7118
7119=item Useless use of attribute "const"
7120
7121(W misc) The C<const> attribute has no effect except
7122on anonymous closure prototypes.  You applied it to
7123a subroutine via L<attributes.pm|attributes>.  This is only useful
7124inside an attribute handler for an anonymous subroutine.
7125
7126=item Useless use of /d modifier in transliteration operator
7127
7128(W misc) You have used the /d modifier where the searchlist has the
7129same length as the replacelist.  See L<perlop> for more information
7130about the /d modifier.
7131
7132=item Useless use of \E
7133
7134(W misc) You have a \E in a double-quotish string without a C<\U>,
7135C<\L> or C<\Q> preceding it.
7136
7137=item Useless use of greediness modifier '%c' in regex; marked by S<<-- HERE> in m/%s/
7138
7139(W regexp) You specified something like these:
7140
7141 qr/a{3}?/
7142 qr/b{1,1}+/
7143
7144The C<"?"> and C<"+"> don't have any effect, as they modify whether to
7145match more or fewer when there is a choice, and by specifying to match
7146exactly a given number, there is no room left for a choice.
7147
7148=item Useless use of %s in scalar context
7149
7150(W scalar) You did something whose only interesting return value is a
7151list without a side effect in scalar context, which does not accept a
7152list.
7153
7154For example
7155
7156    my $x = sort @y;
7157
7158This is not very useful, and perl currently optimizes this away.
7159
7160=item Useless use of %s in void context
7161
7162(W void) You did something without a side effect in a context that does
7163nothing with the return value, such as a statement that doesn't return a
7164value from a block, or the left side of a scalar comma operator.  Very
7165often this points not to stupidity on your part, but a failure of Perl
7166to parse your program the way you thought it would.  For example, you'd
7167get this if you mixed up your C precedence with Python precedence and
7168said
7169
7170    $one, $two = 1, 2;
7171
7172when you meant to say
7173
7174    ($one, $two) = (1, 2);
7175
7176Another common error is to use ordinary parentheses to construct a list
7177reference when you should be using square or curly brackets, for
7178example, if you say
7179
7180    $array = (1,2);
7181
7182when you should have said
7183
7184    $array = [1,2];
7185
7186The square brackets explicitly turn a list value into a scalar value,
7187while parentheses do not.  So when a parenthesized list is evaluated in
7188a scalar context, the comma is treated like C's comma operator, which
7189throws away the left argument, which is not what you want.  See
7190L<perlref> for more on this.
7191
7192This warning will not be issued for numerical constants equal to 0 or 1
7193since they are often used in statements like
7194
7195    1 while sub_with_side_effects();
7196
7197String constants that would normally evaluate to 0 or 1 are warned
7198about.
7199
7200=item Useless use of (?-p) in regex; marked by S<<-- HERE> in m/%s/
7201
7202(W regexp) The C<p> modifier cannot be turned off once set.  Trying to do
7203so is futile.
7204
7205=item Useless use of "re" pragma
7206
7207(W) You did C<use re;> without any arguments.  That isn't very useful.
7208
7209=item Useless use of %s with no values
7210
7211(W syntax) You used the push() or unshift() function with no arguments
7212apart from the array, like C<push(@x)> or C<unshift(@foo)>.  That won't
7213usually have any effect on the array, so is completely useless.  It's
7214possible in principle that push(@tied_array) could have some effect
7215if the array is tied to a class which implements a PUSH method.  If so,
7216you can write it as C<push(@tied_array,())> to avoid this warning.
7217
7218=item "use" not allowed in expression
7219
7220(F) The "use" keyword is recognized and executed at compile time, and
7221returns no useful value.  See L<perlmod>.
7222
7223=item Use of @_ in %s with signatured subroutine is experimental
7224
7225(S experimental::args_array_with_signatures) An expression involving the
7226C<@_> arguments array was found in a subroutine that uses a signature.
7227This is experimental because the interaction between the arguments
7228array and parameter handling via signatures is not guaranteed to remain
7229stable in any future version of Perl, and such code should be avoided.
7230
7231=item Use of bare << to mean <<"" is forbidden
7232
7233(F) You are now required to use the explicitly quoted form if you wish
7234to use an empty line as the terminator of the here-document.
7235
7236Use of a bare terminator was deprecated in Perl 5.000, and is a fatal
7237error as of Perl 5.28.
7238
7239=item Use of /c modifier is meaningless in s///
7240
7241(W regexp) You used the /c modifier in a substitution.  The /c
7242modifier is not presently meaningful in substitutions.
7243
7244=item Use of /c modifier is meaningless without /g
7245
7246(W regexp) You used the /c modifier with a regex operand, but didn't
7247use the /g modifier.  Currently, /c is meaningful only when /g is
7248used.  (This may change in the future.)
7249
7250=item Use of code point 0x%s is not allowed; the permissible max is 0x%X
7251
7252=item Use of code point 0x%s is not allowed; the permissible max is 0x%X
7253in regex; marked by <-- HERE in m/%s/
7254
7255(F) You used a code point that is not allowed, because it is too large.
7256Unicode only allows code points up to 0x10FFFF, but Perl allows much
7257larger ones. Earlier versions of Perl allowed code points above IV_MAX
7258(0x7FFFFFF on 32-bit platforms, 0x7FFFFFFFFFFFFFFF on 64-bit platforms),
7259however, this could possibly break the perl interpreter in some constructs,
7260including causing it to hang in a few cases.
7261
7262If your code is to run on various platforms, keep in mind that the upper
7263limit depends on the platform.  It is much larger on 64-bit word sizes
7264than 32-bit ones.
7265
7266The use of out of range code points was deprecated in Perl 5.24, and
7267became a fatal error in Perl 5.28.
7268
7269=item Use of each() on hash after insertion without resetting hash iterator results in undefined behavior
7270
7271(S internal) The behavior of C<each()> after insertion is undefined;
7272it may skip items, or visit items more than once.  Consider using
7273C<keys()> instead of C<each()>.
7274
7275=item Use of := for an empty attribute list is not allowed
7276
7277(F) The construction C<my $x := 42> used to parse as equivalent to
7278C<my $x : = 42> (applying an empty attribute list to C<$x>).
7279This construct was deprecated in 5.12.0, and has now been made a syntax
7280error, so C<:=> can be reclaimed as a new operator in the future.
7281
7282If you need an empty attribute list, for example in a code generator, add
7283a space before the C<=>.
7284
7285=item Use of %s for non-UTF-8 locale is wrong.  Assuming a UTF-8 locale
7286
7287(W locale)  You are matching a regular expression using locale rules,
7288and the specified construct was encountered.  This construct is only
7289valid for UTF-8 locales, which the current locale isn't.  This doesn't
7290make sense.  Perl will continue, assuming a Unicode (UTF-8) locale, but
7291the results are likely to be wrong.
7292
7293=item Use of freed value in iteration
7294
7295(F) Perhaps you modified the iterated array within the loop?
7296This error is typically caused by code like the following:
7297
7298    @a = (3,4);
7299    @a = () for (1,2,@a);
7300
7301You are not supposed to modify arrays while they are being iterated over.
7302For speed and efficiency reasons, Perl internally does not do full
7303reference-counting of iterated items, hence deleting such an item in the
7304middle of an iteration causes Perl to see a freed value.
7305
7306=item Use of /g modifier is meaningless in split
7307
7308(W regexp) You used the /g modifier on the pattern for a C<split>
7309operator.  Since C<split> always tries to match the pattern
7310repeatedly, the C</g> has no effect.
7311
7312=item Use of "goto" to jump into a construct is deprecated
7313
7314(D deprecated) Using C<goto> to jump from an outer scope into an inner
7315scope is deprecated and should be avoided.
7316
7317This was deprecated in Perl 5.12.
7318
7319=item Use of '%s' in \p{} or \P{} is deprecated because: %s
7320
7321(D deprecated) Certain properties are deprecated by Unicode, and may
7322eventually be removed from the Standard, at which time Perl will follow
7323along.  In the meantime, this message is raised to notify you.
7324
7325=item Use of inherited AUTOLOAD for non-method %s::%s() is no longer allowed
7326
7327(F) As an accidental feature, C<AUTOLOAD> subroutines were looked up as
7328methods (using the C<@ISA> hierarchy), even when the subroutines to be
7329autoloaded were called as plain functions (e.g. C<Foo::bar()>), not as
7330methods (e.g. C<< Foo->bar() >> or C<< $obj->bar() >>).
7331
7332This was deprecated in Perl 5.004, and was made fatal in Perl 5.28.
7333
7334=item Use of %s in printf format not supported
7335
7336(F) You attempted to use a feature of printf that is accessible from
7337only C.  This usually means there's a better way to do it in Perl.
7338
7339=item Use of '%s' is deprecated as a string delimiter
7340
7341(D deprecated) You used the given character as a starting delimiter of a
7342string outside the scope of S<C<use feature 'extra_paired_delimiters'>>.
7343This character is the mirror image of another Unicode character; within
7344the scope of that feature, the two are considered a pair for delimitting
7345strings.  It is planned to make that feature the default, at which point
7346this usage would become illegal; hence this warning.
7347
7348For now, you may live with this warning, or turn it off, but this code
7349will no longer compile in a future version of Perl.  Or you can turn on
7350S<C<use feature 'extra_paired_delimiters'>> and use the character that
7351is the mirror image of this one for the closing string delimiter.
7352
7353=item Use of '%s' is experimental as a string delimiter
7354
7355(S experimental::extra_paired_delimiters)   This warning is emitted if
7356you use as a string delimiter one of the non-ASCII mirror image ones
7357enabled by S<C<use feature 'extra_paired_delimiters'>>.  Simply suppress
7358the warning if you want to use the feature, but know that in doing so
7359you are taking the risk of using an experimental feature which may
7360change or be removed in a future Perl version:
7361
7362=item Use of %s is not allowed in Unicode property wildcard
7363subpatterns in regex; marked by S<<-- HERE> in m/%s/
7364
7365(F) You were using a wildcard subpattern a Unicode property value, and
7366the subpattern contained something that is illegal.  Not all regular
7367expression capabilities are legal in such subpatterns, and this is one.
7368Rewrite your subppattern to not use the offending construct.
7369See L<perlunicode/Wildcards in Property Values>.
7370
7371=item Use of -l on filehandle%s
7372
7373(W io) A filehandle represents an opened file, and when you opened the file
7374it already went past any symlink you are presumably trying to look for.
7375The operation returned C<undef>.  Use a filename instead.
7376
7377=item Use of reference "%s" as array index
7378
7379(W misc) You tried to use a reference as an array index; this probably
7380isn't what you mean, because references in numerical context tend
7381to be huge numbers, and so usually indicates programmer error.
7382
7383If you really do mean it, explicitly numify your reference, like so:
7384C<$array[0+$ref]>.  This warning is not given for overloaded objects,
7385however, because you can overload the numification and stringification
7386operators and then you presumably know what you are doing.
7387
7388=item Use of strings with code points over 0xFF as arguments to %s
7389operator is not allowed
7390
7391(F) You tried to use one of the string bitwise operators (C<&> or C<|> or C<^> or
7392C<~>) on a string containing a code point over 0xFF.  The string bitwise
7393operators treat their operands as strings of bytes, and values beyond
73940xFF are nonsensical in this context.
7395
7396Certain instances became fatal in Perl 5.28; others in perl 5.32.
7397
7398=item Use of strings with code points over 0xFF as arguments to vec is forbidden
7399
7400(F) You tried to use L<C<vec>|perlfunc/vec EXPR,OFFSET,BITS>
7401on a string containing a code point over 0xFF, which is nonsensical here.
7402
7403This became fatal in Perl 5.32.
7404
7405=item Use of tainted arguments in %s is deprecated
7406
7407(W taint, deprecated) You have supplied C<system()> or C<exec()> with multiple
7408arguments and at least one of them is tainted.  This used to be allowed
7409but will become a fatal error in a future version of perl.  Untaint your
7410arguments.  See L<perlsec>.
7411
7412=item Use of unassigned code point or non-standalone grapheme for a
7413delimiter is not allowed
7414
7415(F)
7416A grapheme is what appears to a native-speaker of a language to be a
7417character.  In Unicode (and hence Perl) a grapheme may actually be
7418several adjacent characters that together form a complete grapheme.  For
7419example, there can be a base character, like "R" and an accent, like a
7420circumflex "^", that appear when displayed to be a single character with
7421the circumflex hovering over the "R".  Perl currently allows things like
7422that circumflex to be delimiters of strings, patterns, I<etc>.  When
7423displayed, the circumflex would look like it belongs to the character
7424just to the left of it.  In order to move the language to be able to
7425accept graphemes as delimiters, we cannot allow the use of
7426delimiters which aren't graphemes by themselves.  Also, a delimiter must
7427already be assigned (or known to be never going to be assigned) to try
7428to future-proof code, for otherwise code that works today would fail to
7429compile if the currently unassigned delimiter ends up being something
7430that isn't a stand-alone grapheme.  Because Unicode is never going to
7431assign
7432L<non-character code points|perlunicode/Noncharacter code points>, nor
7433L<code points that are above the legal Unicode maximum|
7434perlunicode/Beyond Unicode code points>, those can be delimiters, and
7435their use is legal.
7436
7437=item Use of uninitialized value%s
7438
7439(W uninitialized) An undefined value was used as if it were already
7440defined.  It was interpreted as a "" or a 0, but maybe it was a mistake.
7441To suppress this warning assign a defined value to your variables.
7442
7443To help you figure out what was undefined, perl will try to tell you
7444the name of the variable (if any) that was undefined.  In some cases
7445it cannot do this, so it also tells you what operation you used the
7446undefined value in.  Note, however, that perl optimizes your program
7447and the operation displayed in the warning may not necessarily appear
7448literally in your program.  For example, C<"that $foo"> is usually
7449optimized into C<"that " . $foo>, and the warning will refer to the
7450C<concatenation (.)> operator, even though there is no C<.> in
7451your program.
7452
7453=item "use re 'strict'" is experimental
7454
7455(S experimental::re_strict) The things that are different when a regular
7456expression pattern is compiled under C<'strict'> are subject to change
7457in future Perl releases in incompatible ways.  This means that a pattern
7458that compiles today may not in a future Perl release.  This warning is
7459to alert you to that risk.
7460
7461=item Use \x{...} for more than two hex characters in regex; marked by
7462S<<-- HERE> in m/%s/
7463
7464(F) In a regular expression, you said something like
7465
7466 (?[ [ \xBEEF ] ])
7467
7468Perl isn't sure if you meant this
7469
7470 (?[ [ \x{BEEF} ] ])
7471
7472or if you meant this
7473
7474 (?[ [ \x{BE} E F ] ])
7475
7476You need to add either braces or blanks to disambiguate.
7477
7478=item Using just the first character returned by \N{} in character class in
7479regex; marked by S<<-- HERE> in m/%s/
7480
7481(W regexp) Named Unicode character escapes C<(\N{...})> may return
7482a multi-character sequence.  Even though a character class is
7483supposed to match just one character of input, perl will match
7484the whole thing correctly, except when the class is inverted
7485(C<[^...]>), or the escape is the beginning or final end point of
7486a range.  For these, what should happen isn't clear at all.  In
7487these circumstances, Perl discards all but the first character
7488of the returned sequence, which is not likely what you want.
7489
7490=item Using just the single character results returned by \p{} in
7491(?[...]) in regex; marked by S<<-- HERE> in m/%s/
7492
7493(W regexp) Extended character classes currently cannot handle operands
7494that evaluate to more than one character.  These are removed from the
7495results of the expansion of the C<\p{}>.
7496
7497This situation can happen, for example, in
7498
7499 (?[ \p{name=/KATAKANA/} ])
7500
7501"KATAKANA LETTER AINU P" is a legal Unicode name (technically a "named
7502sequence"), but it is actually two characters.  The above expression
7503with match only the Unicode names containing KATAKANA that represent
7504single characters.
7505
7506=item Using /u for '%s' instead of /%s in regex; marked by S<<-- HERE> in m/%s/
7507
7508(W regexp) You used a Unicode boundary (C<\b{...}> or C<\B{...}>) in a
7509portion of a regular expression where the character set modifiers C</a>
7510or C</aa> are in effect.  These two modifiers indicate an ASCII
7511interpretation, and this doesn't make sense for a Unicode definition.
7512The generated regular expression will compile so that the boundary uses
7513all of Unicode.  No other portion of the regular expression is affected.
7514
7515=item Using !~ with %s doesn't make sense
7516
7517(F) Using the C<!~> operator with C<s///r>, C<tr///r> or C<y///r> is
7518currently reserved for future use, as the exact behavior has not
7519been decided.  (Simply returning the boolean opposite of the
7520modified string is usually not particularly useful.)
7521
7522=item UTF-16 surrogate U+%X
7523
7524(S surrogate) You had a UTF-16 surrogate in a context where they are
7525not considered acceptable.  These code points, between U+D800 and
7526U+DFFF (inclusive), are used by Unicode only for UTF-16.  However, Perl
7527internally allows all unsigned integer code points (up to the size limit
7528available on your platform), including surrogates.  But these can cause
7529problems when being input or output, which is likely where this message
7530came from.  If you really really know what you are doing you can turn
7531off this warning by C<no warnings 'surrogate';>.
7532
7533=item Value of %s can be "0"; test with defined()
7534
7535(W misc) In a conditional expression, you used <HANDLE>, <*> (glob),
7536C<each()>, or C<readdir()> as a boolean value.  Each of these constructs
7537can return a value of "0"; that would make the conditional expression
7538false, which is probably not what you intended.  When using these
7539constructs in conditional expressions, test their values with the
7540C<defined> operator.
7541
7542=item Value of CLI symbol "%s" too long
7543
7544(W misc) A warning peculiar to VMS.  Perl tried to read the value of an
7545%ENV element from a CLI symbol table, and found a resultant string
7546longer than 1024 characters.  The return value has been truncated to
75471024 characters.
7548
7549=item Variable "%s" is not available
7550
7551(W closure) During compilation, an inner named subroutine or eval is
7552attempting to capture an outer lexical that is not currently available.
7553This can happen for one of two reasons.  First, the outer lexical may be
7554declared in an outer anonymous subroutine that has not yet been created.
7555(Remember that named subs are created at compile time, while anonymous
7556subs are created at run-time.)  For example,
7557
7558    sub { my $a; sub f { $a } }
7559
7560At the time that f is created, it can't capture the current value of $a,
7561since the anonymous subroutine hasn't been created yet.  Conversely,
7562the following won't give a warning since the anonymous subroutine has by
7563now been created and is live:
7564
7565    sub { my $a; eval 'sub f { $a }' }->();
7566
7567The second situation is caused by an eval accessing a variable that has
7568gone out of scope, for example,
7569
7570    sub f {
7571	my $a;
7572	sub { eval '$a' }
7573    }
7574    f()->();
7575
7576Here, when the '$a' in the eval is being compiled, f() is not currently
7577being executed, so its $a is not available for capture.
7578
7579=item Variable "%s" is not imported%s
7580
7581(S misc) With "use strict" in effect, you referred to a global variable
7582that you apparently thought was imported from another module, because
7583something else of the same name (usually a subroutine) is exported by
7584that module.  It usually means you put the wrong funny character on the
7585front of your variable. It is also possible you used an "our" variable
7586whose scope has ended.
7587
7588=item Variable length lookbehind not implemented in regex m/%s/
7589
7590(F) B<This message no longer should be raised as of Perl 5.30.>  It is
7591retained in this document as a convenience for people using an earlier
7592Perl version.
7593
7594In Perl 5.30 and earlier, lookbehind is allowed
7595only for subexpressions whose length is fixed and
7596known at compile time.  For positive lookbehind, you can use the C<\K>
7597regex construct as a way to get the equivalent functionality.  See
7598L<(?<=pattern) and \K in perlre|perlre/\K>.
7599
7600Starting in Perl 5.18, there are non-obvious Unicode rules under C</i>
7601that can match variably, but which you might not think could.  For
7602example, the substring C<"ss"> can match the single character LATIN
7603SMALL LETTER SHARP S.  Here's a complete list of the current ones
7604affecting ASCII characters:
7605
7606   ASCII
7607  sequence      Matches single letter under /i
7608    FF          U+FB00 LATIN SMALL LIGATURE FF
7609    FFI         U+FB03 LATIN SMALL LIGATURE FFI
7610    FFL         U+FB04 LATIN SMALL LIGATURE FFL
7611    FI          U+FB01 LATIN SMALL LIGATURE FI
7612    FL          U+FB02 LATIN SMALL LIGATURE FL
7613    SS          U+00DF LATIN SMALL LETTER SHARP S
7614                U+1E9E LATIN CAPITAL LETTER SHARP S
7615    ST          U+FB06 LATIN SMALL LIGATURE ST
7616                U+FB05 LATIN SMALL LIGATURE LONG S T
7617
7618This list is subject to change, but is quite unlikely to.
7619Each ASCII sequence can be any combination of upper- and lowercase.
7620
7621You can avoid this by using a bracketed character class in the
7622lookbehind assertion, like
7623
7624 (?<![sS]t)
7625 (?<![fF]f[iI])
7626
7627This fools Perl into not matching the ligatures.
7628
7629Another option for Perls starting with 5.16, if you only care about
7630ASCII matches, is to add the C</aa> modifier to the regex.  This will
7631exclude all these non-obvious matches, thus getting rid of this message.
7632You can also say
7633
7634 use if $] ge 5.016, re => '/aa';
7635
7636to apply C</aa> to all regular expressions compiled within its scope.
7637See L<re>.
7638
7639=item Variable length positive lookbehind with capturing is experimental in regex m/%s/
7640
7641(W) Variable length positive lookbehind with capturing is not well defined. This
7642warning alerts you to the fact that you are using a construct which may
7643change in a future version of perl. See the
7644L<< documentation of Positive Lookbehind in perlre|perlre/"C<(?<=I<pattern>)>" >>
7645for details. You may silence this warning with the following:
7646
7647    no warnings 'experimental::vlb';
7648
7649=item Variable length negative lookbehind with capturing is experimental in regex m/%s/
7650
7651(W) Variable length negative lookbehind with capturing is not well defined. This
7652warning alerts you to the fact that you are using a construct which may
7653change in a future version of perl. See the
7654L<< documentation of Negative Lookbehind in perlre|perlre/"C<(?<!I<pattern>)>" >>
7655for details. You may silence this warning with the following:
7656
7657    no warnings 'experimental::vlb';
7658
7659=item "%s" variable %s masks earlier declaration in same %s
7660
7661(W shadow) A "my", "our" or "state" variable has been redeclared in the
7662current scope or statement, effectively eliminating all access to the
7663previous instance.  This is almost always a typographical error.  Note
7664that the earlier variable will still exist until the end of the scope
7665or until all closure references to it are destroyed.
7666
7667=item Variable syntax
7668
7669(A) You've accidentally run your script through B<csh> instead
7670of Perl.  Check the #! line, or manually feed your script into
7671Perl yourself.
7672
7673=item Variable "%s" will not stay shared
7674
7675(W closure) An inner (nested) I<named> subroutine is referencing a
7676lexical variable defined in an outer named subroutine.
7677
7678When the inner subroutine is called, it will see the value of
7679the outer subroutine's variable as it was before and during the *first*
7680call to the outer subroutine; in this case, after the first call to the
7681outer subroutine is complete, the inner and outer subroutines will no
7682longer share a common value for the variable.  In other words, the
7683variable will no longer be shared.
7684
7685This problem can usually be solved by making the inner subroutine
7686anonymous, using the C<sub {}> syntax.  When inner anonymous subs that
7687reference variables in outer subroutines are created, they
7688are automatically rebound to the current values of such variables.
7689
7690=item vector argument not supported with alpha versions
7691
7692(S printf) The %vd (s)printf format does not support version objects
7693with alpha parts.
7694
7695=item Verb pattern '%s' has a mandatory argument in regex; marked by
7696S<<-- HERE> in m/%s/
7697
7698(F) You used a verb pattern that requires an argument.  Supply an
7699argument or check that you are using the right verb.
7700
7701=item Verb pattern '%s' may not have an argument in regex; marked by
7702S<<-- HERE> in m/%s/
7703
7704(F) You used a verb pattern that is not allowed an argument.  Remove the
7705argument or check that you are using the right verb.
7706
7707=item Version control conflict marker
7708
7709(F) The parser found a line starting with C<E<lt><<<<<<>,
7710C<E<gt>E<gt>E<gt>E<gt>E<gt>E<gt>E<gt>>, or C<=======>.  These may be left by a
7711version control system to mark conflicts after a failed merge operation.
7712
7713=item Version number must be a constant number
7714
7715(P) The attempt to translate a C<use Module n.n LIST> statement into
7716its equivalent C<BEGIN> block found an internal inconsistency with
7717the version number.
7718
7719=item Version string '%s' contains invalid data; ignoring: '%s'
7720
7721(W misc) The version string contains invalid characters at the end, which
7722are being ignored.
7723
7724=item Warning: something's wrong
7725
7726(W) You passed warn() an empty string (the equivalent of C<warn "">) or
7727you called it with no args and C<$@> was empty.
7728
7729=item Warning: unable to close filehandle %s properly
7730
7731(S) The implicit close() done by an open() got an error indication on
7732the close().  This usually indicates your file system ran out of disk
7733space.
7734
7735=item Warning: unable to close filehandle properly: %s
7736
7737=item Warning: unable to close filehandle %s properly: %s
7738
7739(S io) There were errors during the implicit close() done on a filehandle
7740when its reference count reached zero while it was still open, e.g.:
7741
7742    {
7743        open my $fh, '>', $file  or die "open: '$file': $!\n";
7744        print $fh $data or die "print: $!";
7745    } # implicit close here
7746
7747Because various errors may only be detected by close() (e.g. buffering could
7748allow the C<print> in this example to return true even when the disk is full),
7749it is dangerous to ignore its result.  So when it happens implicitly, perl
7750will signal errors by warning.
7751
7752B<Prior to version 5.22.0, perl ignored such errors>, so the common idiom shown
7753above was liable to cause B<silent data loss>.
7754
7755=item Warning: Use of "%s" without parentheses is ambiguous
7756
7757(S ambiguous) You wrote a unary operator followed by something that
7758looks like a binary operator that could also have been interpreted as a
7759term or unary operator.  For instance, if you know that the rand
7760function has a default argument of 1.0, and you write
7761
7762    rand + 5;
7763
7764you may THINK you wrote the same thing as
7765
7766    rand() + 5;
7767
7768but in actual fact, you got
7769
7770    rand(+5);
7771
7772So put in parentheses to say what you really mean.
7773
7774=item when is experimental
7775
7776(S experimental::smartmatch) C<when> depends on smartmatch, which is
7777experimental.  Additionally, it has several special cases that may
7778not be immediately obvious, and their behavior may change or
7779even be removed in any future release of perl.  See the explanation
7780under L<perlsyn/Experimental Details on given and when>.
7781
7782=item Wide character in %s
7783
7784(S utf8) Perl met a wide character (ordinal >255) when it wasn't
7785expecting one.  This warning is by default on for I/O (like print).
7786
7787If this warning does come from I/O, the easiest
7788way to quiet it is simply to add the C<:utf8> layer, I<e.g.>,
7789S<C<binmode STDOUT, ':utf8'>>.  Another way to turn off the warning is
7790to add S<C<no warnings 'utf8';>> but that is often closer to
7791cheating.  In general, you are supposed to explicitly mark the
7792filehandle with an encoding, see L<open> and L<perlfunc/binmode>.
7793
7794If the warning comes from other than I/O, this diagnostic probably
7795indicates that incorrect results are being obtained.  You should examine
7796your code to determine how a wide character is getting to an operation
7797that doesn't handle them.
7798
7799=item Wide character (U+%X) in %s
7800
7801(W locale) While in a single-byte locale (I<i.e.>, a non-UTF-8
7802one), a multi-byte character was encountered.   Perl considers this
7803character to be the specified Unicode code point.  Combining non-UTF-8
7804locales and Unicode is dangerous.  Almost certainly some characters
7805will have two different representations.  For example, in the ISO 8859-7
7806(Greek) locale, the code point 0xC3 represents a Capital Gamma.  But so
7807also does 0x393.  This will make string comparisons unreliable.
7808
7809You likely need to figure out how this multi-byte character got mixed up
7810with your single-byte locale (or perhaps you thought you had a UTF-8
7811locale, but Perl disagrees).
7812
7813=item Within []-length '%c' not allowed
7814
7815(F) The count in the (un)pack template may be replaced by C<[TEMPLATE]>
7816only if C<TEMPLATE> always matches the same amount of packed bytes that
7817can be determined from the template alone.  This is not possible if
7818it contains any of the codes @, /, U, u, w or a *-length.  Redesign
7819the template.
7820
7821=item While trying to resolve method call %s->%s() can not locate package "%s" yet it is mentioned in @%s::ISA (perhaps you forgot to load "%s"?)
7822
7823(W syntax) It is possible that the C<@ISA> contains a misspelled or never loaded
7824package name, which can result in perl choosing an unexpected parent
7825class's method to resolve the method call. If this is deliberate you
7826can do something like
7827
7828  @Missing::Package::ISA = ();
7829
7830to silence the warnings, otherwise you should correct the package name, or
7831ensure that the package is loaded prior to the method call.
7832
7833=item %s() with negative argument
7834
7835(S misc) Certain operations make no sense with negative arguments.
7836Warning is given and the operation is not done.
7837
7838=item write() on closed filehandle %s
7839
7840(W closed) The filehandle you're writing to got itself closed sometime
7841before now.  Check your control flow.
7842
7843=item %s "\x%X" does not map to Unicode
7844
7845(S utf8) When reading in different encodings, Perl tries to
7846map everything into Unicode characters.  The bytes you read
7847in are not legal in this encoding.  For example
7848
7849    utf8 "\xE4" does not map to Unicode
7850
7851if you try to read in the a-diaereses Latin-1 as UTF-8.
7852
7853=item 'X' outside of string
7854
7855(F) You had a (un)pack template that specified a relative position before
7856the beginning of the string being (un)packed.  See L<perlfunc/pack>.
7857
7858=item 'x' outside of string in unpack
7859
7860(F) You had a pack template that specified a relative position after
7861the end of the string being unpacked.  See L<perlfunc/pack>.
7862
7863=item YOU HAVEN'T DISABLED SET-ID SCRIPTS IN THE KERNEL YET!
7864
7865(F) And you probably never will, because you probably don't have the
7866sources to your kernel, and your vendor probably doesn't give a rip
7867about what you want.  There is a vulnerability anywhere that you have a
7868set-id script, and to close it you need to remove the set-id bit from
7869the script that you're attempting to run.  To actually run the script
7870set-id, your best bet is to put a set-id C wrapper around your script.
7871
7872=item You need to quote "%s"
7873
7874(W syntax) You assigned a bareword as a signal handler name.
7875Unfortunately, you already have a subroutine of that name declared,
7876which means that Perl 5 will try to call the subroutine when the
7877assignment is executed, which is probably not what you want.  (If it IS
7878what you want, put an & in front.)
7879
7880=item Your random numbers are not that random
7881
7882(F) When trying to initialize the random seed for hashes, Perl could
7883not get any randomness out of your system.  This usually indicates
7884Something Very Wrong.
7885
7886=item Zero length \N{} in regex; marked by S<<-- HERE> in m/%s/
7887
7888(F) Named Unicode character escapes (C<\N{...}>) may return a zero-length
7889sequence.  Such an escape was used in an extended character class, i.e.
7890C<(?[...])>, or under C<use re 'strict'>, which is not permitted.  Check
7891that the correct escape has been used, and the correct charnames handler
7892is in scope.  The S<<-- HERE> shows whereabouts in the regular
7893expression the problem was discovered.
7894
7895=back
7896
7897=head1 SEE ALSO
7898
7899L<warnings>, L<diagnostics>.
7900
7901=cut
7902