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