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