a0505e4bbae96843f18713db4dec30f0903aaa22
[p5sagit/p5-mst-13.2.git] / pod / perldiag.pod
1 =head1 NAME
2
3 perldiag - various Perl diagnostics
4
5 =head1 DESCRIPTION
6
7 These messages are classified as follows (listed in increasing order of
8 desperation):
9
10     (W) A warning (optional).
11     (D) A deprecation (optional).
12     (S) A severe warning (mandatory).
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
18 Optional warnings are enabled by using the B<-w> switch.  Warnings may
19 be captured by setting C<$SIG{__WARN__}> to a reference to a routine that
20 will be called on each warning instead of printing it.  See L<perlvar>.
21 Trappable errors may be trapped using the eval operator.  See
22 L<perlfunc/eval>.
23
24 Some of these messages are generic.  Spots that vary are denoted with a %s,
25 just as in a printf format.  Note that some messages start with a %s!
26 The symbols C<"%(-?@> sort before the letters, while C<[> and C<\> sort after.
27
28 =over 4
29
30 =item "my" variable %s can't be in a package
31
32 (F) Lexically scoped variables aren't in a package, so it doesn't make sense
33 to try to declare one with a package qualifier on the front.  Use local()
34 if you want to localize a package variable.
35
36 =item "my" variable %s masks earlier declaration in same scope
37
38 (W) A lexical variable has been redeclared in the same scope, effectively
39 eliminating all access to the previous instance.  This is almost always
40 a typographical error.  Note that the earlier variable will still exist
41 until the end of the scope or until all closure referents to it are
42 destroyed.
43
44 =item "no" not allowed in expression
45
46 (F) The "no" keyword is recognized and executed at compile time, and returns
47 no useful value.  See L<perlmod>.
48
49 =item "use" not allowed in expression
50
51 (F) The "use" keyword is recognized and executed at compile time, and returns
52 no useful value.  See L<perlmod>.
53
54 =item % may only be used in unpack
55
56 (F) You can't pack a string by supplying a checksum, because the
57 checksumming process loses information, and you can't go the other
58 way.  See L<perlfunc/unpack>.
59
60 =item %s (...) interpreted as function
61
62 (W) You've run afoul of the rule that says that any list operator followed
63 by parentheses turns into a function, with all the list operators arguments
64 found inside the parentheses.  See L<perlop/Terms and List Operators (Leftward)>.
65
66 =item %s argument is not a HASH element
67
68 (F) The argument to exists() must be a hash element, such as
69
70     $foo{$bar}
71     $ref->[12]->{"susie"}
72
73 =item %s argument is not a HASH element or slice
74
75 (F) The argument to delete() must be either a hash element, such as
76
77     $foo{$bar}
78     $ref->[12]->{"susie"}
79
80 or a hash slice, such as
81
82     @foo{$bar, $baz, $xyzzy}
83     @{$ref->[12]}{"susie", "queue"}
84
85 =item %s did not return a true value
86
87 (F) A required (or used) file must return a true value to indicate that
88 it compiled correctly and ran its initialization code correctly.  It's
89 traditional to end such a file with a "1;", though any true value would
90 do.  See L<perlfunc/require>.
91
92 =item %s found where operator expected
93
94 (S) The Perl lexer knows whether to expect a term or an operator.  If it
95 sees what it knows to be a term when it was expecting to see an operator,
96 it gives you this warning.  Usually it indicates that an operator or
97 delimiter was omitted, such as a semicolon.
98
99 =item %s had compilation errors
100
101 (F) The final summary message when a C<perl -c> fails.
102
103 =item %s has too many errors
104
105 (F) The parser has given up trying to parse the program after 10 errors.
106 Further error messages would likely be uninformative.
107
108 =item %s matches null string many times
109
110 (W) The pattern you've specified would be an infinite loop if the
111 regular expression engine didn't specifically check for that.  See L<perlre>.
112
113 =item %s never introduced
114
115 (S) The symbol in question was declared but somehow went out of scope
116 before it could possibly have been used.
117
118 =item %s syntax OK
119
120 (F) The final summary message when a C<perl -c> succeeds.
121
122 =item %s: Command not found
123
124 (A) You've accidentally run your script through B<csh> instead
125 of Perl.  Check the #! line, or manually feed your script into
126 Perl yourself.
127
128 =item %s: Expression syntax
129
130 (A) You've accidentally run your script through B<csh> instead
131 of Perl.  Check the #! line, or manually feed your script into
132 Perl yourself.
133
134 =item %s: Undefined variable
135
136 (A) You've accidentally run your script through B<csh> instead
137 of Perl.  Check the #! line, or manually feed your script into
138 Perl yourself.
139
140 =item %s: not found
141
142 (A) You've accidentally run your script through the Bourne shell
143 instead of Perl.  Check the #! line, or manually feed your script
144 into Perl yourself.
145
146 =item         (Missing semicolon on previous line?)
147
148 (S) This is an educated guess made in conjunction with the message "%s
149 found where operator expected".  Don't automatically put a semicolon on
150 the previous line just because you saw this message.
151
152 =item B<-P> not allowed for setuid/setgid script
153
154 (F) The script would have to be opened by the C preprocessor by name,
155 which provides a race condition that breaks security.
156
157 =item C<-T> and C<-B> not implemented on filehandles
158
159 (F) Perl can't peek at the stdio buffer of filehandles when it doesn't
160 know about your kind of stdio.  You'll have to use a filename instead.
161
162 =item C<-p> destination: %s
163
164 (F) An error occurred during the implicit output invoked by the C<-p>
165 command-line switch.  (This output goes to STDOUT unless you've
166 redirected it with select().)
167
168 =item 500 Server error
169
170 See Server error.
171
172 =item ?+* follows nothing in regexp
173
174 (F) You started a regular expression with a quantifier.  Backslash it
175 if you meant it literally.   See L<perlre>.
176
177 =item @ outside of string
178
179 (F) You had a pack template that specified an absolute position outside
180 the string being unpacked.  See L<perlfunc/pack>.
181
182 =item accept() on closed fd
183
184 (W) You tried to do an accept on a closed socket.  Did you forget to check
185 the return value of your socket() call?  See L<perlfunc/accept>.
186
187 =item Allocation too large: %lx
188
189 (X) You can't allocate more than 64K on an MS-DOS machine.
190
191 =item Applying %s to %s will act on scalar(%s)
192
193 (W) The pattern match (//), substitution (s///), and transliteration (tr///)
194 operators work on scalar values.  If you apply one of them to an array
195 or a hash, it will convert the array or hash to a scalar value -- the
196 length of an array, or the population info of a hash -- and then work on
197 that scalar value.  This is probably not what you meant to do.  See
198 L<perlfunc/grep> and L<perlfunc/map> for alternatives.
199
200 =item Arg too short for msgsnd
201
202 (F) msgsnd() requires a string at least as long as sizeof(long).
203
204 =item Ambiguous use of %s resolved as %s
205
206 (W)(S) You said something that may not be interpreted the way
207 you thought.  Normally it's pretty easy to disambiguate it by supplying
208 a missing quote, operator, parenthesis pair or declaration.
209
210 =item Ambiguous call resolved as CORE::%s(), qualify as such or use &
211
212 (W) A subroutine you have declared has the same name as a Perl keyword,
213 and you have used the name without qualification for calling one or the
214 other.  Perl decided to call the builtin because the subroutine is
215 not imported.
216
217 To force interpretation as a subroutine call, either put an ampersand
218 before the subroutine name, or qualify the name with its package.
219 Alternatively, you can import the subroutine (or pretend that it's
220 imported with the C<use subs> pragma).
221
222 To silently interpret it as the Perl operator, use the C<CORE::> prefix
223 on the operator (e.g. C<CORE::log($x)>) or by declaring the subroutine
224 to be an object method (see L<attrs>).
225
226 =item Args must match #! line
227
228 (F) The setuid emulator requires that the arguments Perl was invoked
229 with match the arguments specified on the #! line.  Since some systems
230 impose a one-argument limit on the #! line, try combining switches;
231 for example, turn C<-w -U> into C<-wU>.
232
233 =item Argument "%s" isn't numeric%s
234
235 (W) The indicated string was fed as an argument to an operator that
236 expected a numeric value instead.  If you're fortunate the message
237 will identify which operator was so unfortunate.
238
239 =item Array @%s missing the @ in argument %d of %s()
240
241 (D) Really old Perl let you omit the @ on array names in some spots.  This
242 is now heavily deprecated.
243
244 =item assertion botched: %s
245
246 (P) The malloc package that comes with Perl had an internal failure.
247
248 =item Assertion failed: file "%s"
249
250 (P) A general assertion failed.  The file in question must be examined.
251
252 =item Assignment to both a list and a scalar
253
254 (F) If you assign to a conditional operator, the 2nd and 3rd arguments
255 must either both be scalars or both be lists.  Otherwise Perl won't
256 know which context to supply to the right side.
257
258 =item Attempt to free non-arena SV: 0x%lx
259
260 (P) All SV objects are supposed to be allocated from arenas that will
261 be garbage collected on exit.  An SV was discovered to be outside any
262 of those arenas.
263
264 =item Attempt to free nonexistent shared string
265
266 (P) Perl maintains a reference counted internal table of strings to
267 optimize the storage and access of hash keys and other strings.  This
268 indicates someone tried to decrement the reference count of a string
269 that can no longer be found in the table.
270
271 =item Attempt to free temp prematurely
272
273 (W) Mortalized values are supposed to be freed by the free_tmps()
274 routine.  This indicates that something else is freeing the SV before
275 the free_tmps() routine gets a chance, which means that the free_tmps()
276 routine will be freeing an unreferenced scalar when it does try to free
277 it.
278
279 =item Attempt to free unreferenced glob pointers
280
281 (P) The reference counts got screwed up on symbol aliases.
282
283 =item Attempt to free unreferenced scalar
284
285 (W) Perl went to decrement the reference count of a scalar to see if it
286 would go to 0, and discovered that it had already gone to 0 earlier,
287 and should have been freed, and in fact, probably was freed.  This
288 could indicate that SvREFCNT_dec() was called too many times, or that
289 SvREFCNT_inc() was called too few times, or that the SV was mortalized
290 when it shouldn't have been, or that memory has been corrupted.
291
292 =item Attempt to pack pointer to temporary value
293
294 (W) You tried to pass a temporary value (like the result of a
295 function, or a computed expression) to the "p" pack() template.  This
296 means the result contains a pointer to a location that could become
297 invalid anytime, even before the end of the current statement.  Use
298 literals or global values as arguments to the "p" pack() template to
299 avoid this warning.
300
301 =item Attempt to use reference as lvalue in substr
302
303 (W) You supplied a reference as the first argument to substr() used
304 as an lvalue, which is pretty strange.  Perhaps you forgot to
305 dereference it first.  See L<perlfunc/substr>.
306
307 =item Bad arg length for %s, is %d, should be %d
308
309 (F) You passed a buffer of the wrong size to one of msgctl(), semctl() or
310 shmctl().  In C parlance, the correct sizes are, respectively,
311 S<sizeof(struct msqid_ds *)>, S<sizeof(struct semid_ds *)>, and
312 S<sizeof(struct shmid_ds *)>.
313
314 =item Bad filehandle: %s
315
316 (F) A symbol was passed to something wanting a filehandle, but the symbol
317 has no filehandle associated with it.  Perhaps you didn't do an open(), or
318 did it in another package.
319
320 =item Bad free() ignored
321
322 (S) An internal routine called free() on something that had never been
323 malloc()ed in the first place. Mandatory, but can be disabled by
324 setting environment variable C<PERL_BADFREE> to 1.
325
326 This message can be quite often seen with DB_File on systems with
327 "hard" dynamic linking, like C<AIX> and C<OS/2>. It is a bug of
328 C<Berkeley DB> which is left unnoticed if C<DB> uses I<forgiving>
329 system malloc().
330
331 =item Bad hash
332
333 (P) One of the internal hash routines was passed a null HV pointer.
334
335 =item Bad index while coercing array into hash
336
337 (F) The index looked up in the hash found as the 0'th element of a
338 pseudo-hash is not legal.  Index values must be at 1 or greater.
339 See L<perlref>.
340
341 =item Bad name after %s::
342
343 (F) You started to name a symbol by using a package prefix, and then didn't
344 finish the symbol.  In particular, you can't interpolate outside of quotes,
345 so
346
347     $var = 'myvar';
348     $sym = mypack::$var;
349
350 is not the same as
351
352     $var = 'myvar';
353     $sym = "mypack::$var";
354
355 =item Bad symbol for array
356
357 (P) An internal request asked to add an array entry to something that
358 wasn't a symbol table entry.
359
360 =item Bad symbol for filehandle
361
362 (P) An internal request asked to add a filehandle entry to something that
363 wasn't a symbol table entry.
364
365 =item Bad symbol for hash
366
367 (P) An internal request asked to add a hash entry to something that
368 wasn't a symbol table entry.
369
370 =item Badly placed ()'s
371
372 (A) You've accidentally run your script through B<csh> instead
373 of Perl.  Check the #! line, or manually feed your script into
374 Perl yourself.
375
376 =item Bareword "%s" not allowed while "strict subs" in use
377
378 (F) With "strict subs" in use, a bareword is only allowed as a
379 subroutine identifier, in curly braces or to the left of the "=>" symbol.
380 Perhaps you need to predeclare a subroutine?
381
382 =item Bareword "%s" refers to nonexistent package
383
384 (W) You used a qualified bareword of the form C<Foo::>, but
385 the compiler saw no other uses of that namespace before that point.
386 Perhaps you need to predeclare a package?
387
388 =item BEGIN failed--compilation aborted
389
390 (F) An untrapped exception was raised while executing a BEGIN subroutine.
391 Compilation stops immediately and the interpreter is exited.
392
393 =item BEGIN not safe after errors--compilation aborted
394
395 (F) Perl found a C<BEGIN {}> subroutine (or a C<use> directive, which
396 implies a C<BEGIN {}>) after one or more compilation errors had
397 already occurred.  Since the intended environment for the C<BEGIN {}>
398 could not be guaranteed (due to the errors), and since subsequent code
399 likely depends on its correct operation, Perl just gave up.
400
401 =item bind() on closed fd
402
403 (W) You tried to do a bind on a closed socket.  Did you forget to check
404 the return value of your socket() call?  See L<perlfunc/bind>.
405
406 =item Bizarre copy of %s in %s
407
408 (P) Perl detected an attempt to copy an internal value that is not copiable.
409
410 =item Callback called exit
411
412 (F) A subroutine invoked from an external package via perl_call_sv()
413 exited by calling exit.
414
415 =item Can't "goto" outside a block
416
417 (F) A "goto" statement was executed to jump out of what might look
418 like a block, except that it isn't a proper block.  This usually
419 occurs if you tried to jump out of a sort() block or subroutine, which
420 is a no-no.  See L<perlfunc/goto>.
421
422 =item Can't "goto" into the middle of a foreach loop
423
424 (F) A "goto" statement was executed to jump into the middle of a
425 foreach loop.  You can't get there from here.  See L<perlfunc/goto>.
426
427 =item Can't "last" outside a block
428
429 (F) A "last" statement was executed to break out of the current block,
430 except that there's this itty bitty problem called there isn't a
431 current block.  Note that an "if" or "else" block doesn't count as a
432 "loopish" block, as doesn't a block given to sort().  You can usually double
433 the curlies to get the same effect though, because the inner curlies
434 will be considered a block that loops once.  See L<perlfunc/last>.
435
436 =item Can't "next" outside a block
437
438 (F) A "next" statement was executed to reiterate the current block, but
439 there isn't a current block.  Note that an "if" or "else" block doesn't
440 count as a "loopish" block, as doesn't a block given to sort().  You can
441 usually double the curlies to get the same effect though, because the inner
442 curlies will be considered a block that loops once.  See L<perlfunc/next>.
443
444 =item Can't "redo" outside a block
445
446 (F) A "redo" statement was executed to restart the current block, but
447 there isn't a current block.  Note that an "if" or "else" block doesn't
448 count as a "loopish" block, as doesn't a block given to sort().  You can
449 usually double the curlies to get the same effect though, because the inner
450 curlies will be considered a block that loops once.  See L<perlfunc/redo>.
451
452 =item Can't bless non-reference value
453
454 (F) Only hard references may be blessed.  This is how Perl "enforces"
455 encapsulation of objects.  See L<perlobj>.
456
457 =item Can't break at that line
458
459 (S) A warning intended to only be printed while running within the debugger, indicating
460 the line number specified wasn't the location of a statement that could
461 be stopped at.
462
463 =item Can't call method "%s" in empty package "%s"
464
465 (F) You called a method correctly, and it correctly indicated a package
466 functioning as a class, but that package doesn't have ANYTHING defined
467 in it, let alone methods.  See L<perlobj>.
468
469 =item Can't call method "%s" on unblessed reference
470
471 (F) A method call must know in what package it's supposed to run.  It
472 ordinarily finds this out from the object reference you supply, but
473 you didn't supply an object reference in this case.  A reference isn't
474 an object reference until it has been blessed.  See L<perlobj>.
475
476 =item Can't call method "%s" without a package or object reference
477
478 (F) You used the syntax of a method call, but the slot filled by the
479 object reference or package name contains an expression that returns
480 a defined value which is neither an object reference nor a package name.
481 Something like this will reproduce the error:
482
483     $BADREF = 42;
484     process $BADREF 1,2,3;
485     $BADREF->process(1,2,3);
486
487 =item Can't call method "%s" on an undefined value
488
489 (F) You used the syntax of a method call, but the slot filled by the
490 object reference or package name contains an undefined value.
491 Something like this will reproduce the error:
492
493     $BADREF = undef;
494     process $BADREF 1,2,3;
495     $BADREF->process(1,2,3);
496
497 =item Can't chdir to %s
498
499 (F) You called C<perl -x/foo/bar>, but C</foo/bar> is not a directory
500 that you can chdir to, possibly because it doesn't exist.
501
502 =item Can't coerce %s to integer in %s
503
504 (F) Certain types of SVs, in particular real symbol table entries
505 (typeglobs), can't be forced to stop being what they are.  So you can't
506 say things like:
507
508     *foo += 1;
509
510 You CAN say
511
512     $foo = *foo;
513     $foo += 1;
514
515 but then $foo no longer contains a glob.
516
517 =item Can't coerce %s to number in %s
518
519 (F) Certain types of SVs, in particular real symbol table entries
520 (typeglobs), can't be forced to stop being what they are.
521
522 =item Can't coerce %s to string in %s
523
524 (F) Certain types of SVs, in particular real symbol table entries
525 (typeglobs), can't be forced to stop being what they are.
526
527 =item Can't coerce array into hash
528
529 (F) You used an array where a hash was expected, but the array has no
530 information on how to map from keys to array indices.  You can do that
531 only with arrays that have a hash reference at index 0.
532
533 =item Can't create pipe mailbox
534
535 (P) An error peculiar to VMS.  The process is suffering from exhausted quotas
536 or other plumbing problems.
537
538 =item Can't declare %s in my
539
540 (F) Only scalar, array, and hash variables may be declared as lexical variables.
541 They must have ordinary identifiers as names.
542
543 =item Can't do inplace edit on %s: %s
544
545 (S) The creation of the new file failed for the indicated reason.
546
547 =item Can't do inplace edit without backup
548
549 (F) You're on a system such as MS-DOS that gets confused if you try reading
550 from a deleted (but still opened) file.  You have to say C<-i.bak>, or some
551 such.
552
553 =item Can't do inplace edit: %s E<gt> 14 characters
554
555 (S) There isn't enough room in the filename to make a backup name for the file.
556
557 =item Can't do inplace edit: %s is not a regular file
558
559 (S) You tried to use the B<-i> switch on a special file, such as a file in
560 /dev, or a FIFO.  The file was ignored.
561
562 =item Can't do setegid!
563
564 (P) The setegid() call failed for some reason in the setuid emulator
565 of suidperl.
566
567 =item Can't do seteuid!
568
569 (P) The setuid emulator of suidperl failed for some reason.
570
571 =item Can't do setuid
572
573 (F) This typically means that ordinary perl tried to exec suidperl to
574 do setuid emulation, but couldn't exec it.  It looks for a name of the
575 form sperl5.000 in the same directory that the perl executable resides
576 under the name perl5.000, typically /usr/local/bin on Unix machines.
577 If the file is there, check the execute permissions.  If it isn't, ask
578 your sysadmin why he and/or she removed it.
579
580 =item Can't do waitpid with flags
581
582 (F) This machine doesn't have either waitpid() or wait4(), so only waitpid()
583 without flags is emulated.
584
585 =item Can't do {n,m} with n E<gt> m
586
587 (F) Minima must be less than or equal to maxima.  If you really want
588 your regexp to match something 0 times, just put {0}.  See L<perlre>.
589
590 =item Can't emulate -%s on #! line
591
592 (F) The #! line specifies a switch that doesn't make sense at this point.
593 For example, it'd be kind of silly to put a B<-x> on the #! line.
594
595 =item Can't exec "%s": %s
596
597 (W) An system(), exec(), or piped open call could not execute the named
598 program for the indicated reason.  Typical reasons include: the permissions
599 were wrong on the file, the file wasn't found in C<$ENV{PATH}>, the
600 executable in question was compiled for another architecture, or the
601 #! line in a script points to an interpreter that can't be run for
602 similar reasons.  (Or maybe your system doesn't support #! at all.)
603
604 =item Can't exec %s
605
606 (F) Perl was trying to execute the indicated program for you because that's
607 what the #! line said.  If that's not what you wanted, you may need to
608 mention "perl" on the #! line somewhere.
609
610 =item Can't execute %s
611
612 (F) You used the B<-S> switch, but the copies of the script to execute found
613 in the PATH did not have correct permissions.
614
615 =item Can't find %s on PATH, '.' not in PATH
616
617 (F) You used the B<-S> switch, but the script to execute could not be found
618 in the PATH, or at least not with the correct permissions.  The script
619 exists in the current directory, but PATH prohibits running it.
620
621 =item Can't find %s on PATH
622
623 (F) You used the B<-S> switch, but the script to execute could not be found
624 in the PATH.
625
626 =item Can't find label %s
627
628 (F) You said to goto a label that isn't mentioned anywhere that it's possible
629 for us to go to.  See L<perlfunc/goto>.
630
631 =item Can't find string terminator %s anywhere before EOF
632
633 (F) Perl strings can stretch over multiple lines.  This message means that
634 the closing delimiter was omitted.  Because bracketed quotes count nesting
635 levels, the following is missing its final parenthesis:
636
637     print q(The character '(' starts a side comment.);
638
639 If you're getting this error from a here-document, you may have 
640 included unseen whitespace before or after your closing tag. A good 
641 programmer's editor will have a way to help you find these characters.
642
643 =item Can't fork
644
645 (F) A fatal error occurred while trying to fork while opening a pipeline.
646
647 =item Can't get filespec - stale stat buffer?
648
649 (S) A warning peculiar to VMS.  This arises because of the difference between
650 access checks under VMS and under the Unix model Perl assumes.  Under VMS,
651 access checks are done by filename, rather than by bits in the stat buffer, so
652 that ACLs and other protections can be taken into account.  Unfortunately, Perl
653 assumes that the stat buffer contains all the necessary information, and passes
654 it, instead of the filespec, to the access checking routine.  It will try to
655 retrieve the filespec using the device name and FID present in the stat buffer,
656 but this works only if you haven't made a subsequent call to the CRTL stat()
657 routine, because the device name is overwritten with each call.  If this warning
658 appears, the name lookup failed, and the access checking routine gave up and
659 returned FALSE, just to be conservative.  (Note: The access checking routine
660 knows about the Perl C<stat> operator and file tests, so you shouldn't ever
661 see this warning in response to a Perl command; it arises only if some internal
662 code takes stat buffers lightly.)
663
664 =item Can't get pipe mailbox device name
665
666 (P) An error peculiar to VMS.  After creating a mailbox to act as a pipe, Perl
667 can't retrieve its name for later use.
668
669 =item Can't get SYSGEN parameter value for MAXBUF
670
671 (P) An error peculiar to VMS.  Perl asked $GETSYI how big you want your
672 mailbox buffers to be, and didn't get an answer.
673
674 =item Can't goto subroutine outside a subroutine
675
676 (F) The deeply magical "goto subroutine" call can only replace one subroutine
677 call for another.  It can't manufacture one out of whole cloth.  In general
678 you should be calling it out of only an AUTOLOAD routine anyway.  See
679 L<perlfunc/goto>.
680
681 =item Can't goto subroutine from an eval-string
682
683 (F) The "goto subroutine" call can't be used to jump out of an eval "string".
684 (You can use it to jump out of an eval {BLOCK}, but you probably don't want to.)
685
686 =item Can't localize through a reference
687
688 (F) You said something like C<local $$ref>, which Perl can't currently
689 handle, because when it goes to restore the old value of whatever $ref
690 pointed to after the scope of the local() is finished, it can't be
691 sure that $ref will still be a reference.  
692
693 =item Can't localize lexical variable %s
694
695 (F) You used local on a variable name that was previously declared as a
696 lexical variable using "my".  This is not allowed.  If you want to
697 localize a package variable of the same name, qualify it with the
698 package name.
699
700 =item Can't locate auto/%s.al in @INC
701
702 (F) A function (or method) was called in a package which allows autoload,
703 but there is no function to autoload.  Most probable causes are a misprint
704 in a function/method name or a failure to C<AutoSplit> the file, say, by
705 doing C<make install>.
706
707 =item Can't locate %s in @INC
708
709 (F) You said to do (or require, or use) a file that couldn't be found
710 in any of the libraries mentioned in @INC.  Perhaps you need to set the
711 PERL5LIB or PERL5OPT environment variable to say where the extra library
712 is, or maybe the script needs to add the library name to @INC.  Or maybe
713 you just misspelled the name of the file.  See L<perlfunc/require>.
714
715 =item Can't locate object method "%s" via package "%s"
716
717 (F) You called a method correctly, and it correctly indicated a package
718 functioning as a class, but that package doesn't define that particular
719 method, nor does any of its base classes.  See L<perlobj>.
720
721 =item Can't locate package %s for @%s::ISA
722
723 (W) The @ISA array contained the name of another package that doesn't seem
724 to exist.
725
726 =item Can't make list assignment to \%ENV on this system
727
728 (F) List assignment to %ENV is not supported on some systems, notably VMS.
729
730 =item Can't modify %s in %s
731
732 (F) You aren't allowed to assign to the item indicated, or otherwise try to
733 change it, such as with an auto-increment.
734
735 =item Can't modify nonexistent substring
736
737 (P) The internal routine that does assignment to a substr() was handed
738 a NULL.
739
740 =item Can't msgrcv to read-only var
741
742 (F) The target of a msgrcv must be modifiable to be used as a receive
743 buffer.
744
745 =item Can't open %s: %s
746
747 (S) The implicit opening of a file through use of the C<E<lt>E<gt>>
748 filehandle, either implicitly under the C<-n> or C<-p> command-line
749 switches, or explicitly, failed for the indicated reason.  Usually this
750 is because you don't have read permission for a file which you named
751 on the command line.
752
753 =item Can't open bidirectional pipe
754
755 (W) You tried to say C<open(CMD, "|cmd|")>, which is not supported.  You can
756 try any of several modules in the Perl library to do this, such as
757 IPC::Open2.  Alternately, direct the pipe's output to a file using "E<gt>",
758 and then read it in under a different file handle.
759
760 =item Can't open error file %s as stderr
761
762 (F) An error peculiar to VMS.  Perl does its own command line redirection, and
763 couldn't open the file specified after '2E<gt>' or '2E<gt>E<gt>' on the
764 command line for writing.
765
766 =item Can't open input file %s as stdin
767
768 (F) An error peculiar to VMS.  Perl does its own command line redirection, and
769 couldn't open the file specified after 'E<lt>' on the command line for reading.
770
771 =item Can't open output file %s as stdout
772
773 (F) An error peculiar to VMS.  Perl does its own command line redirection, and
774 couldn't open the file specified after 'E<gt>' or 'E<gt>E<gt>' on the command
775 line for writing.
776
777 =item Can't open output pipe (name: %s)
778
779 (P) An error peculiar to VMS.  Perl does its own command line redirection, and
780 couldn't open the pipe into which to send data destined for stdout.
781
782 =item Can't open perl script "%s": %s
783
784 (F) The script you specified can't be opened for the indicated reason.
785
786 =item Can't redefine active sort subroutine %s
787
788 (F) Perl optimizes the internal handling of sort subroutines and keeps
789 pointers into them.  You tried to redefine one such sort subroutine when it
790 was currently active, which is not allowed.  If you really want to do
791 this, you should write C<sort { &func } @x> instead of C<sort func @x>.
792
793 =item Can't rename %s to %s: %s, skipping file
794
795 (S) The rename done by the B<-i> switch failed for some reason, probably because
796 you don't have write permission to the directory.
797
798 =item Can't reopen input pipe (name: %s) in binary mode
799
800 (P) An error peculiar to VMS.  Perl thought stdin was a pipe, and tried to
801 reopen it to accept binary data.  Alas, it failed.
802
803 =item Can't reswap uid and euid
804
805 (P) The setreuid() call failed for some reason in the setuid emulator
806 of suidperl.
807
808 =item Can't return outside a subroutine
809
810 (F) The return statement was executed in mainline code, that is, where
811 there was no subroutine call to return out of.  See L<perlsub>.
812
813 =item Can't stat script "%s"
814
815 (P) For some reason you can't fstat() the script even though you have
816 it open already.  Bizarre.
817
818 =item Can't swap uid and euid
819
820 (P) The setreuid() call failed for some reason in the setuid emulator
821 of suidperl.
822
823 =item Can't take log of %g
824
825 (F) For ordinary real numbers, you can't take the logarithm of a
826 negative number or zero. There's a Math::Complex package that comes
827 standard with Perl, though, if you really want to do that for
828 the negative numbers.
829
830 =item Can't take sqrt of %g
831
832 (F) For ordinary real numbers, you can't take the square root of a
833 negative number.  There's a Math::Complex package that comes standard
834 with Perl, though, if you really want to do that.
835
836 =item Can't undef active subroutine
837
838 (F) You can't undefine a routine that's currently running.  You can,
839 however, redefine it while it's running, and you can even undef the
840 redefined subroutine while the old routine is running.  Go figure.
841
842 =item Can't unshift
843
844 (F) You tried to unshift an "unreal" array that can't be unshifted, such
845 as the main Perl stack.
846
847 =item Can't upgrade that kind of scalar
848
849 (P) The internal sv_upgrade routine adds "members" to an SV, making
850 it into a more specialized kind of SV.  The top several SV types are
851 so specialized, however, that they cannot be interconverted.  This
852 message indicates that such a conversion was attempted.
853
854 =item Can't upgrade to undef
855
856 (P) The undefined SV is the bottom of the totem pole, in the scheme
857 of upgradability.  Upgrading to undef indicates an error in the
858 code calling sv_upgrade.
859
860 =item Can't use %%! because Errno.pm is not available
861
862 (F) The first time the %! hash is used, perl automatically loads the
863 Errno.pm module. The Errno module is expected to tie the %! hash to
864 provide symbolic names for C<$!> errno values.
865
866 =item Can't use "my %s" in sort comparison
867
868 (F) The global variables $a and $b are reserved for sort comparisons.
869 You mentioned $a or $b in the same line as the E<lt>=E<gt> or cmp operator,
870 and the variable had earlier been declared as a lexical variable.
871 Either qualify the sort variable with the package name, or rename the
872 lexical variable.
873
874 =item Can't use %s for loop variable
875
876 (F) Only a simple scalar variable may be used as a loop variable on a foreach.
877
878 =item Can't use %s ref as %s ref
879
880 (F) You've mixed up your reference types.  You have to dereference a
881 reference of the type needed.  You can use the ref() function to
882 test the type of the reference, if need be.
883
884 =item Can't use \1 to mean $1 in expression
885
886 (W) In an ordinary expression, backslash is a unary operator that creates
887 a reference to its argument.  The use of backslash to indicate a backreference
888 to a matched substring is valid only as part of a regular expression pattern.
889 Trying to do this in ordinary Perl code produces a value that prints
890 out looking like SCALAR(0xdecaf).  Use the $1 form instead.
891
892 =item Can't use bareword ("%s") as %s ref while \"strict refs\" in use
893
894 (F) Only hard references are allowed by "strict refs".  Symbolic references
895 are disallowed.  See L<perlref>.
896
897 =item Can't use string ("%s") as %s ref while "strict refs" in use
898
899 (F) Only hard references are allowed by "strict refs".  Symbolic references
900 are disallowed.  See L<perlref>.
901
902 =item Can't use an undefined value as %s reference
903
904 (F) A value used as either a hard reference or a symbolic reference must
905 be a defined value.  This helps to delurk some insidious errors.
906
907 =item Can't use global %s in "my"
908
909 (F) You tried to declare a magical variable as a lexical variable.  This is
910 not allowed, because the magic can be tied to only one location (namely
911 the global variable) and it would be incredibly confusing to have
912 variables in your program that looked like magical variables but
913 weren't.
914
915 =item Can't use subscript on %s
916
917 (F) The compiler tried to interpret a bracketed expression as a
918 subscript.  But to the left of the brackets was an expression that
919 didn't look like an array reference, or anything else subscriptable.
920
921 =item Can't x= to read-only value
922
923 (F) You tried to repeat a constant value (often the undefined value) with
924 an assignment operator, which implies modifying the value itself.
925 Perhaps you need to copy the value to a temporary, and repeat that.
926
927 =item Cannot find an opnumber for "%s"
928
929 (F) A string of a form C<CORE::word> was given to prototype(), but
930 there is no builtin with the name C<word>.
931
932 =item Cannot resolve method `%s' overloading `%s' in package `%s'
933
934 (F|P) Error resolving overloading specified by a method name (as
935 opposed to a subroutine reference): no such method callable via the
936 package. If method name is C<???>, this is an internal error.
937
938 =item Character class syntax [. .] is reserved for future extensions
939
940 (W) Within regular expression character classes ([]) the syntax beginning
941 with "[." and ending with ".]" is reserved for future extensions.
942 If you need to represent those character sequences inside a regular
943 expression character class, just quote the square brackets with the
944 backslash: "\[." and ".\]".
945
946 =item Character class syntax [: :] is reserved for future extensions
947
948 (W) Within regular expression character classes ([]) the syntax beginning
949 with "[:" and ending with ":]" is reserved for future extensions.
950 If you need to represent those character sequences inside a regular
951 expression character class, just quote the square brackets with the
952 backslash: "\[:" and ":\]".
953
954 =item Character class syntax [= =] is reserved for future extensions
955
956 (W) Within regular expression character classes ([]) the syntax
957 beginning with "[=" and ending with "=]" is reserved for future extensions.
958 If you need to represent those character sequences inside a regular
959 expression character class, just quote the square brackets with the
960 backslash: "\[=" and "=\]".
961
962 =item chmod: mode argument is missing initial 0
963
964 (W) A novice will sometimes say
965
966     chmod 777, $filename
967
968 not realizing that 777 will be interpreted as a decimal number, equivalent
969 to 01411.  Octal constants are introduced with a leading 0 in Perl, as in C.
970
971 =item Close on unopened file E<lt>%sE<gt>
972
973 (W) You tried to close a filehandle that was never opened.
974
975 =item Compilation failed in require
976
977 (F) Perl could not compile a file specified in a C<require> statement.
978 Perl uses this generic message when none of the errors that it encountered
979 were severe enough to halt compilation immediately.
980
981 =item connect() on closed fd
982
983 (W) You tried to do a connect on a closed socket.  Did you forget to check
984 the return value of your socket() call?  See L<perlfunc/connect>.
985
986 =item Constant subroutine %s redefined
987
988 (S) You redefined a subroutine which had previously been eligible for
989 inlining.  See L<perlsub/"Constant Functions"> for commentary and
990 workarounds.
991
992 =item Constant subroutine %s undefined
993
994 (S) You undefined a subroutine which had previously been eligible for
995 inlining.  See L<perlsub/"Constant Functions"> for commentary and
996 workarounds.
997
998 =item Copy method did not return a reference
999
1000 (F) The method which overloads "=" is buggy. See L<overload/Copy Constructor>.
1001
1002 =item Corrupt malloc ptr 0x%lx at 0x%lx
1003
1004 (P) The malloc package that comes with Perl had an internal failure.
1005
1006 =item corrupted regexp pointers
1007
1008 (P) The regular expression engine got confused by what the regular
1009 expression compiler gave it.
1010
1011 =item corrupted regexp program
1012
1013 (P) The regular expression engine got passed a regexp program without
1014 a valid magic number.
1015
1016 =item Deep recursion on subroutine "%s"
1017
1018 (W) This subroutine has called itself (directly or indirectly) 100
1019 times more than it has returned.  This probably indicates an infinite
1020 recursion, unless you're writing strange benchmark programs, in which
1021 case it indicates something else.
1022
1023 =item Delimiter for here document is too long
1024
1025 (F) In a here document construct like C<E<lt>E<lt>FOO>, the label
1026 C<FOO> is too long for Perl to handle.  You have to be seriously
1027 twisted to write code that triggers this error.
1028
1029 =item Did you mean &%s instead?
1030
1031 (W) You probably referred to an imported subroutine &FOO as $FOO or some such.
1032
1033 =item Did you mean $ or @ instead of %?
1034
1035 (W) You probably said %hash{$key} when you meant $hash{$key} or @hash{@keys}.
1036 On the other hand, maybe you just meant %hash and got carried away.
1037
1038 =item Died
1039
1040 (F) You passed die() an empty string (the equivalent of C<die "">) or
1041 you called it with no args and both C<$@> and C<$_> were empty.
1042
1043 =item Do you need to predeclare %s?
1044
1045 (S) This is an educated guess made in conjunction with the message "%s
1046 found where operator expected".  It often means a subroutine or module
1047 name is being referenced that hasn't been declared yet.  This may be
1048 because of ordering problems in your file, or because of a missing
1049 "sub", "package", "require", or "use" statement.  If you're
1050 referencing something that isn't defined yet, you don't actually have
1051 to define the subroutine or package before the current location.  You
1052 can use an empty "sub foo;" or "package FOO;" to enter a "forward"
1053 declaration.
1054
1055 =item Don't know how to handle magic of type '%s'
1056
1057 (P) The internal handling of magical variables has been cursed.
1058
1059 =item do_study: out of memory
1060
1061 (P) This should have been caught by safemalloc() instead.
1062
1063 =item Duplicate free() ignored
1064
1065 (S) An internal routine called free() on something that had already
1066 been freed.
1067
1068 =item elseif should be elsif
1069
1070 (S) There is no keyword "elseif" in Perl because Larry thinks it's
1071 ugly.  Your code will be interpreted as an attempt to call a method
1072 named "elseif" for the class returned by the following block.  This is
1073 unlikely to be what you want.
1074
1075 =item END failed--cleanup aborted
1076
1077 (F) An untrapped exception was raised while executing an END subroutine.
1078 The interpreter is immediately exited.
1079
1080 =item Error converting file specification %s
1081
1082 (F) An error peculiar to VMS.  Because Perl may have to deal with file
1083 specifications in either VMS or Unix syntax, it converts them to a
1084 single form when it must operate on them directly.  Either you've
1085 passed an invalid file specification to Perl, or you've found a
1086 case the conversion routines don't handle.  Drat.
1087
1088 =item %s: Eval-group in insecure regular expression
1089
1090 (F) Perl detected tainted data when trying to compile a regular expression
1091 that contains the C<(?{ ... })> zero-width assertion, which is unsafe.
1092 See L<perlre/(?{ code })>, and L<perlsec>.
1093
1094 =item %s: Eval-group not allowed, use re 'eval'
1095
1096 (F) A regular expression contained the C<(?{ ... })> zero-width assertion,
1097 but that construct is only allowed when the C<use re 'eval'> pragma is
1098 in effect.  See L<perlre/(?{ code })>.
1099
1100 =item %s: Eval-group not allowed at run time
1101
1102 (F) Perl tried to compile a regular expression containing the C<(?{ ... })>
1103 zero-width assertion at run time, as it would when the pattern contains
1104 interpolated values.  Since that is a security risk, it is not allowed.
1105 If you insist, you may still do this by explicitly building the pattern
1106 from an interpolated string at run time and using that in an eval().
1107 See L<perlre/(?{ code })>.
1108
1109 =item Excessively long <> operator
1110
1111 (F) The contents of a <> operator may not exceed the maximum size of a
1112 Perl identifier.  If you're just trying to glob a long list of
1113 filenames, try using the glob() operator, or put the filenames into a
1114 variable and glob that.
1115
1116 =item Execution of %s aborted due to compilation errors
1117
1118 (F) The final summary message when a Perl compilation fails.
1119
1120 =item Exiting eval via %s
1121
1122 (W) You are exiting an eval by unconventional means, such as
1123 a goto, or a loop control statement.
1124
1125 =item Exiting pseudo-block via %s
1126
1127 (W) You are exiting a rather special block construct (like a sort block or
1128 subroutine) by unconventional means, such as a goto, or a loop control
1129 statement.  See L<perlfunc/sort>.
1130
1131 =item Exiting subroutine via %s
1132
1133 (W) You are exiting a subroutine by unconventional means, such as
1134 a goto, or a loop control statement.
1135
1136 =item Exiting substitution via %s
1137
1138 (W) You are exiting a substitution by unconventional means, such as
1139 a return, a goto, or a loop control statement.
1140
1141 =item Explicit blessing to '' (assuming package main)
1142
1143 (W) You are blessing a reference to a zero length string.  This has
1144 the effect of blessing the reference into the package main.  This is
1145 usually not what you want.  Consider providing a default target
1146 package, e.g. bless($ref, $p or 'MyPackage');
1147
1148 =item Fatal VMS error at %s, line %d
1149
1150 (P) An error peculiar to VMS.  Something untoward happened in a VMS system
1151 service or RTL routine; Perl's exit status should provide more details.  The
1152 filename in "at %s" and the line number in "line %d" tell you which section of
1153 the Perl source code is distressed.
1154
1155 =item fcntl is not implemented
1156
1157 (F) Your machine apparently doesn't implement fcntl().  What is this, a
1158 PDP-11 or something?
1159
1160 =item Filehandle %s never opened
1161
1162 (W) An I/O operation was attempted on a filehandle that was never initialized.
1163 You need to do an open() or a socket() call, or call a constructor from
1164 the FileHandle package.
1165
1166 =item Filehandle %s opened for only input
1167
1168 (W) You tried to write on a read-only filehandle.  If you
1169 intended it to be a read-write filehandle, you needed to open it with
1170 "+E<lt>" or "+E<gt>" or "+E<gt>E<gt>" instead of with "E<lt>" or nothing.  If
1171 you intended only to write the file, use "E<gt>" or "E<gt>E<gt>".  See
1172 L<perlfunc/open>.
1173
1174 =item Filehandle opened for only input
1175
1176 (W) You tried to write on a read-only filehandle.  If you
1177 intended it to be a read-write filehandle, you needed to open it with
1178 "+E<lt>" or "+E<gt>" or "+E<gt>E<gt>" instead of with "E<lt>" or nothing.  If
1179 you intended only to write the file, use "E<gt>" or "E<gt>E<gt>".  See
1180 L<perlfunc/open>.
1181
1182 =item Final $ should be \$ or $name
1183
1184 (F) You must now decide whether the final $ in a string was meant to be
1185 a literal dollar sign, or was meant to introduce a variable name
1186 that happens to be missing.  So you have to put either the backslash or
1187 the name.
1188
1189 =item Final @ should be \@ or @name
1190
1191 (F) You must now decide whether the final @ in a string was meant to be
1192 a literal "at" sign, or was meant to introduce a variable name
1193 that happens to be missing.  So you have to put either the backslash or
1194 the name.
1195
1196 =item Format %s redefined
1197
1198 (W) You redefined a format.  To suppress this warning, say
1199
1200     {
1201         local $^W = 0;
1202         eval "format NAME =...";
1203     }
1204
1205 =item Format not terminated
1206
1207 (F) A format must be terminated by a line with a solitary dot.  Perl got
1208 to the end of your file without finding such a line.
1209
1210 =item Found = in conditional, should be ==
1211
1212 (W) You said
1213
1214     if ($foo = 123)
1215
1216 when you meant
1217
1218     if ($foo == 123)
1219
1220 (or something like that).
1221
1222 =item gdbm store returned %d, errno %d, key "%s"
1223
1224 (S) A warning from the GDBM_File extension that a store failed.
1225
1226 =item gethostent not implemented
1227
1228 (F) Your C library apparently doesn't implement gethostent(), probably
1229 because if it did, it'd feel morally obligated to return every hostname
1230 on the Internet.
1231
1232 =item get{sock,peer}name() on closed fd
1233
1234 (W) You tried to get a socket or peer socket name on a closed socket.
1235 Did you forget to check the return value of your socket() call?
1236
1237 =item getpwnam returned invalid UIC %#o for user "%s"
1238
1239 (S) A warning peculiar to VMS.  The call to C<sys$getuai> underlying the
1240 C<getpwnam> operator returned an invalid UIC.
1241
1242
1243 =item Glob not terminated
1244
1245 (F) The lexer saw a left angle bracket in a place where it was expecting
1246 a term, so it's looking for the corresponding right angle bracket, and not
1247 finding it.  Chances are you left some needed parentheses out earlier in
1248 the line, and you really meant a "less than".
1249
1250 =item Global symbol "%s" requires explicit package name
1251
1252 (F) You've said "use strict vars", which indicates that all variables
1253 must either be lexically scoped (using "my"), or explicitly qualified to
1254 say which package the global variable is in (using "::").
1255
1256 =item goto must have label
1257
1258 (F) Unlike with "next" or "last", you're not allowed to goto an
1259 unspecified destination.  See L<perlfunc/goto>.
1260
1261 =item Had to create %s unexpectedly
1262
1263 (S) A routine asked for a symbol from a symbol table that ought to have
1264 existed already, but for some reason it didn't, and had to be created on
1265 an emergency basis to prevent a core dump.
1266
1267 =item Hash %%s missing the % in argument %d of %s()
1268
1269 (D) Really old Perl let you omit the % on hash names in some spots.  This
1270 is now heavily deprecated.
1271
1272 =item Identifier too long
1273
1274 (F) Perl limits identifiers (names for variables, functions, etc.) to
1275 about 250 characters for simple names, and somewhat more for compound
1276 names (like C<$A::B>).  You've exceeded Perl's limits.  Future
1277 versions of Perl are likely to eliminate these arbitrary limitations.
1278
1279 =item Ill-formed logical name |%s| in prime_env_iter
1280
1281 (W) A warning peculiar to VMS.  A logical name was encountered when preparing
1282 to iterate over %ENV which violates the syntactic rules governing logical
1283 names.  Because it cannot be translated normally, it is skipped, and will not
1284 appear in %ENV.  This may be a benign occurrence, as some software packages
1285 might directly modify logical name tables and introduce nonstandard names,
1286 or it may indicate that a logical name table has been corrupted.
1287
1288 =item Illegal character %s (carriage return)
1289
1290 (F) A carriage return character was found in the input.  This is an
1291 error, and not a warning, because carriage return characters can break
1292 multi-line strings, including here documents (e.g., C<print E<lt>E<lt>EOF;>).
1293
1294 Under Unix, this error is usually caused by executing Perl code --
1295 either the main program, a module, or an eval'd string -- that was
1296 transferred over a network connection from a non-Unix system without
1297 properly converting the text file format.
1298
1299 Under systems that use something other than '\n' to delimit lines of
1300 text, this error can also be caused by reading Perl code from a file
1301 handle that is in binary mode (as set by the C<binmode> operator).
1302
1303 In either case, the Perl code in question will probably need to be
1304 converted with something like C<s/\x0D\x0A?/\n/g> before it can be
1305 executed.
1306
1307 =item Illegal division by zero
1308
1309 (F) You tried to divide a number by 0.  Either something was wrong in your
1310 logic, or you need to put a conditional in to guard against meaningless input.
1311
1312 =item Illegal modulus zero
1313
1314 (F) You tried to divide a number by 0 to get the remainder.  Most numbers
1315 don't take to this kindly.
1316
1317 =item Illegal octal digit
1318
1319 (F) You used an 8 or 9 in a octal number.
1320
1321 =item Illegal octal digit ignored
1322
1323 (W) You may have tried to use an 8 or 9 in a octal number.  Interpretation
1324 of the octal number stopped before the 8 or 9.
1325
1326 =item Illegal hex digit ignored
1327
1328 (W) You may have tried to use a character other than 0 - 9 or A - F in a
1329 hexadecimal number.  Interpretation of the hexadecimal number stopped
1330 before the illegal character.
1331
1332 =item Illegal switch in PERL5OPT: %s
1333
1334 (X) The PERL5OPT environment variable may only be used to set the
1335 following switches: B<-[DIMUdmw]>.
1336
1337 =item In string, @%s now must be written as \@%s
1338
1339 (F) It used to be that Perl would try to guess whether you wanted an
1340 array interpolated or a literal @.  It did this when the string was first
1341 used at runtime.  Now strings are parsed at compile time, and ambiguous
1342 instances of @ must be disambiguated, either by prepending a backslash to
1343 indicate a literal, or by declaring (or using) the array within the
1344 program before the string (lexically).  (Someday it will simply assume
1345 that an unbackslashed @ interpolates an array.)
1346
1347 =item Insecure dependency in %s
1348
1349 (F) You tried to do something that the tainting mechanism didn't like.
1350 The tainting mechanism is turned on when you're running setuid or setgid,
1351 or when you specify B<-T> to turn it on explicitly.  The tainting mechanism
1352 labels all data that's derived directly or indirectly from the user,
1353 who is considered to be unworthy of your trust.  If any such data is
1354 used in a "dangerous" operation, you get this error.  See L<perlsec>
1355 for more information.
1356
1357 =item Insecure directory in %s
1358
1359 (F) You can't use system(), exec(), or a piped open in a setuid or setgid
1360 script if C<$ENV{PATH}> contains a directory that is writable by the world.
1361 See L<perlsec>.
1362
1363 =item Insecure $ENV{%s} while running %s
1364
1365 (F) You can't use system(), exec(), or a piped open in a setuid or
1366 setgid script if any of C<$ENV{PATH}>, C<$ENV{IFS}>, C<$ENV{CDPATH}>,
1367 C<$ENV{ENV}> or C<$ENV{BASH_ENV}> are derived from data supplied (or
1368 potentially supplied) by the user.  The script must set the path to a
1369 known value, using trustworthy data.  See L<perlsec>.
1370
1371 =item Integer overflow in hex number
1372
1373 (S) The literal hex number you have specified is too big for your
1374 architecture. On a 32-bit architecture the largest hex literal is
1375 0xFFFFFFFF.
1376
1377 =item Integer overflow in octal number
1378
1379 (S) The literal octal number you have specified is too big for your
1380 architecture. On a 32-bit architecture the largest octal literal is
1381 037777777777.
1382
1383 =item Internal inconsistency in tracking vforks
1384
1385 (S) A warning peculiar to VMS.  Perl keeps track of the number
1386 of times you've called C<fork> and C<exec>, to determine
1387 whether the current call to C<exec> should affect the current
1388 script or a subprocess (see L<perlvms/exec>).  Somehow, this count
1389 has become scrambled, so Perl is making a guess and treating
1390 this C<exec> as a request to terminate the Perl script
1391 and execute the specified command.
1392
1393 =item internal disaster in regexp
1394
1395 (P) Something went badly wrong in the regular expression parser.
1396
1397 =item internal error: glob failed
1398
1399 (P) Something went wrong with the external program(s) used for C<glob>
1400 and C<E<lt>*.cE<gt>>.  This may mean that your csh (C shell) is
1401 broken.  If so, you should change all of the csh-related variables in
1402 config.sh:  If you have tcsh, make the variables refer to it as if it
1403 were csh (e.g. C<full_csh='/usr/bin/tcsh'>); otherwise, make them all
1404 empty (except that C<d_csh> should be C<'undef'>) so that Perl will
1405 think csh is missing.  In either case, after editing config.sh, run
1406 C<./Configure -S> and rebuild Perl.
1407
1408 =item internal urp in regexp at /%s/
1409
1410 (P) Something went badly awry in the regular expression parser.
1411
1412 =item invalid [] range in regexp
1413
1414 (F) The range specified in a character class had a minimum character
1415 greater than the maximum character.  See L<perlre>.
1416
1417 =item Invalid conversion in %s: "%s"
1418
1419 (W) Perl does not understand the given format conversion.
1420 See L<perlfunc/sprintf>.
1421
1422 =item Invalid type in pack: '%s'
1423
1424 (F) The given character is not a valid pack type.  See L<perlfunc/pack>.
1425 (W) The given character is not a valid pack type but used to be silently
1426 ignored.
1427
1428 =item Invalid type in unpack: '%s'
1429
1430 (F) The given character is not a valid unpack type.  See L<perlfunc/unpack>.
1431 (W) The given character is not a valid unpack type but used to be silently
1432 ignored.
1433
1434 =item ioctl is not implemented
1435
1436 (F) Your machine apparently doesn't implement ioctl(), which is pretty
1437 strange for a machine that supports C.
1438
1439 =item junk on end of regexp
1440
1441 (P) The regular expression parser is confused.
1442
1443 =item Label not found for "last %s"
1444
1445 (F) You named a loop to break out of, but you're not currently in a
1446 loop of that name, not even if you count where you were called from.
1447 See L<perlfunc/last>.
1448
1449 =item Label not found for "next %s"
1450
1451 (F) You named a loop to continue, but you're not currently in a loop of
1452 that name, not even if you count where you were called from.  See
1453 L<perlfunc/last>.
1454
1455 =item Label not found for "redo %s"
1456
1457 (F) You named a loop to restart, but you're not currently in a loop of
1458 that name, not even if you count where you were called from.  See
1459 L<perlfunc/last>.
1460
1461 =item listen() on closed fd
1462
1463 (W) You tried to do a listen on a closed socket.  Did you forget to check
1464 the return value of your socket() call?  See L<perlfunc/listen>.
1465
1466 =item Method for operation %s not found in package %s during blessing
1467
1468 (F) An attempt was made to specify an entry in an overloading table that
1469 doesn't resolve to a valid subroutine.  See L<overload>.
1470
1471 =item Might be a runaway multi-line %s string starting on line %d
1472
1473 (S) An advisory indicating that the previous error may have been caused
1474 by a missing delimiter on a string or pattern, because it eventually
1475 ended earlier on the current line.
1476
1477 =item Misplaced _ in number
1478
1479 (W) An underline in a decimal constant wasn't on a 3-digit boundary.
1480
1481 =item Missing $ on loop variable
1482
1483 (F) Apparently you've been programming in B<csh> too much.  Variables are always
1484 mentioned with the $ in Perl, unlike in the shells, where it can vary from
1485 one line to the next.
1486
1487 =item Missing comma after first argument to %s function
1488
1489 (F) While certain functions allow you to specify a filehandle or an
1490 "indirect object" before the argument list, this ain't one of them.
1491
1492 =item Missing operator before %s?
1493
1494 (S) This is an educated guess made in conjunction with the message "%s
1495 found where operator expected".  Often the missing operator is a comma.
1496
1497 =item Missing right bracket
1498
1499 (F) The lexer counted more opening curly brackets (braces) than closing ones.
1500 As a general rule, you'll find it's missing near the place you were last
1501 editing.
1502
1503 =item Modification of a read-only value attempted
1504
1505 (F) You tried, directly or indirectly, to change the value of a
1506 constant.  You didn't, of course, try "2 = 1", because the compiler
1507 catches that.  But an easy way to do the same thing is:
1508
1509     sub mod { $_[0] = 1 }
1510     mod(2);
1511
1512 Another way is to assign to a substr() that's off the end of the string.
1513
1514 =item Modification of noncreatable array value attempted, subscript %d
1515
1516 (F) You tried to make an array value spring into existence, and the
1517 subscript was probably negative, even counting from end of the array
1518 backwards.
1519
1520 =item Modification of noncreatable hash value attempted, subscript "%s"
1521
1522 (F) You tried to make a hash value spring into existence, and it couldn't
1523 be created for some peculiar reason.
1524
1525 =item Module name must be constant
1526
1527 (F) Only a bare module name is allowed as the first argument to a "use".
1528
1529 =item msg%s not implemented
1530
1531 (F) You don't have System V message IPC on your system.
1532
1533 =item Multidimensional syntax %s not supported
1534
1535 (W) Multidimensional arrays aren't written like C<$foo[1,2,3]>.  They're written
1536 like C<$foo[1][2][3]>, as in C.
1537
1538 =item Name "%s::%s" used only once: possible typo
1539
1540 (W) Typographical errors often show up as unique variable names.
1541 If you had a good reason for having a unique name, then just mention
1542 it again somehow to suppress the message.  The C<use vars> pragma is
1543 provided for just this purpose.
1544
1545 =item Negative length
1546
1547 (F) You tried to do a read/write/send/recv operation with a buffer length
1548 that is less than 0.  This is difficult to imagine.
1549
1550 =item nested *?+ in regexp
1551
1552 (F) You can't quantify a quantifier without intervening parentheses.  So
1553 things like ** or +* or ?* are illegal.
1554
1555 Note, however, that the minimal matching quantifiers, C<*?>, C<+?>, and C<??> appear
1556 to be nested quantifiers, but aren't.  See L<perlre>.
1557
1558 =item No #! line
1559
1560 (F) The setuid emulator requires that scripts have a well-formed #! line
1561 even on machines that don't support the #! construct.
1562
1563 =item No %s allowed while running setuid
1564
1565 (F) Certain operations are deemed to be too insecure for a setuid or setgid
1566 script to even be allowed to attempt.  Generally speaking there will be
1567 another way to do what you want that is, if not secure, at least securable.
1568 See L<perlsec>.
1569
1570 =item No B<-e> allowed in setuid scripts
1571
1572 (F) A setuid script can't be specified by the user.
1573
1574 =item No comma allowed after %s
1575
1576 (F) A list operator that has a filehandle or "indirect object" is not
1577 allowed to have a comma between that and the following arguments.
1578 Otherwise it'd be just another one of the arguments.
1579
1580 One possible cause for this is that you expected to have imported a
1581 constant to your name space with B<use> or B<import> while no such
1582 importing took place, it may for example be that your operating system
1583 does not support that particular constant. Hopefully you did use an
1584 explicit import list for the constants you expect to see, please see
1585 L<perlfunc/use> and L<perlfunc/import>. While an explicit import list
1586 would probably have caught this error earlier it naturally does not
1587 remedy the fact that your operating system still does not support that
1588 constant. Maybe you have a typo in the constants of the symbol import
1589 list of B<use> or B<import> or in the constant name at the line where
1590 this error was triggered?
1591
1592 =item No command into which to pipe on command line
1593
1594 (F) An error peculiar to VMS.  Perl handles its own command line redirection,
1595 and found a '|' at the end of the command line, so it doesn't know where you
1596 want to pipe the output from this command.
1597
1598 =item No DB::DB routine defined
1599
1600 (F) The currently executing code was compiled with the B<-d> switch,
1601 but for some reason the perl5db.pl file (or some facsimile thereof)
1602 didn't define a routine to be called at the beginning of each
1603 statement.  Which is odd, because the file should have been required
1604 automatically, and should have blown up the require if it didn't parse
1605 right.
1606
1607 =item No dbm on this machine
1608
1609 (P) This is counted as an internal error, because every machine should
1610 supply dbm nowadays, because Perl comes with SDBM.  See L<SDBM_File>.
1611
1612 =item No DBsub routine
1613
1614 (F) The currently executing code was compiled with the B<-d> switch,
1615 but for some reason the perl5db.pl file (or some facsimile thereof)
1616 didn't define a DB::sub routine to be called at the beginning of each
1617 ordinary subroutine call.
1618
1619 =item No error file after 2E<gt> or 2E<gt>E<gt> on command line
1620
1621 (F) An error peculiar to VMS.  Perl handles its own command line redirection,
1622 and found a '2E<gt>' or a '2E<gt>E<gt>' on the command line, but can't find
1623 the name of the file to which to write data destined for stderr.
1624
1625 =item No input file after E<lt> on command line
1626
1627 (F) An error peculiar to VMS.  Perl handles its own command line redirection,
1628 and found a 'E<lt>' on the command line, but can't find the name of the file
1629 from which to read data for stdin.
1630
1631 =item No output file after E<gt> on command line
1632
1633 (F) An error peculiar to VMS.  Perl handles its own command line redirection,
1634 and found a lone 'E<gt>' at the end of the command line, so it doesn't know
1635 where you wanted to redirect stdout.
1636
1637 =item No output file after E<gt> or E<gt>E<gt> on command line
1638
1639 (F) An error peculiar to VMS.  Perl handles its own command line redirection,
1640 and found a 'E<gt>' or a 'E<gt>E<gt>' on the command line, but can't find the
1641 name of the file to which to write data destined for stdout.
1642
1643 =item No Perl script found in input
1644
1645 (F) You called C<perl -x>, but no line was found in the file beginning
1646 with #! and containing the word "perl".
1647
1648 =item No setregid available
1649
1650 (F) Configure didn't find anything resembling the setregid() call for
1651 your system.
1652
1653 =item No setreuid available
1654
1655 (F) Configure didn't find anything resembling the setreuid() call for
1656 your system.
1657
1658 =item No space allowed after B<-I>
1659
1660 (F) The argument to B<-I> must follow the B<-I> immediately with no
1661 intervening space.
1662
1663 =item No such array field
1664
1665 (F) You tried to access an array as a hash, but the field name used is
1666 not defined.  The hash at index 0 should map all valid field names to
1667 array indices for that to work.
1668
1669 =item No such field "%s" in variable %s of type %s
1670
1671 (F) You tried to access a field of a typed variable where the type
1672 does not know about the field name.  The field names are looked up in
1673 the %FIELDS hash in the type package at compile time.  The %FIELDS hash
1674 is usually set up with the 'fields' pragma.
1675
1676 =item No such pipe open
1677
1678 (P) An error peculiar to VMS.  The internal routine my_pclose() tried to
1679 close a pipe which hadn't been opened.  This should have been caught earlier as
1680 an attempt to close an unopened filehandle.
1681
1682 =item No such signal: SIG%s
1683
1684 (W) You specified a signal name as a subscript to %SIG that was not recognized.
1685 Say C<kill -l> in your shell to see the valid signal names on your system.
1686
1687 =item Not a CODE reference
1688
1689 (F) Perl was trying to evaluate a reference to a code value (that is, a
1690 subroutine), but found a reference to something else instead.  You can
1691 use the ref() function to find out what kind of ref it really was.
1692 See also L<perlref>.
1693
1694 =item Not a format reference
1695
1696 (F) I'm not sure how you managed to generate a reference to an anonymous
1697 format, but this indicates you did, and that it didn't exist.
1698
1699 =item Not a GLOB reference
1700
1701 (F) Perl was trying to evaluate a reference to a "typeglob" (that is,
1702 a symbol table entry that looks like C<*foo>), but found a reference to
1703 something else instead.  You can use the ref() function to find out
1704 what kind of ref it really was.  See L<perlref>.
1705
1706 =item Not a HASH reference
1707
1708 (F) Perl was trying to evaluate a reference to a hash value, but
1709 found a reference to something else instead.  You can use the ref()
1710 function to find out what kind of ref it really was.  See L<perlref>.
1711
1712 =item Not a perl script
1713
1714 (F) The setuid emulator requires that scripts have a well-formed #! line
1715 even on machines that don't support the #! construct.  The line must
1716 mention perl.
1717
1718 =item Not a SCALAR reference
1719
1720 (F) Perl was trying to evaluate a reference to a scalar value, but
1721 found a reference to something else instead.  You can use the ref()
1722 function to find out what kind of ref it really was.  See L<perlref>.
1723
1724 =item Not a subroutine reference
1725
1726 (F) Perl was trying to evaluate a reference to a code value (that is, a
1727 subroutine), but found a reference to something else instead.  You can
1728 use the ref() function to find out what kind of ref it really was.
1729 See also L<perlref>.
1730
1731 =item Not a subroutine reference in overload table
1732
1733 (F) An attempt was made to specify an entry in an overloading table that
1734 doesn't somehow point to a valid subroutine.  See L<overload>.
1735
1736 =item Not an ARRAY reference
1737
1738 (F) Perl was trying to evaluate a reference to an array value, but
1739 found a reference to something else instead.  You can use the ref()
1740 function to find out what kind of ref it really was.  See L<perlref>.
1741
1742 =item Not enough arguments for %s
1743
1744 (F) The function requires more arguments than you specified.
1745
1746 =item Not enough format arguments
1747
1748 (W) A format specified more picture fields than the next line supplied.
1749 See L<perlform>.
1750
1751 =item Null filename used
1752
1753 (F) You can't require the null filename, especially because on many machines
1754 that means the current directory!  See L<perlfunc/require>.
1755
1756 =item Null picture in formline
1757
1758 (F) The first argument to formline must be a valid format picture
1759 specification.  It was found to be empty, which probably means you
1760 supplied it an uninitialized value.  See L<perlform>.
1761
1762 =item NULL OP IN RUN
1763
1764 (P) Some internal routine called run() with a null opcode pointer.
1765
1766 =item Null realloc
1767
1768 (P) An attempt was made to realloc NULL.
1769
1770 =item NULL regexp argument
1771
1772 (P) The internal pattern matching routines blew it big time.
1773
1774 =item NULL regexp parameter
1775
1776 (P) The internal pattern matching routines are out of their gourd.
1777
1778 =item Number too long
1779
1780 (F) Perl limits the representation of decimal numbers in programs to about
1781 about 250 characters.  You've exceeded that length.  Future versions of
1782 Perl are likely to eliminate this arbitrary limitation.  In the meantime,
1783 try using scientific notation (e.g. "1e6" instead of "1_000_000").
1784
1785 =item Odd number of elements in hash assignment
1786
1787 (S) You specified an odd number of elements to initialize a hash, which
1788 is odd, because hashes come in key/value pairs.
1789
1790 =item Offset outside string
1791
1792 (F) You tried to do a read/write/send/recv operation with an offset
1793 pointing outside the buffer.  This is difficult to imagine.
1794 The sole exception to this is that C<sysread()>ing past the buffer
1795 will extend the buffer and zero pad the new area.
1796
1797 =item oops: oopsAV
1798
1799 (S) An internal warning that the grammar is screwed up.
1800
1801 =item oops: oopsHV
1802
1803 (S) An internal warning that the grammar is screwed up.
1804
1805 =item Operation `%s': no method found, %s
1806
1807 (F) An attempt was made to perform an overloaded operation for which
1808 no handler was defined.  While some handlers can be autogenerated in
1809 terms of other handlers, there is no default handler for any
1810 operation, unless C<fallback> overloading key is specified to be
1811 true.  See L<overload>.
1812
1813 =item Operator or semicolon missing before %s
1814
1815 (S) You used a variable or subroutine call where the parser was
1816 expecting an operator.  The parser has assumed you really meant
1817 to use an operator, but this is highly likely to be incorrect.
1818 For example, if you say "*foo *foo" it will be interpreted as
1819 if you said "*foo * 'foo'".
1820
1821 =item Out of memory for yacc stack
1822
1823 (F) The yacc parser wanted to grow its stack so it could continue parsing,
1824 but realloc() wouldn't give it more memory, virtual or otherwise.
1825
1826 =item Out of memory during request for %s
1827
1828 (X|F) The malloc() function returned 0, indicating there was insufficient
1829 remaining memory (or virtual memory) to satisfy the request.
1830
1831 The request was judged to be small, so the possibility to trap it
1832 depends on the way perl was compiled.  By default it is not trappable.
1833 However, if compiled for this, Perl may use the contents of C<$^M> as
1834 an emergency pool after die()ing with this message.  In this case the
1835 error is trappable I<once>.
1836
1837 =item Out of memory during "large" request for %s
1838
1839 (F) The malloc() function returned 0, indicating there was insufficient
1840 remaining memory (or virtual memory) to satisfy the request. However,
1841 the request was judged large enough (compile-time default is 64K), so
1842 a possibility to shut down by trapping this error is granted.
1843
1844 =item Out of memory during ridiculously large request
1845
1846 (F) You can't allocate more than 2^31+"small amount" bytes.  This error
1847 is most likely to be caused by a typo in the Perl program. e.g., C<$arr[time]>
1848 instead of C<$arr[$time]>.
1849
1850 =item page overflow
1851
1852 (W) A single call to write() produced more lines than can fit on a page.
1853 See L<perlform>.
1854
1855 =item panic: ck_grep
1856
1857 (P) Failed an internal consistency check trying to compile a grep.
1858
1859 =item panic: ck_split
1860
1861 (P) Failed an internal consistency check trying to compile a split.
1862
1863 =item panic: corrupt saved stack index
1864
1865 (P) The savestack was requested to restore more localized values than there
1866 are in the savestack.
1867
1868 =item panic: die %s
1869
1870 (P) We popped the context stack to an eval context, and then discovered
1871 it wasn't an eval context.
1872
1873 =item panic: do_match
1874
1875 (P) The internal pp_match() routine was called with invalid operational data.
1876
1877 =item panic: do_split
1878
1879 (P) Something terrible went wrong in setting up for the split.
1880
1881 =item panic: do_subst
1882
1883 (P) The internal pp_subst() routine was called with invalid operational data.
1884
1885 =item panic: do_trans
1886
1887 (P) The internal do_trans() routine was called with invalid operational data.
1888
1889 =item panic: frexp
1890
1891 (P) The library function frexp() failed, making printf("%f") impossible.
1892
1893 =item panic: goto
1894
1895 (P) We popped the context stack to a context with the specified label,
1896 and then discovered it wasn't a context we know how to do a goto in.
1897
1898 =item panic: INTERPCASEMOD
1899
1900 (P) The lexer got into a bad state at a case modifier.
1901
1902 =item panic: INTERPCONCAT
1903
1904 (P) The lexer got into a bad state parsing a string with brackets.
1905
1906 =item panic: last
1907
1908 (P) We popped the context stack to a block context, and then discovered
1909 it wasn't a block context.
1910
1911 =item panic: leave_scope clearsv
1912
1913 (P) A writable lexical variable became read-only somehow within the scope.
1914
1915 =item panic: leave_scope inconsistency
1916
1917 (P) The savestack probably got out of sync.  At least, there was an
1918 invalid enum on the top of it.
1919
1920 =item panic: malloc
1921
1922 (P) Something requested a negative number of bytes of malloc.
1923
1924 =item panic: mapstart
1925
1926 (P) The compiler is screwed up with respect to the map() function.
1927
1928 =item panic: null array
1929
1930 (P) One of the internal array routines was passed a null AV pointer.
1931
1932 =item panic: pad_alloc
1933
1934 (P) The compiler got confused about which scratch pad it was allocating
1935 and freeing temporaries and lexicals from.
1936
1937 =item panic: pad_free curpad
1938
1939 (P) The compiler got confused about which scratch pad it was allocating
1940 and freeing temporaries and lexicals from.
1941
1942 =item panic: pad_free po
1943
1944 (P) An invalid scratch pad offset was detected internally.
1945
1946 =item panic: pad_reset curpad
1947
1948 (P) The compiler got confused about which scratch pad it was allocating
1949 and freeing temporaries and lexicals from.
1950
1951 =item panic: pad_sv po
1952
1953 (P) An invalid scratch pad offset was detected internally.
1954
1955 =item panic: pad_swipe curpad
1956
1957 (P) The compiler got confused about which scratch pad it was allocating
1958 and freeing temporaries and lexicals from.
1959
1960 =item panic: pad_swipe po
1961
1962 (P) An invalid scratch pad offset was detected internally.
1963
1964 =item panic: pp_iter
1965
1966 (P) The foreach iterator got called in a non-loop context frame.
1967
1968 =item panic: realloc
1969
1970 (P) Something requested a negative number of bytes of realloc.
1971
1972 =item panic: restartop
1973
1974 (P) Some internal routine requested a goto (or something like it), and
1975 didn't supply the destination.
1976
1977 =item panic: return
1978
1979 (P) We popped the context stack to a subroutine or eval context, and
1980 then discovered it wasn't a subroutine or eval context.
1981
1982 =item panic: scan_num
1983
1984 (P) scan_num() got called on something that wasn't a number.
1985
1986 =item panic: sv_insert
1987
1988 (P) The sv_insert() routine was told to remove more string than there
1989 was string.
1990
1991 =item panic: top_env
1992
1993 (P) The compiler attempted to do a goto, or something weird like that.
1994
1995 =item panic: yylex
1996
1997 (P) The lexer got into a bad state while processing a case modifier.
1998
1999 =item Parentheses missing around "%s" list
2000
2001 (W) You said something like
2002
2003     my $foo, $bar = @_;
2004
2005 when you meant
2006
2007     my ($foo, $bar) = @_;
2008
2009 Remember that "my" and "local" bind closer than comma.
2010
2011 =item Perl %3.3f required--this is only version %s, stopped
2012
2013 (F) The module in question uses features of a version of Perl more recent
2014 than the currently running version.  How long has it been since you upgraded,
2015 anyway?  See L<perlfunc/require>.
2016
2017 =item Permission denied
2018
2019 (F) The setuid emulator in suidperl decided you were up to no good.
2020
2021 =item pid %d not a child
2022
2023 (W) A warning peculiar to VMS.  Waitpid() was asked to wait for a process which
2024 isn't a subprocess of the current process.  While this is fine from VMS'
2025 perspective, it's probably not what you intended.
2026
2027 =item POSIX getpgrp can't take an argument
2028
2029 (F) Your C compiler uses POSIX getpgrp(), which takes no argument, unlike
2030 the BSD version, which takes a pid.
2031
2032 =item Possible attempt to put comments in qw() list
2033
2034 (W) qw() lists contain items separated by whitespace; as with literal
2035 strings, comment characters are not ignored, but are instead treated
2036 as literal data.  (You may have used different delimiters than the
2037 parentheses shown here; braces are also frequently used.)
2038
2039 You probably wrote something like this:
2040
2041     @list = qw(
2042         a # a comment
2043         b # another comment
2044     );
2045
2046 when you should have written this:
2047
2048     @list = qw(
2049         a
2050         b
2051     );
2052
2053 If you really want comments, build your list the
2054 old-fashioned way, with quotes and commas:
2055
2056     @list = (
2057         'a',    # a comment
2058         'b',    # another comment
2059     );
2060
2061 =item Possible attempt to separate words with commas
2062
2063 (W) qw() lists contain items separated by whitespace; therefore commas
2064 aren't needed to separate the items.  (You may have used different
2065 delimiters than the parentheses shown here; braces are also frequently
2066 used.)
2067
2068 You probably wrote something like this:
2069
2070     qw! a, b, c !;
2071
2072 which puts literal commas into some of the list items.  Write it without
2073 commas if you don't want them to appear in your data:
2074
2075     qw! a b c !;
2076
2077 =item Possible memory corruption: %s overflowed 3rd argument
2078
2079 (F) An ioctl() or fcntl() returned more than Perl was bargaining for.
2080 Perl guesses a reasonable buffer size, but puts a sentinel byte at the
2081 end of the buffer just in case.  This sentinel byte got clobbered, and
2082 Perl assumes that memory is now corrupted.  See L<perlfunc/ioctl>.
2083
2084 =item Precedence problem: open %s should be open(%s)
2085
2086 (S) The old irregular construct
2087
2088     open FOO || die;
2089
2090 is now misinterpreted as
2091
2092     open(FOO || die);
2093
2094 because of the strict regularization of Perl 5's grammar into unary
2095 and list operators.  (The old open was a little of both.)  You must
2096 put parentheses around the filehandle, or use the new "or" operator
2097 instead of "||".
2098
2099 =item print on closed filehandle %s
2100
2101 (W) The filehandle you're printing on got itself closed sometime before now.
2102 Check your logic flow.
2103
2104 =item printf on closed filehandle %s
2105
2106 (W) The filehandle you're writing to got itself closed sometime before now.
2107 Check your logic flow.
2108
2109 =item Probable precedence problem on %s
2110
2111 (W) The compiler found a bareword where it expected a conditional,
2112 which often indicates that an || or && was parsed as part of the
2113 last argument of the previous construct, for example:
2114
2115     open FOO || die;
2116
2117 =item Prototype mismatch: %s vs %s
2118
2119 (S) The subroutine being declared or defined had previously been declared
2120 or defined with a different function prototype.
2121
2122 =item Range iterator outside integer range
2123
2124 (F) One (or both) of the numeric arguments to the range operator ".."
2125 are outside the range which can be represented by integers internally.
2126 One possible workaround is to force Perl to use magical string
2127 increment by prepending "0" to your numbers.
2128
2129 =item Read on closed filehandle E<lt>%sE<gt>
2130
2131 (W) The filehandle you're reading from got itself closed sometime before now.
2132 Check your logic flow.
2133
2134 =item Reallocation too large: %lx
2135
2136 (F) You can't allocate more than 64K on an MS-DOS machine.
2137
2138 =item Recompile perl with B<-D>DEBUGGING to use B<-D> switch
2139
2140 (F) You can't use the B<-D> option unless the code to produce the
2141 desired output is compiled into Perl, which entails some overhead,
2142 which is why it's currently left out of your copy.
2143
2144 =item Recursive inheritance detected in package '%s'
2145
2146 (F) More than 100 levels of inheritance were used.  Probably indicates
2147 an unintended loop in your inheritance hierarchy.
2148
2149 =item Recursive inheritance detected while looking for method '%s' in package '%s'
2150
2151 (F) More than 100 levels of inheritance were encountered while invoking a
2152 method.  Probably indicates an unintended loop in your inheritance hierarchy.
2153
2154 =item Reference found where even-sized list expected
2155
2156 (W) You gave a single reference where Perl was expecting a list with
2157 an even number of elements (for assignment to a hash). This
2158 usually means that you used the anon hash constructor when you meant 
2159 to use parens. In any case, a hash requires key/value B<pairs>.
2160
2161     %hash = { one => 1, two => 2, };    # WRONG
2162     %hash = [ qw/ an anon array / ];    # WRONG
2163     %hash = ( one => 1, two => 2, );    # right
2164     %hash = qw( one 1 two 2 );                  # also fine
2165
2166 =item Reference miscount in sv_replace()
2167
2168 (W) The internal sv_replace() function was handed a new SV with a
2169 reference count of other than 1.
2170
2171 =item regexp *+ operand could be empty
2172
2173 (F) The part of the regexp subject to either the * or + quantifier
2174 could match an empty string.
2175
2176 =item regexp memory corruption
2177
2178 (P) The regular expression engine got confused by what the regular
2179 expression compiler gave it.
2180
2181 =item regexp out of space
2182
2183 (P) A "can't happen" error, because safemalloc() should have caught it earlier.
2184
2185 =item regexp too big
2186
2187 (F) The current implementation of regular expressions uses shorts as
2188 address offsets within a string.  Unfortunately this means that if
2189 the regular expression compiles to longer than 32767, it'll blow up.
2190 Usually when you want a regular expression this big, there is a better
2191 way to do it with multiple statements.  See L<perlre>.
2192
2193 =item Reversed %s= operator
2194
2195 (W) You wrote your assignment operator backwards.  The = must always
2196 comes last, to avoid ambiguity with subsequent unary operators.
2197
2198 =item Runaway format
2199
2200 (F) Your format contained the ~~ repeat-until-blank sequence, but it
2201 produced 200 lines at once, and the 200th line looked exactly like the
2202 199th line.  Apparently you didn't arrange for the arguments to exhaust
2203 themselves, either by using ^ instead of @ (for scalar variables), or by
2204 shifting or popping (for array variables).  See L<perlform>.
2205
2206 =item Scalar value @%s[%s] better written as $%s[%s]
2207
2208 (W) You've used an array slice (indicated by @) to select a single element of
2209 an array.  Generally it's better to ask for a scalar value (indicated by $).
2210 The difference is that C<$foo[&bar]> always behaves like a scalar, both when
2211 assigning to it and when evaluating its argument, while C<@foo[&bar]> behaves
2212 like a list when you assign to it, and provides a list context to its
2213 subscript, which can do weird things if you're expecting only one subscript.
2214
2215 On the other hand, if you were actually hoping to treat the array
2216 element as a list, you need to look into how references work, because
2217 Perl will not magically convert between scalars and lists for you.  See
2218 L<perlref>.
2219
2220 =item Scalar value @%s{%s} better written as $%s{%s}
2221
2222 (W) You've used a hash slice (indicated by @) to select a single element of
2223 a hash.  Generally it's better to ask for a scalar value (indicated by $).
2224 The difference is that C<$foo{&bar}> always behaves like a scalar, both when
2225 assigning to it and when evaluating its argument, while C<@foo{&bar}> behaves
2226 like a list when you assign to it, and provides a list context to its
2227 subscript, which can do weird things if you're expecting only one subscript.
2228
2229 On the other hand, if you were actually hoping to treat the hash
2230 element as a list, you need to look into how references work, because
2231 Perl will not magically convert between scalars and lists for you.  See
2232 L<perlref>.
2233
2234 =item Script is not setuid/setgid in suidperl
2235
2236 (F) Oddly, the suidperl program was invoked on a script without a setuid
2237 or setgid bit set.  This doesn't make much sense.
2238
2239 =item Search pattern not terminated
2240
2241 (F) The lexer couldn't find the final delimiter of a // or m{}
2242 construct.  Remember that bracketing delimiters count nesting level.
2243 Missing the leading C<$> from a variable C<$m> may cause this error.
2244
2245 =item %sseek() on unopened file
2246
2247 (W) You tried to use the seek() or sysseek() function on a filehandle that
2248 was either never opened or has since been closed.
2249
2250 =item select not implemented
2251
2252 (F) This machine doesn't implement the select() system call.
2253
2254 =item sem%s not implemented
2255
2256 (F) You don't have System V semaphore IPC on your system.
2257
2258 =item semi-panic: attempt to dup freed string
2259
2260 (S) The internal newSVsv() routine was called to duplicate a scalar
2261 that had previously been marked as free.
2262
2263 =item Semicolon seems to be missing
2264
2265 (W) A nearby syntax error was probably caused by a missing semicolon,
2266 or possibly some other missing operator, such as a comma.
2267
2268 =item Send on closed socket
2269
2270 (W) The filehandle you're sending to got itself closed sometime before now.
2271 Check your logic flow.
2272
2273 =item Sequence (? incomplete
2274
2275 (F) A regular expression ended with an incomplete extension (?.
2276 See L<perlre>.
2277
2278 =item Sequence (?#... not terminated
2279
2280 (F) A regular expression comment must be terminated by a closing
2281 parenthesis.  Embedded parentheses aren't allowed.  See L<perlre>.
2282
2283 =item Sequence (?%s...) not implemented
2284
2285 (F) A proposed regular expression extension has the character reserved
2286 but has not yet been written.  See L<perlre>.
2287
2288 =item Sequence (?%s...) not recognized
2289
2290 (F) You used a regular expression extension that doesn't make sense.
2291 See L<perlre>.
2292
2293 =item Server error
2294
2295 Also known as "500 Server error".
2296
2297 B<This is a CGI error, not a Perl error>.
2298
2299 You need to make sure your script is executable, is accessible by the user
2300 CGI is running the script under (which is probably not the user account you
2301 tested it under), does not rely on any environment variables (like PATH)
2302 from the user it isn't running under, and isn't in a location where the CGI
2303 server can't find it, basically, more or less.  Please see the following
2304 for more information:
2305
2306         http://www.perl.com/perl/faq/idiots-guide.html
2307         http://www.perl.com/perl/faq/perl-cgi-faq.html
2308         ftp://rtfm.mit.edu/pub/usenet/news.answers/www/cgi-faq
2309         http://hoohoo.ncsa.uiuc.edu/cgi/interface.html
2310         http://www-genome.wi.mit.edu/WWW/faqs/www-security-faq.html
2311
2312 =item setegid() not implemented
2313
2314 (F) You tried to assign to C<$)>, and your operating system doesn't support
2315 the setegid() system call (or equivalent), or at least Configure didn't
2316 think so.
2317
2318 =item seteuid() not implemented
2319
2320 (F) You tried to assign to C<$E<gt>>, and your operating system doesn't support
2321 the seteuid() system call (or equivalent), or at least Configure didn't
2322 think so.
2323
2324 =item setrgid() not implemented
2325
2326 (F) You tried to assign to C<$(>, and your operating system doesn't support
2327 the setrgid() system call (or equivalent), or at least Configure didn't
2328 think so.
2329
2330 =item setruid() not implemented
2331
2332 (F) You tried to assign to C<$E<lt>>, and your operating system doesn't support
2333 the setruid() system call (or equivalent), or at least Configure didn't
2334 think so.
2335
2336 =item Setuid/gid script is writable by world
2337
2338 (F) The setuid emulator won't run a script that is writable by the world,
2339 because the world might have written on it already.
2340
2341 =item shm%s not implemented
2342
2343 (F) You don't have System V shared memory IPC on your system.
2344
2345 =item shutdown() on closed fd
2346
2347 (W) You tried to do a shutdown on a closed socket.  Seems a bit superfluous.
2348
2349 =item SIG%s handler "%s" not defined
2350
2351 (W) The signal handler named in %SIG doesn't, in fact, exist.  Perhaps you
2352 put it into the wrong package?
2353
2354 =item sort is now a reserved word
2355
2356 (F) An ancient error message that almost nobody ever runs into anymore.
2357 But before sort was a keyword, people sometimes used it as a filehandle.
2358
2359 =item Sort subroutine didn't return a numeric value
2360
2361 (F) A sort comparison routine must return a number.  You probably blew
2362 it by not using C<E<lt>=E<gt>> or C<cmp>, or by not using them correctly.
2363 See L<perlfunc/sort>.
2364
2365 =item Sort subroutine didn't return single value
2366
2367 (F) A sort comparison subroutine may not return a list value with more
2368 or less than one element.  See L<perlfunc/sort>.
2369
2370 =item Split loop
2371
2372 (P) The split was looping infinitely.  (Obviously, a split shouldn't iterate
2373 more times than there are characters of input, which is what happened.)
2374 See L<perlfunc/split>.
2375
2376 =item Stat on unopened file E<lt>%sE<gt>
2377
2378 (W) You tried to use the stat() function (or an equivalent file test)
2379 on a filehandle that was either never opened or has since been closed.
2380
2381 =item Statement unlikely to be reached
2382
2383 (W) You did an exec() with some statement after it other than a die().
2384 This is almost always an error, because exec() never returns unless
2385 there was a failure.  You probably wanted to use system() instead,
2386 which does return.  To suppress this warning, put the exec() in a block
2387 by itself.
2388
2389 =item Stub found while resolving method `%s' overloading `%s' in package `%s'
2390
2391 (P) Overloading resolution over @ISA tree may be broken by importation stubs.
2392 Stubs should never be implicitely created, but explicit calls to C<can>
2393 may break this.
2394
2395 =item Subroutine %s redefined
2396
2397 (W) You redefined a subroutine.  To suppress this warning, say
2398
2399     {
2400         local $^W = 0;
2401         eval "sub name { ... }";
2402     }
2403
2404 =item Substitution loop
2405
2406 (P) The substitution was looping infinitely.  (Obviously, a
2407 substitution shouldn't iterate more times than there are characters of
2408 input, which is what happened.)  See the discussion of substitution in
2409 L<perlop/"Quote and Quote-like Operators">.
2410
2411 =item Substitution pattern not terminated
2412
2413 (F) The lexer couldn't find the interior delimiter of a s/// or s{}{}
2414 construct.  Remember that bracketing delimiters count nesting level.
2415 Missing the leading C<$> from variable C<$s> may cause this error.
2416
2417 =item Substitution replacement not terminated
2418
2419 (F) The lexer couldn't find the final delimiter of a s/// or s{}{}
2420 construct.  Remember that bracketing delimiters count nesting level.
2421 Missing the leading C<$> from variable C<$s> may cause this error.
2422
2423 =item substr outside of string
2424
2425 (S),(W) You tried to reference a substr() that pointed outside of a
2426 string.  That is, the absolute value of the offset was larger than the
2427 length of the string.  See L<perlfunc/substr>.  This warning is
2428 mandatory if substr is used in an lvalue context (as the left hand side
2429 of an assignment or as a subroutine argument for example).
2430
2431 =item suidperl is no longer needed since %s
2432
2433 (F) Your Perl was compiled with B<-D>SETUID_SCRIPTS_ARE_SECURE_NOW, but a
2434 version of the setuid emulator somehow got run anyway.
2435
2436 =item syntax error
2437
2438 (F) Probably means you had a syntax error.  Common reasons include:
2439
2440     A keyword is misspelled.
2441     A semicolon is missing.
2442     A comma is missing.
2443     An opening or closing parenthesis is missing.
2444     An opening or closing brace is missing.
2445     A closing quote is missing.
2446
2447 Often there will be another error message associated with the syntax
2448 error giving more information.  (Sometimes it helps to turn on B<-w>.)
2449 The error message itself often tells you where it was in the line when
2450 it decided to give up.  Sometimes the actual error is several tokens
2451 before this, because Perl is good at understanding random input.
2452 Occasionally the line number may be misleading, and once in a blue moon
2453 the only way to figure out what's triggering the error is to call
2454 C<perl -c> repeatedly, chopping away half the program each time to see
2455 if the error went away.  Sort of the cybernetic version of S<20 questions>.
2456
2457 =item syntax error at line %d: `%s' unexpected
2458
2459 (A) You've accidentally run your script through the Bourne shell
2460 instead of Perl.  Check the #! line, or manually feed your script
2461 into Perl yourself.
2462
2463 =item System V IPC is not implemented on this machine
2464
2465 (F) You tried to do something with a function beginning with "sem", "shm",
2466 or "msg".  See L<perlfunc/semctl>, for example.
2467
2468 =item Syswrite on closed filehandle
2469
2470 (W) The filehandle you're writing to got itself closed sometime before now.
2471 Check your logic flow.
2472
2473 =item Target of goto is too deeply nested
2474
2475 (F) You tried to use C<goto> to reach a label that was too deeply
2476 nested for Perl to reach.  Perl is doing you a favor by refusing.
2477
2478 =item tell() on unopened file
2479
2480 (W) You tried to use the tell() function on a filehandle that was either
2481 never opened or has since been closed.
2482
2483 =item Test on unopened file E<lt>%sE<gt>
2484
2485 (W) You tried to invoke a file test operator on a filehandle that isn't
2486 open.  Check your logic.  See also L<perlfunc/-X>.
2487
2488 =item That use of $[ is unsupported
2489
2490 (F) Assignment to C<$[> is now strictly circumscribed, and interpreted as
2491 a compiler directive.  You may say only one of
2492
2493     $[ = 0;
2494     $[ = 1;
2495     ...
2496     local $[ = 0;
2497     local $[ = 1;
2498     ...
2499
2500 This is to prevent the problem of one module changing the array base
2501 out from under another module inadvertently.  See L<perlvar/$[>.
2502
2503 =item The %s function is unimplemented
2504
2505 The function indicated isn't implemented on this architecture, according
2506 to the probings of Configure.
2507
2508 =item The crypt() function is unimplemented due to excessive paranoia
2509
2510 (F) Configure couldn't find the crypt() function on your machine,
2511 probably because your vendor didn't supply it, probably because they
2512 think the U.S. Government thinks it's a secret, or at least that they
2513 will continue to pretend that it is.  And if you quote me on that, I
2514 will deny it.
2515
2516 =item The stat preceding C<-l _> wasn't an lstat
2517
2518 (F) It makes no sense to test the current stat buffer for symbolic linkhood
2519 if the last stat that wrote to the stat buffer already went past
2520 the symlink to get to the real file.  Use an actual filename instead.
2521
2522 =item times not implemented
2523
2524 (F) Your version of the C library apparently doesn't do times().  I suspect
2525 you're not running on Unix.
2526
2527 =item Too few args to syscall
2528
2529 (F) There has to be at least one argument to syscall() to specify the
2530 system call to call, silly dilly.
2531
2532 =item Too late for "B<-T>" option
2533
2534 (X) The #! line (or local equivalent) in a Perl script contains the
2535 B<-T> option, but Perl was not invoked with B<-T> in its command line.
2536 This is an error because, by the time Perl discovers a B<-T> in a
2537 script, it's too late to properly taint everything from the environment.
2538 So Perl gives up.
2539
2540 If the Perl script is being executed as a command using the #!
2541 mechanism (or its local equivalent), this error can usually be fixed
2542 by editing the #! line so that the B<-T> option is a part of Perl's
2543 first argument: e.g. change C<perl -n -T> to C<perl -T -n>.
2544
2545 If the Perl script is being executed as C<perl scriptname>, then the
2546 B<-T> option must appear on the command line: C<perl -T scriptname>.
2547
2548 =item Too late for "-%s" option
2549
2550 (X) The #! line (or local equivalent) in a Perl script contains the
2551 B<-M> or B<-m> option.  This is an error because B<-M> and B<-m> options
2552 are not intended for use inside scripts.  Use the C<use> pragma instead.
2553
2554 =item Too many ('s
2555
2556 =item Too many )'s
2557
2558 (A) You've accidentally run your script through B<csh> instead
2559 of Perl.  Check the #! line, or manually feed your script into
2560 Perl yourself.
2561
2562 =item Too many args to syscall
2563
2564 (F) Perl supports a maximum of only 14 args to syscall().
2565
2566 =item Too many arguments for %s
2567
2568 (F) The function requires fewer arguments than you specified.
2569
2570 =item trailing \ in regexp
2571
2572 (F) The regular expression ends with an unbackslashed backslash.  Backslash
2573 it.   See L<perlre>.
2574
2575 =item Transliteration pattern not terminated
2576
2577 (F) The lexer couldn't find the interior delimiter of a tr/// or tr[][]
2578 or y/// or y[][] construct.  Missing the leading C<$> from variables
2579 C<$tr> or C<$y> may cause this error.
2580
2581 =item Transliteration replacement not terminated
2582
2583 (F) The lexer couldn't find the final delimiter of a tr/// or tr[][]
2584 construct.
2585
2586 =item truncate not implemented
2587
2588 (F) Your machine doesn't implement a file truncation mechanism that
2589 Configure knows about.
2590
2591 =item Type of arg %d to %s must be %s (not %s)
2592
2593 (F) This function requires the argument in that position to be of a
2594 certain type.  Arrays must be @NAME or C<@{EXPR}>.  Hashes must be
2595 %NAME or C<%{EXPR}>.  No implicit dereferencing is allowed--use the
2596 {EXPR} forms as an explicit dereference.  See L<perlref>.
2597
2598 =item umask: argument is missing initial 0
2599
2600 (W) A umask of 222 is incorrect.  It should be 0222, because octal literals
2601 always start with 0 in Perl, as in C.
2602
2603 =item Unable to create sub named "%s"
2604
2605 (F) You attempted to create or access a subroutine with an illegal name.
2606
2607 =item Unbalanced context: %d more PUSHes than POPs
2608
2609 (W) The exit code detected an internal inconsistency in how many execution
2610 contexts were entered and left.
2611
2612 =item Unbalanced saves: %d more saves than restores
2613
2614 (W) The exit code detected an internal inconsistency in how many
2615 values were temporarily localized.
2616
2617 =item Unbalanced scopes: %d more ENTERs than LEAVEs
2618
2619 (W) The exit code detected an internal inconsistency in how many blocks
2620 were entered and left.
2621
2622 =item Unbalanced tmps: %d more allocs than frees
2623
2624 (W) The exit code detected an internal inconsistency in how many mortal
2625 scalars were allocated and freed.
2626
2627 =item Undefined format "%s" called
2628
2629 (F) The format indicated doesn't seem to exist.  Perhaps it's really in
2630 another package?  See L<perlform>.
2631
2632 =item Undefined sort subroutine "%s" called
2633
2634 (F) The sort comparison routine specified doesn't seem to exist.  Perhaps
2635 it's in a different package?  See L<perlfunc/sort>.
2636
2637 =item Undefined subroutine &%s called
2638
2639 (F) The subroutine indicated hasn't been defined, or if it was, it
2640 has since been undefined.
2641
2642 =item Undefined subroutine called
2643
2644 (F) The anonymous subroutine you're trying to call hasn't been defined,
2645 or if it was, it has since been undefined.
2646
2647 =item Undefined subroutine in sort
2648
2649 (F) The sort comparison routine specified is declared but doesn't seem to
2650 have been defined yet.  See L<perlfunc/sort>.
2651
2652 =item Undefined top format "%s" called
2653
2654 (F) The format indicated doesn't seem to exist.  Perhaps it's really in
2655 another package?  See L<perlform>.
2656
2657 =item Undefined value assigned to typeglob
2658
2659 (W) An undefined value was assigned to a typeglob, a la C<*foo = undef>.
2660 This does nothing.  It's possible that you really mean C<undef *foo>.
2661
2662 =item unexec of %s into %s failed!
2663
2664 (F) The unexec() routine failed for some reason.  See your local FSF
2665 representative, who probably put it there in the first place.
2666
2667 =item Unknown BYTEORDER
2668
2669 (F) There are no byte-swapping functions for a machine with this byte order.
2670
2671 =item unmatched () in regexp
2672
2673 (F) Unbackslashed parentheses must always be balanced in regular
2674 expressions.  If you're a vi user, the % key is valuable for finding
2675 the matching parenthesis.  See L<perlre>.
2676
2677 =item Unmatched right bracket
2678
2679 (F) The lexer counted more closing curly brackets (braces) than opening
2680 ones, so you're probably missing an opening bracket.  As a general
2681 rule, you'll find the missing one (so to speak) near the place you were
2682 last editing.
2683
2684 =item unmatched [] in regexp
2685
2686 (F) The brackets around a character class must match.  If you wish to
2687 include a closing bracket in a character class, backslash it or put it first.
2688 See L<perlre>.
2689
2690 =item Unquoted string "%s" may clash with future reserved word
2691
2692 (W) You used a bareword that might someday be claimed as a reserved word.
2693 It's best to put such a word in quotes, or capitalize it somehow, or insert
2694 an underbar into it.  You might also declare it as a subroutine.
2695
2696 =item Unrecognized character %s
2697
2698 (F) The Perl parser has no idea what to do with the specified character
2699 in your Perl script (or eval).  Perhaps you tried to run a compressed
2700 script, a binary program, or a directory as a Perl program.
2701
2702 =item Unrecognized signal name "%s"
2703
2704 (F) You specified a signal name to the kill() function that was not recognized.
2705 Say C<kill -l> in your shell to see the valid signal names on your system.
2706
2707 =item Unrecognized switch: -%s  (-h will show valid options)
2708
2709 (F) You specified an illegal option to Perl.  Don't do that.
2710 (If you think you didn't do that, check the #! line to see if it's
2711 supplying the bad switch on your behalf.)
2712
2713 =item Unsuccessful %s on filename containing newline
2714
2715 (W) A file operation was attempted on a filename, and that operation
2716 failed, PROBABLY because the filename contained a newline, PROBABLY
2717 because you forgot to chop() or chomp() it off.  See L<perlfunc/chomp>.
2718
2719 =item Unsupported directory function "%s" called
2720
2721 (F) Your machine doesn't support opendir() and readdir().
2722
2723 =item Unsupported function fork
2724
2725 (F) Your version of executable does not support forking.
2726
2727 Note that under some systems, like OS/2, there may be different flavors of
2728 Perl executables, some of which may support fork, some not. Try changing
2729 the name you call Perl by to C<perl_>, C<perl__>, and so on.
2730
2731 =item Unsupported function %s
2732
2733 (F) This machine doesn't implement the indicated function, apparently.
2734 At least, Configure doesn't think so.
2735
2736 =item Unsupported socket function "%s" called
2737
2738 (F) Your machine doesn't support the Berkeley socket mechanism, or at
2739 least that's what Configure thought.
2740
2741 =item Unterminated E<lt>E<gt> operator
2742
2743 (F) The lexer saw a left angle bracket in a place where it was expecting
2744 a term, so it's looking for the corresponding right angle bracket, and not
2745 finding it.  Chances are you left some needed parentheses out earlier in
2746 the line, and you really meant a "less than".
2747
2748 =item Use of "$$<digit>" to mean "${$}<digit>" is deprecated
2749
2750 (D) Perl versions before 5.004 misinterpreted any type marker followed
2751 by "$" and a digit.  For example, "$$0" was incorrectly taken to mean
2752 "${$}0" instead of "${$0}".  This bug is (mostly) fixed in Perl 5.004.
2753
2754 However, the developers of Perl 5.004 could not fix this bug completely,
2755 because at least two widely-used modules depend on the old meaning of
2756 "$$0" in a string.  So Perl 5.004 still interprets "$$<digit>" in the
2757 old (broken) way inside strings; but it generates this message as a
2758 warning.  And in Perl 5.005, this special treatment will cease.
2759
2760 =item Use of $# is deprecated
2761
2762 (D) This was an ill-advised attempt to emulate a poorly defined B<awk> feature.
2763 Use an explicit printf() or sprintf() instead.
2764
2765 =item Use of $* is deprecated
2766
2767 (D) This variable magically turned on multi-line pattern matching, both for
2768 you and for any luckless subroutine that you happen to call.  You should
2769 use the new C<//m> and C<//s> modifiers now to do that without the dangerous
2770 action-at-a-distance effects of C<$*>.
2771
2772 =item Use of %s in printf format not supported
2773
2774 (F) You attempted to use a feature of printf that is accessible from
2775 only C.  This usually means there's a better way to do it in Perl.
2776
2777 =item Use of bare E<lt>E<lt> to mean E<lt>E<lt>"" is deprecated
2778
2779 (D) You are now encouraged to use the explicitly quoted form if you
2780 wish to use an empty line as the terminator of the here-document.
2781
2782 =item Use of implicit split to @_ is deprecated
2783
2784 (D) It makes a lot of work for the compiler when you clobber a
2785 subroutine's argument list, so it's better if you assign the results of
2786 a split() explicitly to an array (or list).
2787
2788 =item Use of inherited AUTOLOAD for non-method %s() is deprecated
2789
2790 (D) As an (ahem) accidental feature, C<AUTOLOAD> subroutines are looked
2791 up as methods (using the C<@ISA> hierarchy) even when the subroutines to
2792 be autoloaded were called as plain functions (e.g. C<Foo::bar()>), not
2793 as methods (e.g. C<Foo-E<gt>bar()> or C<$obj-E<gt>bar()>).
2794
2795 This bug will be rectified in Perl 5.005, which will use method lookup
2796 only for methods' C<AUTOLOAD>s.  However, there is a significant base
2797 of existing code that may be using the old behavior.  So, as an
2798 interim step, Perl 5.004 issues an optional warning when non-methods
2799 use inherited C<AUTOLOAD>s.
2800
2801 The simple rule is:  Inheritance will not work when autoloading
2802 non-methods.  The simple fix for old code is:  In any module that used to
2803 depend on inheriting C<AUTOLOAD> for non-methods from a base class named
2804 C<BaseClass>, execute C<*AUTOLOAD = \&BaseClass::AUTOLOAD> during startup.
2805
2806 In code that currently says C<use AutoLoader; @ISA = qw(AutoLoader);> you
2807 should remove AutoLoader from @ISA and change C<use AutoLoader;> to
2808 C<use AutoLoader 'AUTOLOAD';>.
2809
2810 =item Use of reserved word "%s" is deprecated
2811
2812 (D) The indicated bareword is a reserved word.  Future versions of perl
2813 may use it as a keyword, so you're better off either explicitly quoting
2814 the word in a manner appropriate for its context of use, or using a
2815 different name altogether.  The warning can be suppressed for subroutine
2816 names by either adding a C<&> prefix, or using a package qualifier,
2817 e.g. C<&our()>, or C<Foo::our()>.
2818
2819 =item Use of %s is deprecated
2820
2821 (D) The construct indicated is no longer recommended for use, generally
2822 because there's a better way to do it, and also because the old way has
2823 bad side effects.
2824
2825 =item Use of uninitialized value
2826
2827 (W) An undefined value was used as if it were already defined.  It was
2828 interpreted as a "" or a 0, but maybe it was a mistake.  To suppress this
2829 warning assign an initial value to your variables.
2830
2831 =item Useless use of %s in void context
2832
2833 (W) You did something without a side effect in a context that does nothing
2834 with the return value, such as a statement that doesn't return a value
2835 from a block, or the left side of a scalar comma operator.  Very often
2836 this points not to stupidity on your part, but a failure of Perl to parse
2837 your program the way you thought it would.  For example, you'd get this
2838 if you mixed up your C precedence with Python precedence and said
2839
2840     $one, $two = 1, 2;
2841
2842 when you meant to say
2843
2844     ($one, $two) = (1, 2);
2845
2846 Another common error is to use ordinary parentheses to construct a list
2847 reference when you should be using square or curly brackets, for
2848 example, if you say
2849
2850     $array = (1,2);
2851
2852 when you should have said
2853
2854     $array = [1,2];
2855
2856 The square brackets explicitly turn a list value into a scalar value,
2857 while parentheses do not.  So when a parenthesized list is evaluated in
2858 a scalar context, the comma is treated like C's comma operator, which
2859 throws away the left argument, which is not what you want.  See
2860 L<perlref> for more on this.
2861
2862 =item untie attempted while %d inner references still exist
2863
2864 (W) A copy of the object returned from C<tie> (or C<tied>) was still
2865 valid when C<untie> was called.
2866
2867 =item Value of %s can be "0"; test with defined()
2868
2869 (W) In a conditional expression, you used <HANDLE>, <*> (glob), C<each()>,
2870 or C<readdir()> as a boolean value.  Each of these constructs can return a
2871 value of "0"; that would make the conditional expression false, which is
2872 probably not what you intended.  When using these constructs in conditional
2873 expressions, test their values with the C<defined> operator.
2874
2875 =item Variable "%s" is not imported%s
2876
2877 (F) While "use strict" in effect, you referred to a global variable
2878 that you apparently thought was imported from another module, because
2879 something else of the same name (usually a subroutine) is exported
2880 by that module.  It usually means you put the wrong funny character
2881 on the front of your variable.
2882
2883 =item Variable "%s" may be unavailable
2884
2885 (W) An inner (nested) I<anonymous> subroutine is inside a I<named>
2886 subroutine, and outside that is another subroutine; and the anonymous
2887 (innermost) subroutine is referencing a lexical variable defined in
2888 the outermost subroutine.  For example:
2889
2890    sub outermost { my $a; sub middle { sub { $a } } }
2891
2892 If the anonymous subroutine is called or referenced (directly or
2893 indirectly) from the outermost subroutine, it will share the variable
2894 as you would expect.  But if the anonymous subroutine is called or
2895 referenced when the outermost subroutine is not active, it will see
2896 the value of the shared variable as it was before and during the
2897 *first* call to the outermost subroutine, which is probably not what
2898 you want.
2899
2900 In these circumstances, it is usually best to make the middle
2901 subroutine anonymous, using the C<sub {}> syntax.  Perl has specific
2902 support for shared variables in nested anonymous subroutines; a named
2903 subroutine in between interferes with this feature.
2904
2905 =item Variable "%s" will not stay shared
2906
2907 (W) An inner (nested) I<named> subroutine is referencing a lexical
2908 variable defined in an outer subroutine.
2909
2910 When the inner subroutine is called, it will probably see the value of
2911 the outer subroutine's variable as it was before and during the
2912 *first* call to the outer subroutine; in this case, after the first
2913 call to the outer subroutine is complete, the inner and outer
2914 subroutines will no longer share a common value for the variable.  In
2915 other words, the variable will no longer be shared.
2916
2917 Furthermore, if the outer subroutine is anonymous and references a
2918 lexical variable outside itself, then the outer and inner subroutines
2919 will I<never> share the given variable.
2920
2921 This problem can usually be solved by making the inner subroutine
2922 anonymous, using the C<sub {}> syntax.  When inner anonymous subs that
2923 reference variables in outer subroutines are called or referenced,
2924 they are automatically rebound to the current values of such
2925 variables.
2926
2927 =item Variable syntax
2928
2929 (A) You've accidentally run your script through B<csh> instead
2930 of Perl.  Check the #! line, or manually feed your script into
2931 Perl yourself.
2932
2933 =item perl: warning: Setting locale failed.
2934
2935 (S) The whole warning message will look something like:
2936
2937         perl: warning: Setting locale failed.
2938         perl: warning: Please check that your locale settings:
2939                 LC_ALL = "En_US",
2940                 LANG = (unset)
2941             are supported and installed on your system.
2942         perl: warning: Falling back to the standard locale ("C").
2943
2944 Exactly what were the failed locale settings varies.  In the above the
2945 settings were that the LC_ALL was "En_US" and the LANG had no value.
2946 This error means that Perl detected that you and/or your system
2947 administrator have set up the so-called variable system but Perl could
2948 not use those settings.  This was not dead serious, fortunately: there
2949 is a "default locale" called "C" that Perl can and will use, the
2950 script will be run.  Before you really fix the problem, however, you
2951 will get the same error message each time you run Perl.  How to really
2952 fix the problem can be found in L<perllocale> section B<LOCALE PROBLEMS>.
2953
2954 =item Warning: something's wrong
2955
2956 (W) You passed warn() an empty string (the equivalent of C<warn "">) or
2957 you called it with no args and C<$_> was empty.
2958
2959 =item Warning: unable to close filehandle %s properly
2960
2961 (S) The implicit close() done by an open() got an error indication on the
2962 close().  This usually indicates your file system ran out of disk space.
2963
2964 =item Warning: Use of "%s" without parentheses is ambiguous
2965
2966 (S) You wrote a unary operator followed by something that looks like a
2967 binary operator that could also have been interpreted as a term or
2968 unary operator.  For instance, if you know that the rand function
2969 has a default argument of 1.0, and you write
2970
2971     rand + 5;
2972
2973 you may THINK you wrote the same thing as
2974
2975     rand() + 5;
2976
2977 but in actual fact, you got
2978
2979     rand(+5);
2980
2981 So put in parentheses to say what you really mean.
2982
2983 =item Write on closed filehandle
2984
2985 (W) The filehandle you're writing to got itself closed sometime before now.
2986 Check your logic flow.
2987
2988 =item X outside of string
2989
2990 (F) You had a pack template that specified a relative position before
2991 the beginning of the string being unpacked.  See L<perlfunc/pack>.
2992
2993 =item x outside of string
2994
2995 (F) You had a pack template that specified a relative position after
2996 the end of the string being unpacked.  See L<perlfunc/pack>.
2997
2998 =item Xsub "%s" called in sort
2999
3000 (F) The use of an external subroutine as a sort comparison is not yet supported.
3001
3002 =item Xsub called in sort
3003
3004 (F) The use of an external subroutine as a sort comparison is not yet supported.
3005
3006 =item You can't use C<-l> on a filehandle
3007
3008 (F) A filehandle represents an opened file, and when you opened the file it
3009 already went past any symlink you are presumably trying to look for.
3010 Use a filename instead.
3011
3012 =item YOU HAVEN'T DISABLED SET-ID SCRIPTS IN THE KERNEL YET!
3013
3014 (F) And you probably never will, because you probably don't have the
3015 sources to your kernel, and your vendor probably doesn't give a rip
3016 about what you want.  Your best bet is to use the wrapsuid script in
3017 the eg directory to put a setuid C wrapper around your script.
3018
3019 =item You need to quote "%s"
3020
3021 (W) You assigned a bareword as a signal handler name.  Unfortunately, you
3022 already have a subroutine of that name declared, which means that Perl 5
3023 will try to call the subroutine when the assignment is executed, which is
3024 probably not what you want.  (If it IS what you want, put an & in front.)
3025
3026 =item [gs]etsockopt() on closed fd
3027
3028 (W) You tried to get or set a socket option on a closed socket.
3029 Did you forget to check the return value of your socket() call?
3030 See L<perlfunc/getsockopt>.
3031
3032 =item \1 better written as $1
3033
3034 (W) Outside of patterns, backreferences live on as variables.  The use
3035 of backslashes is grandfathered on the right-hand side of a
3036 substitution, but stylistically it's better to use the variable form
3037 because other Perl programmers will expect it, and it works better
3038 if there are more than 9 backreferences.
3039
3040 =item '|' and 'E<lt>' may not both be specified on command line
3041
3042 (F) An error peculiar to VMS.  Perl does its own command line redirection, and
3043 found that STDIN was a pipe, and that you also tried to redirect STDIN using
3044 'E<lt>'.  Only one STDIN stream to a customer, please.
3045
3046 =item '|' and 'E<gt>' may not both be specified on command line
3047
3048 (F) An error peculiar to VMS.  Perl does its own command line redirection, and
3049 thinks you tried to redirect stdout both to a file and into a pipe to another
3050 command.  You need to choose one or the other, though nothing's stopping you
3051 from piping into a program or Perl script which 'splits' output into two
3052 streams, such as
3053
3054     open(OUT,">$ARGV[0]") or die "Can't write to $ARGV[0]: $!";
3055     while (<STDIN>) {
3056         print;
3057         print OUT;
3058     }
3059     close OUT;
3060
3061 =item Got an error from DosAllocMem
3062
3063 (P) An error peculiar to OS/2.  Most probably you're using an obsolete
3064 version of Perl, and this should not happen anyway.
3065
3066 =item Malformed PERLLIB_PREFIX
3067
3068 (F) An error peculiar to OS/2.  PERLLIB_PREFIX should be of the form
3069
3070     prefix1;prefix2
3071
3072 or
3073
3074     prefix1 prefix2
3075
3076 with nonempty prefix1 and prefix2.  If C<prefix1> is indeed a prefix
3077 of a builtin library search path, prefix2 is substituted.  The error
3078 may appear if components are not found, or are too long.  See
3079 "PERLLIB_PREFIX" in F<README.os2>.
3080
3081 =item PERL_SH_DIR too long
3082
3083 (F) An error peculiar to OS/2. PERL_SH_DIR is the directory to find the
3084 C<sh>-shell in.  See "PERL_SH_DIR" in F<README.os2>.
3085
3086 =item Process terminated by SIG%s
3087
3088 (W) This is a standard message issued by OS/2 applications, while *nix
3089 applications die in silence.  It is considered a feature of the OS/2
3090 port.  One can easily disable this by appropriate sighandlers, see
3091 L<perlipc/"Signals">.  See also "Process terminated by SIGTERM/SIGINT"
3092 in F<README.os2>.
3093
3094 =back
3095