3 perldiag - various Perl diagnostics
7 These messages are classified as follows (listed in increasing order of
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).
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
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.
30 =item "my" variable %s can't be in a package
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.
36 =item "my" variable %s masks earlier declaration in same %s
38 (W) A lexical variable has been redeclared in the current scope or statement,
39 effectively eliminating all access to the previous instance. This is almost
40 always 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
44 =item "no" not allowed in expression
46 (F) The "no" keyword is recognized and executed at compile time, and returns
47 no useful value. See L<perlmod>.
49 =item "use" not allowed in expression
51 (F) The "use" keyword is recognized and executed at compile time, and returns
52 no useful value. See L<perlmod>.
54 =item % may only be used in unpack
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>.
60 =item /%s/: Unrecognized escape \\%c passed through
62 (W) You used a backslash-character combination which is not recognized
63 by Perl. This combination appears in an interpolated variable or a
64 C<'>-delimited regular expression.
66 =item %s (...) interpreted as function
68 (W) You've run afoul of the rule that says that any list operator followed
69 by parentheses turns into a function, with all the list operators arguments
70 found inside the parentheses. See L<perlop/Terms and List Operators (Leftward)>.
72 =item %s argument is not a HASH element
74 (F) The argument to exists() must be a hash element, such as
79 =item %s argument is not a HASH element or slice
81 (F) The argument to delete() must be either a hash element, such as
86 or a hash slice, such as
88 @foo{$bar, $baz, $xyzzy}
89 @{$ref->[12]}{"susie", "queue"}
91 =item %s did not return a true value
93 (F) A required (or used) file must return a true value to indicate that
94 it compiled correctly and ran its initialization code correctly. It's
95 traditional to end such a file with a "1;", though any true value would
96 do. See L<perlfunc/require>.
98 =item %s found where operator expected
100 (S) The Perl lexer knows whether to expect a term or an operator. If it
101 sees what it knows to be a term when it was expecting to see an operator,
102 it gives you this warning. Usually it indicates that an operator or
103 delimiter was omitted, such as a semicolon.
105 =item %s had compilation errors
107 (F) The final summary message when a C<perl -c> fails.
109 =item %s has too many errors
111 (F) The parser has given up trying to parse the program after 10 errors.
112 Further error messages would likely be uninformative.
114 =item %s matches null string many times
116 (W) The pattern you've specified would be an infinite loop if the
117 regular expression engine didn't specifically check for that. See L<perlre>.
119 =item %s never introduced
121 (S) The symbol in question was declared but somehow went out of scope
122 before it could possibly have been used.
126 (F) The final summary message when a C<perl -c> succeeds.
128 =item %s: Command not found
130 (A) You've accidentally run your script through B<csh> instead
131 of Perl. Check the #! line, or manually feed your script into
134 =item %s: Expression syntax
136 (A) You've accidentally run your script through B<csh> instead
137 of Perl. Check the #! line, or manually feed your script into
140 =item %s: Undefined variable
142 (A) You've accidentally run your script through B<csh> instead
143 of Perl. Check the #! line, or manually feed your script into
148 (A) You've accidentally run your script through the Bourne shell
149 instead of Perl. Check the #! line, or manually feed your script
152 =item (in cleanup) %s
154 (W) This prefix usually indicates that a DESTROY() method raised
155 the indicated exception. Since destructors are usually called by
156 the system at arbitrary points during execution, and often a vast
157 number of times, the warning is issued only once for any number
158 of failures that would otherwise result in the same message being
161 Failure of user callbacks dispatched using the C<G_KEEPERR> flag
162 could also result in this warning. See L<perlcall/G_KEEPERR>.
164 =item (Missing semicolon on previous line?)
166 (S) This is an educated guess made in conjunction with the message "%s
167 found where operator expected". Don't automatically put a semicolon on
168 the previous line just because you saw this message.
170 =item B<-P> not allowed for setuid/setgid script
172 (F) The script would have to be opened by the C preprocessor by name,
173 which provides a race condition that breaks security.
175 =item C<-T> and C<-B> not implemented on filehandles
177 (F) Perl can't peek at the stdio buffer of filehandles when it doesn't
178 know about your kind of stdio. You'll have to use a filename instead.
180 =item C<-p> destination: %s
182 (F) An error occurred during the implicit output invoked by the C<-p>
183 command-line switch. (This output goes to STDOUT unless you've
184 redirected it with select().)
186 =item 500 Server error
190 =item ?+* follows nothing in regexp
192 (F) You started a regular expression with a quantifier. Backslash it
193 if you meant it literally. See L<perlre>.
195 =item @ outside of string
197 (F) You had a pack template that specified an absolute position outside
198 the string being unpacked. See L<perlfunc/pack>.
200 =item accept() on closed fd
202 (W) You tried to do an accept on a closed socket. Did you forget to check
203 the return value of your socket() call? See L<perlfunc/accept>.
205 =item Allocation too large: %lx
207 (X) You can't allocate more than 64K on an MS-DOS machine.
209 =item Applying %s to %s will act on scalar(%s)
211 (W) The pattern match (//), substitution (s///), and transliteration (tr///)
212 operators work on scalar values. If you apply one of them to an array
213 or a hash, it will convert the array or hash to a scalar value -- the
214 length of an array, or the population info of a hash -- and then work on
215 that scalar value. This is probably not what you meant to do. See
216 L<perlfunc/grep> and L<perlfunc/map> for alternatives.
218 =item Arg too short for msgsnd
220 (F) msgsnd() requires a string at least as long as sizeof(long).
222 =item Ambiguous use of %s resolved as %s
224 (W)(S) You said something that may not be interpreted the way
225 you thought. Normally it's pretty easy to disambiguate it by supplying
226 a missing quote, operator, parenthesis pair or declaration.
228 =item Ambiguous call resolved as CORE::%s(), qualify as such or use &
230 (W) A subroutine you have declared has the same name as a Perl keyword,
231 and you have used the name without qualification for calling one or the
232 other. Perl decided to call the builtin because the subroutine is
235 To force interpretation as a subroutine call, either put an ampersand
236 before the subroutine name, or qualify the name with its package.
237 Alternatively, you can import the subroutine (or pretend that it's
238 imported with the C<use subs> pragma).
240 To silently interpret it as the Perl operator, use the C<CORE::> prefix
241 on the operator (e.g. C<CORE::log($x)>) or by declaring the subroutine
242 to be an object method (see L<attrs>).
244 =item Args must match #! line
246 (F) The setuid emulator requires that the arguments Perl was invoked
247 with match the arguments specified on the #! line. Since some systems
248 impose a one-argument limit on the #! line, try combining switches;
249 for example, turn C<-w -U> into C<-wU>.
251 =item Argument "%s" isn't numeric%s
253 (W) The indicated string was fed as an argument to an operator that
254 expected a numeric value instead. If you're fortunate the message
255 will identify which operator was so unfortunate.
257 =item Array @%s missing the @ in argument %d of %s()
259 (D) Really old Perl let you omit the @ on array names in some spots. This
260 is now heavily deprecated.
262 =item assertion botched: %s
264 (P) The malloc package that comes with Perl had an internal failure.
266 =item Assertion failed: file "%s"
268 (P) A general assertion failed. The file in question must be examined.
270 =item Assignment to both a list and a scalar
272 (F) If you assign to a conditional operator, the 2nd and 3rd arguments
273 must either both be scalars or both be lists. Otherwise Perl won't
274 know which context to supply to the right side.
276 =item Attempt to free non-arena SV: 0x%lx
278 (P) All SV objects are supposed to be allocated from arenas that will
279 be garbage collected on exit. An SV was discovered to be outside any
282 =item Attempt to free nonexistent shared string
284 (P) Perl maintains a reference counted internal table of strings to
285 optimize the storage and access of hash keys and other strings. This
286 indicates someone tried to decrement the reference count of a string
287 that can no longer be found in the table.
289 =item Attempt to free temp prematurely
291 (W) Mortalized values are supposed to be freed by the free_tmps()
292 routine. This indicates that something else is freeing the SV before
293 the free_tmps() routine gets a chance, which means that the free_tmps()
294 routine will be freeing an unreferenced scalar when it does try to free
297 =item Attempt to free unreferenced glob pointers
299 (P) The reference counts got screwed up on symbol aliases.
301 =item Attempt to free unreferenced scalar
303 (W) Perl went to decrement the reference count of a scalar to see if it
304 would go to 0, and discovered that it had already gone to 0 earlier,
305 and should have been freed, and in fact, probably was freed. This
306 could indicate that SvREFCNT_dec() was called too many times, or that
307 SvREFCNT_inc() was called too few times, or that the SV was mortalized
308 when it shouldn't have been, or that memory has been corrupted.
310 =item Attempt to pack pointer to temporary value
312 (W) You tried to pass a temporary value (like the result of a
313 function, or a computed expression) to the "p" pack() template. This
314 means the result contains a pointer to a location that could become
315 invalid anytime, even before the end of the current statement. Use
316 literals or global values as arguments to the "p" pack() template to
319 =item Attempt to use reference as lvalue in substr
321 (W) You supplied a reference as the first argument to substr() used
322 as an lvalue, which is pretty strange. Perhaps you forgot to
323 dereference it first. See L<perlfunc/substr>.
325 =item Bad arg length for %s, is %d, should be %d
327 (F) You passed a buffer of the wrong size to one of msgctl(), semctl() or
328 shmctl(). In C parlance, the correct sizes are, respectively,
329 S<sizeof(struct msqid_ds *)>, S<sizeof(struct semid_ds *)>, and
330 S<sizeof(struct shmid_ds *)>.
332 =item Bad filehandle: %s
334 (F) A symbol was passed to something wanting a filehandle, but the symbol
335 has no filehandle associated with it. Perhaps you didn't do an open(), or
336 did it in another package.
338 =item Bad free() ignored
340 (S) An internal routine called free() on something that had never been
341 malloc()ed in the first place. Mandatory, but can be disabled by
342 setting environment variable C<PERL_BADFREE> to 1.
344 This message can be quite often seen with DB_File on systems with
345 "hard" dynamic linking, like C<AIX> and C<OS/2>. It is a bug of
346 C<Berkeley DB> which is left unnoticed if C<DB> uses I<forgiving>
351 (P) One of the internal hash routines was passed a null HV pointer.
353 =item Bad index while coercing array into hash
355 (F) The index looked up in the hash found as the 0'th element of a
356 pseudo-hash is not legal. Index values must be at 1 or greater.
359 =item Bad name after %s::
361 (F) You started to name a symbol by using a package prefix, and then didn't
362 finish the symbol. In particular, you can't interpolate outside of quotes,
371 $sym = "mypack::$var";
373 =item Bad symbol for array
375 (P) An internal request asked to add an array entry to something that
376 wasn't a symbol table entry.
378 =item Bad symbol for filehandle
380 (P) An internal request asked to add a filehandle entry to something that
381 wasn't a symbol table entry.
383 =item Bad symbol for hash
385 (P) An internal request asked to add a hash entry to something that
386 wasn't a symbol table entry.
388 =item Badly placed ()'s
390 (A) You've accidentally run your script through B<csh> instead
391 of Perl. Check the #! line, or manually feed your script into
394 =item Bareword "%s" not allowed while "strict subs" in use
396 (F) With "strict subs" in use, a bareword is only allowed as a
397 subroutine identifier, in curly braces or to the left of the "=>" symbol.
398 Perhaps you need to predeclare a subroutine?
400 =item Bareword "%s" refers to nonexistent package
402 (W) You used a qualified bareword of the form C<Foo::>, but
403 the compiler saw no other uses of that namespace before that point.
404 Perhaps you need to predeclare a package?
406 =item BEGIN failed--compilation aborted
408 (F) An untrapped exception was raised while executing a BEGIN subroutine.
409 Compilation stops immediately and the interpreter is exited.
411 =item BEGIN not safe after errors--compilation aborted
413 (F) Perl found a C<BEGIN {}> subroutine (or a C<use> directive, which
414 implies a C<BEGIN {}>) after one or more compilation errors had
415 already occurred. Since the intended environment for the C<BEGIN {}>
416 could not be guaranteed (due to the errors), and since subsequent code
417 likely depends on its correct operation, Perl just gave up.
419 =item bind() on closed fd
421 (W) You tried to do a bind on a closed socket. Did you forget to check
422 the return value of your socket() call? See L<perlfunc/bind>.
424 =item Bizarre copy of %s in %s
426 (P) Perl detected an attempt to copy an internal value that is not copiable.
428 =item Callback called exit
430 (F) A subroutine invoked from an external package via perl_call_sv()
431 exited by calling exit.
433 =item Can't "goto" outside a block
435 (F) A "goto" statement was executed to jump out of what might look
436 like a block, except that it isn't a proper block. This usually
437 occurs if you tried to jump out of a sort() block or subroutine, which
438 is a no-no. See L<perlfunc/goto>.
440 =item Can't "goto" into the middle of a foreach loop
442 (F) A "goto" statement was executed to jump into the middle of a
443 foreach loop. You can't get there from here. See L<perlfunc/goto>.
445 =item Can't "last" outside a block
447 (F) A "last" statement was executed to break out of the current block,
448 except that there's this itty bitty problem called there isn't a
449 current block. Note that an "if" or "else" block doesn't count as a
450 "loopish" block, as doesn't a block given to sort(). You can usually double
451 the curlies to get the same effect though, because the inner curlies
452 will be considered a block that loops once. See L<perlfunc/last>.
454 =item Can't "next" outside a block
456 (F) A "next" statement was executed to reiterate the current block, but
457 there isn't a current block. Note that an "if" or "else" block doesn't
458 count as a "loopish" block, as doesn't a block given to sort(). You can
459 usually double the curlies to get the same effect though, because the inner
460 curlies will be considered a block that loops once. See L<perlfunc/next>.
462 =item Can't "redo" outside a block
464 (F) A "redo" statement was executed to restart the current block, but
465 there isn't a current block. Note that an "if" or "else" block doesn't
466 count as a "loopish" block, as doesn't a block given to sort(). You can
467 usually double the curlies to get the same effect though, because the inner
468 curlies will be considered a block that loops once. See L<perlfunc/redo>.
470 =item Can't bless non-reference value
472 (F) Only hard references may be blessed. This is how Perl "enforces"
473 encapsulation of objects. See L<perlobj>.
475 =item Can't break at that line
477 (S) A warning intended to only be printed while running within the debugger, indicating
478 the line number specified wasn't the location of a statement that could
481 =item Can't call method "%s" in empty package "%s"
483 (F) You called a method correctly, and it correctly indicated a package
484 functioning as a class, but that package doesn't have ANYTHING defined
485 in it, let alone methods. See L<perlobj>.
487 =item Can't call method "%s" on unblessed reference
489 (F) A method call must know in what package it's supposed to run. It
490 ordinarily finds this out from the object reference you supply, but
491 you didn't supply an object reference in this case. A reference isn't
492 an object reference until it has been blessed. See L<perlobj>.
494 =item Can't call method "%s" without a package or object reference
496 (F) You used the syntax of a method call, but the slot filled by the
497 object reference or package name contains an expression that returns
498 a defined value which is neither an object reference nor a package name.
499 Something like this will reproduce the error:
502 process $BADREF 1,2,3;
503 $BADREF->process(1,2,3);
505 =item Can't call method "%s" on an undefined value
507 (F) You used the syntax of a method call, but the slot filled by the
508 object reference or package name contains an undefined value.
509 Something like this will reproduce the error:
512 process $BADREF 1,2,3;
513 $BADREF->process(1,2,3);
515 =item Can't chdir to %s
517 (F) You called C<perl -x/foo/bar>, but C</foo/bar> is not a directory
518 that you can chdir to, possibly because it doesn't exist.
520 =item Can't check filesystem of script "%s"
522 (P) For some reason you can't check the filesystem of the script for nosuid.
524 =item Can't coerce %s to integer in %s
526 (F) Certain types of SVs, in particular real symbol table entries
527 (typeglobs), can't be forced to stop being what they are. So you can't
537 but then $foo no longer contains a glob.
539 =item Can't coerce %s to number in %s
541 (F) Certain types of SVs, in particular real symbol table entries
542 (typeglobs), can't be forced to stop being what they are.
544 =item Can't coerce %s to string in %s
546 (F) Certain types of SVs, in particular real symbol table entries
547 (typeglobs), can't be forced to stop being what they are.
549 =item Can't coerce array into hash
551 (F) You used an array where a hash was expected, but the array has no
552 information on how to map from keys to array indices. You can do that
553 only with arrays that have a hash reference at index 0.
555 =item Can't create pipe mailbox
557 (P) An error peculiar to VMS. The process is suffering from exhausted quotas
558 or other plumbing problems.
560 =item Can't declare %s in my
562 (F) Only scalar, array, and hash variables may be declared as lexical variables.
563 They must have ordinary identifiers as names.
565 =item Can't do inplace edit on %s: %s
567 (S) The creation of the new file failed for the indicated reason.
569 =item Can't do inplace edit without backup
571 (F) You're on a system such as MS-DOS that gets confused if you try reading
572 from a deleted (but still opened) file. You have to say C<-i.bak>, or some
575 =item Can't do inplace edit: %s E<gt> 14 characters
577 (S) There isn't enough room in the filename to make a backup name for the file.
579 =item Can't do inplace edit: %s is not a regular file
581 (S) You tried to use the B<-i> switch on a special file, such as a file in
582 /dev, or a FIFO. The file was ignored.
584 =item Can't do setegid!
586 (P) The setegid() call failed for some reason in the setuid emulator
589 =item Can't do seteuid!
591 (P) The setuid emulator of suidperl failed for some reason.
593 =item Can't do setuid
595 (F) This typically means that ordinary perl tried to exec suidperl to
596 do setuid emulation, but couldn't exec it. It looks for a name of the
597 form sperl5.000 in the same directory that the perl executable resides
598 under the name perl5.000, typically /usr/local/bin on Unix machines.
599 If the file is there, check the execute permissions. If it isn't, ask
600 your sysadmin why he and/or she removed it.
602 =item Can't do waitpid with flags
604 (F) This machine doesn't have either waitpid() or wait4(), so only waitpid()
605 without flags is emulated.
607 =item Can't do {n,m} with n E<gt> m
609 (F) Minima must be less than or equal to maxima. If you really want
610 your regexp to match something 0 times, just put {0}. See L<perlre>.
612 =item Can't emulate -%s on #! line
614 (F) The #! line specifies a switch that doesn't make sense at this point.
615 For example, it'd be kind of silly to put a B<-x> on the #! line.
617 =item Can't exec "%s": %s
619 (W) An system(), exec(), or piped open call could not execute the named
620 program for the indicated reason. Typical reasons include: the permissions
621 were wrong on the file, the file wasn't found in C<$ENV{PATH}>, the
622 executable in question was compiled for another architecture, or the
623 #! line in a script points to an interpreter that can't be run for
624 similar reasons. (Or maybe your system doesn't support #! at all.)
628 (F) Perl was trying to execute the indicated program for you because that's
629 what the #! line said. If that's not what you wanted, you may need to
630 mention "perl" on the #! line somewhere.
632 =item Can't execute %s
634 (F) You used the B<-S> switch, but the copies of the script to execute found
635 in the PATH did not have correct permissions.
637 =item Can't find %s on PATH, '.' not in PATH
639 (F) You used the B<-S> switch, but the script to execute could not be found
640 in the PATH, or at least not with the correct permissions. The script
641 exists in the current directory, but PATH prohibits running it.
643 =item Can't find %s on PATH
645 (F) You used the B<-S> switch, but the script to execute could not be found
648 =item Can't find label %s
650 (F) You said to goto a label that isn't mentioned anywhere that it's possible
651 for us to go to. See L<perlfunc/goto>.
653 =item Can't find string terminator %s anywhere before EOF
655 (F) Perl strings can stretch over multiple lines. This message means that
656 the closing delimiter was omitted. Because bracketed quotes count nesting
657 levels, the following is missing its final parenthesis:
659 print q(The character '(' starts a side comment.);
661 If you're getting this error from a here-document, you may have
662 included unseen whitespace before or after your closing tag. A good
663 programmer's editor will have a way to help you find these characters.
667 (F) A fatal error occurred while trying to fork while opening a pipeline.
669 =item Can't get filespec - stale stat buffer?
671 (S) A warning peculiar to VMS. This arises because of the difference between
672 access checks under VMS and under the Unix model Perl assumes. Under VMS,
673 access checks are done by filename, rather than by bits in the stat buffer, so
674 that ACLs and other protections can be taken into account. Unfortunately, Perl
675 assumes that the stat buffer contains all the necessary information, and passes
676 it, instead of the filespec, to the access checking routine. It will try to
677 retrieve the filespec using the device name and FID present in the stat buffer,
678 but this works only if you haven't made a subsequent call to the CRTL stat()
679 routine, because the device name is overwritten with each call. If this warning
680 appears, the name lookup failed, and the access checking routine gave up and
681 returned FALSE, just to be conservative. (Note: The access checking routine
682 knows about the Perl C<stat> operator and file tests, so you shouldn't ever
683 see this warning in response to a Perl command; it arises only if some internal
684 code takes stat buffers lightly.)
686 =item Can't get pipe mailbox device name
688 (P) An error peculiar to VMS. After creating a mailbox to act as a pipe, Perl
689 can't retrieve its name for later use.
691 =item Can't get SYSGEN parameter value for MAXBUF
693 (P) An error peculiar to VMS. Perl asked $GETSYI how big you want your
694 mailbox buffers to be, and didn't get an answer.
696 =item Can't goto subroutine outside a subroutine
698 (F) The deeply magical "goto subroutine" call can only replace one subroutine
699 call for another. It can't manufacture one out of whole cloth. In general
700 you should be calling it out of only an AUTOLOAD routine anyway. See
703 =item Can't goto subroutine from an eval-string
705 (F) The "goto subroutine" call can't be used to jump out of an eval "string".
706 (You can use it to jump out of an eval {BLOCK}, but you probably don't want to.)
708 =item Can't localize through a reference
710 (F) You said something like C<local $$ref>, which Perl can't currently
711 handle, because when it goes to restore the old value of whatever $ref
712 pointed to after the scope of the local() is finished, it can't be
713 sure that $ref will still be a reference.
715 =item Can't localize lexical variable %s
717 (F) You used local on a variable name that was previously declared as a
718 lexical variable using "my". This is not allowed. If you want to
719 localize a package variable of the same name, qualify it with the
722 =item Can't localize pseudo-hash element
724 (F) You said something like C<local $ar-E<gt>{'key'}>, where $ar is
725 a reference to a pseudo-hash. That hasn't been implemented yet, but
726 you can get a similar effect by localizing the corresponding array
727 element directly -- C<local $ar-E<gt>[$ar-E<gt>[0]{'key'}]>.
729 =item Can't locate auto/%s.al in @INC
731 (F) A function (or method) was called in a package which allows autoload,
732 but there is no function to autoload. Most probable causes are a misprint
733 in a function/method name or a failure to C<AutoSplit> the file, say, by
734 doing C<make install>.
736 =item Can't locate %s in @INC
738 (F) You said to do (or require, or use) a file that couldn't be found
739 in any of the libraries mentioned in @INC. Perhaps you need to set the
740 PERL5LIB or PERL5OPT environment variable to say where the extra library
741 is, or maybe the script needs to add the library name to @INC. Or maybe
742 you just misspelled the name of the file. See L<perlfunc/require>.
744 =item Can't locate object method "%s" via package "%s"
746 (F) You called a method correctly, and it correctly indicated a package
747 functioning as a class, but that package doesn't define that particular
748 method, nor does any of its base classes. See L<perlobj>.
750 =item Can't locate package %s for @%s::ISA
752 (W) The @ISA array contained the name of another package that doesn't seem
755 =item Can't make list assignment to \%ENV on this system
757 (F) List assignment to %ENV is not supported on some systems, notably VMS.
759 =item Can't modify %s in %s
761 (F) You aren't allowed to assign to the item indicated, or otherwise try to
762 change it, such as with an auto-increment.
764 =item Can't modify nonexistent substring
766 (P) The internal routine that does assignment to a substr() was handed
769 =item Can't msgrcv to read-only var
771 (F) The target of a msgrcv must be modifiable to be used as a receive
774 =item Can't open %s: %s
776 (S) The implicit opening of a file through use of the C<E<lt>E<gt>>
777 filehandle, either implicitly under the C<-n> or C<-p> command-line
778 switches, or explicitly, failed for the indicated reason. Usually this
779 is because you don't have read permission for a file which you named
782 =item Can't open bidirectional pipe
784 (W) You tried to say C<open(CMD, "|cmd|")>, which is not supported. You can
785 try any of several modules in the Perl library to do this, such as
786 IPC::Open2. Alternately, direct the pipe's output to a file using "E<gt>",
787 and then read it in under a different file handle.
789 =item Can't open error file %s as stderr
791 (F) An error peculiar to VMS. Perl does its own command line redirection, and
792 couldn't open the file specified after '2E<gt>' or '2E<gt>E<gt>' on the
793 command line for writing.
795 =item Can't open input file %s as stdin
797 (F) An error peculiar to VMS. Perl does its own command line redirection, and
798 couldn't open the file specified after 'E<lt>' on the command line for reading.
800 =item Can't open output file %s as stdout
802 (F) An error peculiar to VMS. Perl does its own command line redirection, and
803 couldn't open the file specified after 'E<gt>' or 'E<gt>E<gt>' on the command
806 =item Can't open output pipe (name: %s)
808 (P) An error peculiar to VMS. Perl does its own command line redirection, and
809 couldn't open the pipe into which to send data destined for stdout.
811 =item Can't open perl script "%s": %s
813 (F) The script you specified can't be opened for the indicated reason.
815 =item Can't redefine active sort subroutine %s
817 (F) Perl optimizes the internal handling of sort subroutines and keeps
818 pointers into them. You tried to redefine one such sort subroutine when it
819 was currently active, which is not allowed. If you really want to do
820 this, you should write C<sort { &func } @x> instead of C<sort func @x>.
822 =item Can't rename %s to %s: %s, skipping file
824 (S) The rename done by the B<-i> switch failed for some reason, probably because
825 you don't have write permission to the directory.
827 =item Can't reopen input pipe (name: %s) in binary mode
829 (P) An error peculiar to VMS. Perl thought stdin was a pipe, and tried to
830 reopen it to accept binary data. Alas, it failed.
832 =item Can't reswap uid and euid
834 (P) The setreuid() call failed for some reason in the setuid emulator
837 =item Can't return outside a subroutine
839 (F) The return statement was executed in mainline code, that is, where
840 there was no subroutine call to return out of. See L<perlsub>.
842 =item Can't stat script "%s"
844 (P) For some reason you can't fstat() the script even though you have
845 it open already. Bizarre.
847 =item Can't swap uid and euid
849 (P) The setreuid() call failed for some reason in the setuid emulator
852 =item Can't take log of %g
854 (F) For ordinary real numbers, you can't take the logarithm of a
855 negative number or zero. There's a Math::Complex package that comes
856 standard with Perl, though, if you really want to do that for
857 the negative numbers.
859 =item Can't take sqrt of %g
861 (F) For ordinary real numbers, you can't take the square root of a
862 negative number. There's a Math::Complex package that comes standard
863 with Perl, though, if you really want to do that.
865 =item Can't undef active subroutine
867 (F) You can't undefine a routine that's currently running. You can,
868 however, redefine it while it's running, and you can even undef the
869 redefined subroutine while the old routine is running. Go figure.
873 (F) You tried to unshift an "unreal" array that can't be unshifted, such
874 as the main Perl stack.
876 =item Can't upgrade that kind of scalar
878 (P) The internal sv_upgrade routine adds "members" to an SV, making
879 it into a more specialized kind of SV. The top several SV types are
880 so specialized, however, that they cannot be interconverted. This
881 message indicates that such a conversion was attempted.
883 =item Can't upgrade to undef
885 (P) The undefined SV is the bottom of the totem pole, in the scheme
886 of upgradability. Upgrading to undef indicates an error in the
887 code calling sv_upgrade.
889 =item Can't use %%! because Errno.pm is not available
891 (F) The first time the %! hash is used, perl automatically loads the
892 Errno.pm module. The Errno module is expected to tie the %! hash to
893 provide symbolic names for C<$!> errno values.
895 =item Can't use "my %s" in sort comparison
897 (F) The global variables $a and $b are reserved for sort comparisons.
898 You mentioned $a or $b in the same line as the E<lt>=E<gt> or cmp operator,
899 and the variable had earlier been declared as a lexical variable.
900 Either qualify the sort variable with the package name, or rename the
903 =item Can't use %s for loop variable
905 (F) Only a simple scalar variable may be used as a loop variable on a foreach.
907 =item Can't use %s ref as %s ref
909 (F) You've mixed up your reference types. You have to dereference a
910 reference of the type needed. You can use the ref() function to
911 test the type of the reference, if need be.
913 =item Can't use \1 to mean $1 in expression
915 (W) In an ordinary expression, backslash is a unary operator that creates
916 a reference to its argument. The use of backslash to indicate a backreference
917 to a matched substring is valid only as part of a regular expression pattern.
918 Trying to do this in ordinary Perl code produces a value that prints
919 out looking like SCALAR(0xdecaf). Use the $1 form instead.
921 =item Can't use bareword ("%s") as %s ref while \"strict refs\" in use
923 (F) Only hard references are allowed by "strict refs". Symbolic references
924 are disallowed. See L<perlref>.
926 =item Can't use string ("%s") as %s ref while "strict refs" in use
928 (F) Only hard references are allowed by "strict refs". Symbolic references
929 are disallowed. See L<perlref>.
931 =item Can't use an undefined value as %s reference
933 (F) A value used as either a hard reference or a symbolic reference must
934 be a defined value. This helps to delurk some insidious errors.
936 =item Can't use global %s in "my"
938 (F) You tried to declare a magical variable as a lexical variable. This is
939 not allowed, because the magic can be tied to only one location (namely
940 the global variable) and it would be incredibly confusing to have
941 variables in your program that looked like magical variables but
944 =item Can't use subscript on %s
946 (F) The compiler tried to interpret a bracketed expression as a
947 subscript. But to the left of the brackets was an expression that
948 didn't look like an array reference, or anything else subscriptable.
950 =item Can't x= to read-only value
952 (F) You tried to repeat a constant value (often the undefined value) with
953 an assignment operator, which implies modifying the value itself.
954 Perhaps you need to copy the value to a temporary, and repeat that.
956 =item Cannot find an opnumber for "%s"
958 (F) A string of a form C<CORE::word> was given to prototype(), but
959 there is no builtin with the name C<word>.
961 =item Cannot resolve method `%s' overloading `%s' in package `%s'
963 (F|P) Error resolving overloading specified by a method name (as
964 opposed to a subroutine reference): no such method callable via the
965 package. If method name is C<???>, this is an internal error.
967 =item Character class syntax [. .] is reserved for future extensions
969 (W) Within regular expression character classes ([]) the syntax beginning
970 with "[." and ending with ".]" is reserved for future extensions.
971 If you need to represent those character sequences inside a regular
972 expression character class, just quote the square brackets with the
973 backslash: "\[." and ".\]".
975 =item Character class syntax [: :] is reserved for future extensions
977 (W) Within regular expression character classes ([]) the syntax beginning
978 with "[:" and ending with ":]" is reserved for future extensions.
979 If you need to represent those character sequences inside a regular
980 expression character class, just quote the square brackets with the
981 backslash: "\[:" and ":\]".
983 =item Character class syntax [= =] is reserved for future extensions
985 (W) Within regular expression character classes ([]) the syntax
986 beginning with "[=" and ending with "=]" is reserved for future extensions.
987 If you need to represent those character sequences inside a regular
988 expression character class, just quote the square brackets with the
989 backslash: "\[=" and "=\]".
991 =item chmod: mode argument is missing initial 0
993 (W) A novice will sometimes say
997 not realizing that 777 will be interpreted as a decimal number, equivalent
998 to 01411. Octal constants are introduced with a leading 0 in Perl, as in C.
1000 =item Close on unopened file E<lt>%sE<gt>
1002 (W) You tried to close a filehandle that was never opened.
1004 =item Compilation failed in require
1006 (F) Perl could not compile a file specified in a C<require> statement.
1007 Perl uses this generic message when none of the errors that it encountered
1008 were severe enough to halt compilation immediately.
1010 =item Complex regular subexpression recursion limit (%d) exceeded
1012 (W) The regular expression engine uses recursion in complex situations
1013 where back-tracking is required. Recursion depth is limited to 32766,
1014 or perhaps less in architectures where the stack cannot grow
1015 arbitrarily. ("Simple" and "medium" situations are handled without
1016 recursion and are not subject to a limit.) Try shortening the string
1017 under examination; looping in Perl code (e.g. with C<while>) rather
1018 than in the regular expression engine; or rewriting the regular
1019 expression so that it is simpler or backtracks less. (See L<perlbook>
1020 for information on I<Mastering Regular Expressions>.)
1022 =item connect() on closed fd
1024 (W) You tried to do a connect on a closed socket. Did you forget to check
1025 the return value of your socket() call? See L<perlfunc/connect>.
1027 =item Constant is not %s reference
1029 (F) A constant value (perhaps declared using the C<use constant> pragma)
1030 is being dereferenced, but it amounts to the wrong type of reference. The
1031 message indicates the type of reference that was expected. This usually
1032 indicates a syntax error in dereferencing the constant value.
1033 See L<perlsub/"Constant Functions"> and L<constant>.
1035 =item Constant subroutine %s redefined
1037 (S) You redefined a subroutine which had previously been eligible for
1038 inlining. See L<perlsub/"Constant Functions"> for commentary and
1041 =item Constant subroutine %s undefined
1043 (S) You undefined a subroutine which had previously been eligible for
1044 inlining. See L<perlsub/"Constant Functions"> for commentary and
1047 =item Copy method did not return a reference
1049 (F) The method which overloads "=" is buggy. See L<overload/Copy Constructor>.
1051 =item Corrupt malloc ptr 0x%lx at 0x%lx
1053 (P) The malloc package that comes with Perl had an internal failure.
1055 =item corrupted regexp pointers
1057 (P) The regular expression engine got confused by what the regular
1058 expression compiler gave it.
1060 =item corrupted regexp program
1062 (P) The regular expression engine got passed a regexp program without
1063 a valid magic number.
1065 =item Deep recursion on subroutine "%s"
1067 (W) This subroutine has called itself (directly or indirectly) 100
1068 times more than it has returned. This probably indicates an infinite
1069 recursion, unless you're writing strange benchmark programs, in which
1070 case it indicates something else.
1072 =item Delimiter for here document is too long
1074 (F) In a here document construct like C<E<lt>E<lt>FOO>, the label
1075 C<FOO> is too long for Perl to handle. You have to be seriously
1076 twisted to write code that triggers this error.
1078 =item Did you mean &%s instead?
1080 (W) You probably referred to an imported subroutine &FOO as $FOO or some such.
1082 =item Did you mean $ or @ instead of %?
1084 (W) You probably said %hash{$key} when you meant $hash{$key} or @hash{@keys}.
1085 On the other hand, maybe you just meant %hash and got carried away.
1089 (F) You passed die() an empty string (the equivalent of C<die "">) or
1090 you called it with no args and both C<$@> and C<$_> were empty.
1092 =item Do you need to predeclare %s?
1094 (S) This is an educated guess made in conjunction with the message "%s
1095 found where operator expected". It often means a subroutine or module
1096 name is being referenced that hasn't been declared yet. This may be
1097 because of ordering problems in your file, or because of a missing
1098 "sub", "package", "require", or "use" statement. If you're
1099 referencing something that isn't defined yet, you don't actually have
1100 to define the subroutine or package before the current location. You
1101 can use an empty "sub foo;" or "package FOO;" to enter a "forward"
1104 =item Don't know how to handle magic of type '%s'
1106 (P) The internal handling of magical variables has been cursed.
1108 =item do_study: out of memory
1110 (P) This should have been caught by safemalloc() instead.
1112 =item Duplicate free() ignored
1114 (S) An internal routine called free() on something that had already
1117 =item elseif should be elsif
1119 (S) There is no keyword "elseif" in Perl because Larry thinks it's
1120 ugly. Your code will be interpreted as an attempt to call a method
1121 named "elseif" for the class returned by the following block. This is
1122 unlikely to be what you want.
1124 =item END failed--cleanup aborted
1126 (F) An untrapped exception was raised while executing an END subroutine.
1127 The interpreter is immediately exited.
1129 =item entering effective %s failed
1131 (F) While under the C<use filetest> pragma, switching the real and
1132 effective uids or gids failed.
1134 =item Error converting file specification %s
1136 (F) An error peculiar to VMS. Because Perl may have to deal with file
1137 specifications in either VMS or Unix syntax, it converts them to a
1138 single form when it must operate on them directly. Either you've
1139 passed an invalid file specification to Perl, or you've found a
1140 case the conversion routines don't handle. Drat.
1142 =item %s: Eval-group in insecure regular expression
1144 (F) Perl detected tainted data when trying to compile a regular expression
1145 that contains the C<(?{ ... })> zero-width assertion, which is unsafe.
1146 See L<perlre/(?{ code })>, and L<perlsec>.
1148 =item %s: Eval-group not allowed, use re 'eval'
1150 (F) A regular expression contained the C<(?{ ... })> zero-width assertion,
1151 but that construct is only allowed when the C<use re 'eval'> pragma is
1152 in effect. See L<perlre/(?{ code })>.
1154 =item %s: Eval-group not allowed at run time
1156 (F) Perl tried to compile a regular expression containing the C<(?{ ... })>
1157 zero-width assertion at run time, as it would when the pattern contains
1158 interpolated values. Since that is a security risk, it is not allowed.
1159 If you insist, you may still do this by explicitly building the pattern
1160 from an interpolated string at run time and using that in an eval().
1161 See L<perlre/(?{ code })>.
1163 =item Excessively long <> operator
1165 (F) The contents of a <> operator may not exceed the maximum size of a
1166 Perl identifier. If you're just trying to glob a long list of
1167 filenames, try using the glob() operator, or put the filenames into a
1168 variable and glob that.
1170 =item Execution of %s aborted due to compilation errors
1172 (F) The final summary message when a Perl compilation fails.
1174 =item Exiting eval via %s
1176 (W) You are exiting an eval by unconventional means, such as
1177 a goto, or a loop control statement.
1179 =item Exiting pseudo-block via %s
1181 (W) You are exiting a rather special block construct (like a sort block or
1182 subroutine) by unconventional means, such as a goto, or a loop control
1183 statement. See L<perlfunc/sort>.
1185 =item Exiting subroutine via %s
1187 (W) You are exiting a subroutine by unconventional means, such as
1188 a goto, or a loop control statement.
1190 =item Exiting substitution via %s
1192 (W) You are exiting a substitution by unconventional means, such as
1193 a return, a goto, or a loop control statement.
1195 =item Explicit blessing to '' (assuming package main)
1197 (W) You are blessing a reference to a zero length string. This has
1198 the effect of blessing the reference into the package main. This is
1199 usually not what you want. Consider providing a default target
1200 package, e.g. bless($ref, $p || 'MyPackage');
1202 =item Fatal VMS error at %s, line %d
1204 (P) An error peculiar to VMS. Something untoward happened in a VMS system
1205 service or RTL routine; Perl's exit status should provide more details. The
1206 filename in "at %s" and the line number in "line %d" tell you which section of
1207 the Perl source code is distressed.
1209 =item fcntl is not implemented
1211 (F) Your machine apparently doesn't implement fcntl(). What is this, a
1212 PDP-11 or something?
1214 =item Filehandle %s never opened
1216 (W) An I/O operation was attempted on a filehandle that was never initialized.
1217 You need to do an open() or a socket() call, or call a constructor from
1218 the FileHandle package.
1220 =item Filehandle %s opened for only input
1222 (W) You tried to write on a read-only filehandle. If you
1223 intended it to be a read-write filehandle, you needed to open it with
1224 "+E<lt>" or "+E<gt>" or "+E<gt>E<gt>" instead of with "E<lt>" or nothing. If
1225 you intended only to write the file, use "E<gt>" or "E<gt>E<gt>". See
1228 =item Filehandle opened for only input
1230 (W) You tried to write on a read-only filehandle. If you
1231 intended it to be a read-write filehandle, you needed to open it with
1232 "+E<lt>" or "+E<gt>" or "+E<gt>E<gt>" instead of with "E<lt>" or nothing. If
1233 you intended only to write the file, use "E<gt>" or "E<gt>E<gt>". See
1236 =item Final $ should be \$ or $name
1238 (F) You must now decide whether the final $ in a string was meant to be
1239 a literal dollar sign, or was meant to introduce a variable name
1240 that happens to be missing. So you have to put either the backslash or
1243 =item Final @ should be \@ or @name
1245 (F) You must now decide whether the final @ in a string was meant to be
1246 a literal "at" sign, or was meant to introduce a variable name
1247 that happens to be missing. So you have to put either the backslash or
1250 =item Format %s redefined
1252 (W) You redefined a format. To suppress this warning, say
1256 eval "format NAME =...";
1259 =item Format not terminated
1261 (F) A format must be terminated by a line with a solitary dot. Perl got
1262 to the end of your file without finding such a line.
1264 =item Found = in conditional, should be ==
1274 (or something like that).
1276 =item gdbm store returned %d, errno %d, key "%s"
1278 (S) A warning from the GDBM_File extension that a store failed.
1280 =item gethostent not implemented
1282 (F) Your C library apparently doesn't implement gethostent(), probably
1283 because if it did, it'd feel morally obligated to return every hostname
1286 =item get{sock,peer}name() on closed fd
1288 (W) You tried to get a socket or peer socket name on a closed socket.
1289 Did you forget to check the return value of your socket() call?
1291 =item getpwnam returned invalid UIC %#o for user "%s"
1293 (S) A warning peculiar to VMS. The call to C<sys$getuai> underlying the
1294 C<getpwnam> operator returned an invalid UIC.
1296 =item Glob not terminated
1298 (F) The lexer saw a left angle bracket in a place where it was expecting
1299 a term, so it's looking for the corresponding right angle bracket, and not
1300 finding it. Chances are you left some needed parentheses out earlier in
1301 the line, and you really meant a "less than".
1303 =item Global symbol "%s" requires explicit package name
1305 (F) You've said "use strict vars", which indicates that all variables
1306 must either be lexically scoped (using "my"), or explicitly qualified to
1307 say which package the global variable is in (using "::").
1309 =item goto must have label
1311 (F) Unlike with "next" or "last", you're not allowed to goto an
1312 unspecified destination. See L<perlfunc/goto>.
1314 =item Had to create %s unexpectedly
1316 (S) A routine asked for a symbol from a symbol table that ought to have
1317 existed already, but for some reason it didn't, and had to be created on
1318 an emergency basis to prevent a core dump.
1320 =item Hash %%s missing the % in argument %d of %s()
1322 (D) Really old Perl let you omit the % on hash names in some spots. This
1323 is now heavily deprecated.
1325 =item Identifier too long
1327 (F) Perl limits identifiers (names for variables, functions, etc.) to
1328 about 250 characters for simple names, and somewhat more for compound
1329 names (like C<$A::B>). You've exceeded Perl's limits. Future
1330 versions of Perl are likely to eliminate these arbitrary limitations.
1332 =item Ill-formed logical name |%s| in prime_env_iter
1334 (W) A warning peculiar to VMS. A logical name was encountered when preparing
1335 to iterate over %ENV which violates the syntactic rules governing logical
1336 names. Because it cannot be translated normally, it is skipped, and will not
1337 appear in %ENV. This may be a benign occurrence, as some software packages
1338 might directly modify logical name tables and introduce nonstandard names,
1339 or it may indicate that a logical name table has been corrupted.
1341 =item Illegal character %s (carriage return)
1343 (F) A carriage return character was found in the input. This is an
1344 error, and not a warning, because carriage return characters can break
1345 multi-line strings, including here documents (e.g., C<print E<lt>E<lt>EOF;>).
1347 Under Unix, this error is usually caused by executing Perl code --
1348 either the main program, a module, or an eval'd string -- that was
1349 transferred over a network connection from a non-Unix system without
1350 properly converting the text file format.
1352 Under systems that use something other than '\n' to delimit lines of
1353 text, this error can also be caused by reading Perl code from a file
1354 handle that is in binary mode (as set by the C<binmode> operator).
1356 In either case, the Perl code in question will probably need to be
1357 converted with something like C<s/\x0D\x0A?/\n/g> before it can be
1360 =item Illegal division by zero
1362 (F) You tried to divide a number by 0. Either something was wrong in your
1363 logic, or you need to put a conditional in to guard against meaningless input.
1365 =item Illegal modulus zero
1367 (F) You tried to divide a number by 0 to get the remainder. Most numbers
1368 don't take to this kindly.
1370 =item Illegal octal digit
1372 (F) You used an 8 or 9 in a octal number.
1374 =item Illegal octal digit ignored
1376 (W) You may have tried to use an 8 or 9 in a octal number. Interpretation
1377 of the octal number stopped before the 8 or 9.
1379 =item Illegal hex digit ignored
1381 (W) You may have tried to use a character other than 0 - 9 or A - F in a
1382 hexadecimal number. Interpretation of the hexadecimal number stopped
1383 before the illegal character.
1385 =item Illegal switch in PERL5OPT: %s
1387 (X) The PERL5OPT environment variable may only be used to set the
1388 following switches: B<-[DIMUdmw]>.
1390 =item In string, @%s now must be written as \@%s
1392 (F) It used to be that Perl would try to guess whether you wanted an
1393 array interpolated or a literal @. It did this when the string was first
1394 used at runtime. Now strings are parsed at compile time, and ambiguous
1395 instances of @ must be disambiguated, either by prepending a backslash to
1396 indicate a literal, or by declaring (or using) the array within the
1397 program before the string (lexically). (Someday it will simply assume
1398 that an unbackslashed @ interpolates an array.)
1400 =item Insecure dependency in %s
1402 (F) You tried to do something that the tainting mechanism didn't like.
1403 The tainting mechanism is turned on when you're running setuid or setgid,
1404 or when you specify B<-T> to turn it on explicitly. The tainting mechanism
1405 labels all data that's derived directly or indirectly from the user,
1406 who is considered to be unworthy of your trust. If any such data is
1407 used in a "dangerous" operation, you get this error. See L<perlsec>
1408 for more information.
1410 =item Insecure directory in %s
1412 (F) You can't use system(), exec(), or a piped open in a setuid or setgid
1413 script if C<$ENV{PATH}> contains a directory that is writable by the world.
1416 =item Insecure $ENV{%s} while running %s
1418 (F) You can't use system(), exec(), or a piped open in a setuid or
1419 setgid script if any of C<$ENV{PATH}>, C<$ENV{IFS}>, C<$ENV{CDPATH}>,
1420 C<$ENV{ENV}> or C<$ENV{BASH_ENV}> are derived from data supplied (or
1421 potentially supplied) by the user. The script must set the path to a
1422 known value, using trustworthy data. See L<perlsec>.
1424 =item Integer overflow in hex number
1426 (S) The literal hex number you have specified is too big for your
1427 architecture. On a 32-bit architecture the largest hex literal is
1430 =item Integer overflow in octal number
1432 (S) The literal octal number you have specified is too big for your
1433 architecture. On a 32-bit architecture the largest octal literal is
1436 =item Internal inconsistency in tracking vforks
1438 (S) A warning peculiar to VMS. Perl keeps track of the number
1439 of times you've called C<fork> and C<exec>, to determine
1440 whether the current call to C<exec> should affect the current
1441 script or a subprocess (see L<perlvms/"exec LIST">). Somehow, this count
1442 has become scrambled, so Perl is making a guess and treating
1443 this C<exec> as a request to terminate the Perl script
1444 and execute the specified command.
1446 =item internal disaster in regexp
1448 (P) Something went badly wrong in the regular expression parser.
1450 =item glob failed (%s)
1452 (W) Something went wrong with the external program(s) used for C<glob>
1453 and C<E<lt>*.cE<gt>>. Usually, this means that you supplied a C<glob>
1454 pattern that caused the external program to fail and exit with a nonzero
1455 status. If the message indicates that the abnormal exit resulted in a
1456 coredump, this may also mean that your csh (C shell) is broken. If so,
1457 you should change all of the csh-related variables in config.sh: If you
1458 have tcsh, make the variables refer to it as if it were csh (e.g.
1459 C<full_csh='/usr/bin/tcsh'>); otherwise, make them all empty (except that
1460 C<d_csh> should be C<'undef'>) so that Perl will think csh is missing.
1461 In either case, after editing config.sh, run C<./Configure -S> and
1464 =item internal urp in regexp at /%s/
1466 (P) Something went badly awry in the regular expression parser.
1468 =item invalid [] range in regexp
1470 (F) The range specified in a character class had a minimum character
1471 greater than the maximum character. See L<perlre>.
1473 =item Invalid conversion in %s: "%s"
1475 (W) Perl does not understand the given format conversion.
1476 See L<perlfunc/sprintf>.
1478 =item Invalid type in pack: '%s'
1480 (F) The given character is not a valid pack type. See L<perlfunc/pack>.
1481 (W) The given character is not a valid pack type but used to be silently
1484 =item Invalid type in unpack: '%s'
1486 (F) The given character is not a valid unpack type. See L<perlfunc/unpack>.
1487 (W) The given character is not a valid unpack type but used to be silently
1490 =item ioctl is not implemented
1492 (F) Your machine apparently doesn't implement ioctl(), which is pretty
1493 strange for a machine that supports C.
1495 =item junk on end of regexp
1497 (P) The regular expression parser is confused.
1499 =item Label not found for "last %s"
1501 (F) You named a loop to break out of, but you're not currently in a
1502 loop of that name, not even if you count where you were called from.
1503 See L<perlfunc/last>.
1505 =item Label not found for "next %s"
1507 (F) You named a loop to continue, but you're not currently in a loop of
1508 that name, not even if you count where you were called from. See
1511 =item Label not found for "redo %s"
1513 (F) You named a loop to restart, but you're not currently in a loop of
1514 that name, not even if you count where you were called from. See
1517 =item leaving effective %s failed
1519 (F) While under the C<use filetest> pragma, switching the real and
1520 effective uids or gids failed.
1522 =item listen() on closed fd
1524 (W) You tried to do a listen on a closed socket. Did you forget to check
1525 the return value of your socket() call? See L<perlfunc/listen>.
1527 =item Method for operation %s not found in package %s during blessing
1529 (F) An attempt was made to specify an entry in an overloading table that
1530 doesn't resolve to a valid subroutine. See L<overload>.
1532 =item Might be a runaway multi-line %s string starting on line %d
1534 (S) An advisory indicating that the previous error may have been caused
1535 by a missing delimiter on a string or pattern, because it eventually
1536 ended earlier on the current line.
1538 =item Misplaced _ in number
1540 (W) An underline in a decimal constant wasn't on a 3-digit boundary.
1542 =item Missing $ on loop variable
1544 (F) Apparently you've been programming in B<csh> too much. Variables are always
1545 mentioned with the $ in Perl, unlike in the shells, where it can vary from
1546 one line to the next.
1548 =item Missing comma after first argument to %s function
1550 (F) While certain functions allow you to specify a filehandle or an
1551 "indirect object" before the argument list, this ain't one of them.
1553 =item Missing command in piped open
1555 (W) You used the C<open(FH, "| command")> or C<open(FH, "command |")>
1556 construction, but the command was missing or blank.
1558 =item Missing operator before %s?
1560 (S) This is an educated guess made in conjunction with the message "%s
1561 found where operator expected". Often the missing operator is a comma.
1563 =item Missing right bracket
1565 (F) The lexer counted more opening curly brackets (braces) than closing ones.
1566 As a general rule, you'll find it's missing near the place you were last
1569 =item Modification of a read-only value attempted
1571 (F) You tried, directly or indirectly, to change the value of a
1572 constant. You didn't, of course, try "2 = 1", because the compiler
1573 catches that. But an easy way to do the same thing is:
1575 sub mod { $_[0] = 1 }
1578 Another way is to assign to a substr() that's off the end of the string.
1580 =item Modification of non-creatable array value attempted, subscript %d
1582 (F) You tried to make an array value spring into existence, and the
1583 subscript was probably negative, even counting from end of the array
1586 =item Modification of non-creatable hash value attempted, subscript "%s"
1588 (P) You tried to make a hash value spring into existence, and it couldn't
1589 be created for some peculiar reason.
1591 =item Module name must be constant
1593 (F) Only a bare module name is allowed as the first argument to a "use".
1595 =item msg%s not implemented
1597 (F) You don't have System V message IPC on your system.
1599 =item Multidimensional syntax %s not supported
1601 (W) Multidimensional arrays aren't written like C<$foo[1,2,3]>. They're written
1602 like C<$foo[1][2][3]>, as in C.
1604 =item Name "%s::%s" used only once: possible typo
1606 (W) Typographical errors often show up as unique variable names.
1607 If you had a good reason for having a unique name, then just mention
1608 it again somehow to suppress the message. The C<use vars> pragma is
1609 provided for just this purpose.
1611 =item Negative length
1613 (F) You tried to do a read/write/send/recv operation with a buffer length
1614 that is less than 0. This is difficult to imagine.
1616 =item nested *?+ in regexp
1618 (F) You can't quantify a quantifier without intervening parentheses. So
1619 things like ** or +* or ?* are illegal.
1621 Note, however, that the minimal matching quantifiers, C<*?>, C<+?>, and C<??> appear
1622 to be nested quantifiers, but aren't. See L<perlre>.
1626 (F) The setuid emulator requires that scripts have a well-formed #! line
1627 even on machines that don't support the #! construct.
1629 =item No %s allowed while running setuid
1631 (F) Certain operations are deemed to be too insecure for a setuid or setgid
1632 script to even be allowed to attempt. Generally speaking there will be
1633 another way to do what you want that is, if not secure, at least securable.
1636 =item No B<-e> allowed in setuid scripts
1638 (F) A setuid script can't be specified by the user.
1640 =item No comma allowed after %s
1642 (F) A list operator that has a filehandle or "indirect object" is not
1643 allowed to have a comma between that and the following arguments.
1644 Otherwise it'd be just another one of the arguments.
1646 One possible cause for this is that you expected to have imported a
1647 constant to your name space with B<use> or B<import> while no such
1648 importing took place, it may for example be that your operating system
1649 does not support that particular constant. Hopefully you did use an
1650 explicit import list for the constants you expect to see, please see
1651 L<perlfunc/use> and L<perlfunc/import>. While an explicit import list
1652 would probably have caught this error earlier it naturally does not
1653 remedy the fact that your operating system still does not support that
1654 constant. Maybe you have a typo in the constants of the symbol import
1655 list of B<use> or B<import> or in the constant name at the line where
1656 this error was triggered?
1658 =item No command into which to pipe on command line
1660 (F) An error peculiar to VMS. Perl handles its own command line redirection,
1661 and found a '|' at the end of the command line, so it doesn't know where you
1662 want to pipe the output from this command.
1664 =item No DB::DB routine defined
1666 (F) The currently executing code was compiled with the B<-d> switch,
1667 but for some reason the perl5db.pl file (or some facsimile thereof)
1668 didn't define a routine to be called at the beginning of each
1669 statement. Which is odd, because the file should have been required
1670 automatically, and should have blown up the require if it didn't parse
1673 =item No dbm on this machine
1675 (P) This is counted as an internal error, because every machine should
1676 supply dbm nowadays, because Perl comes with SDBM. See L<SDBM_File>.
1678 =item No DBsub routine
1680 (F) The currently executing code was compiled with the B<-d> switch,
1681 but for some reason the perl5db.pl file (or some facsimile thereof)
1682 didn't define a DB::sub routine to be called at the beginning of each
1683 ordinary subroutine call.
1685 =item No error file after 2E<gt> or 2E<gt>E<gt> on command line
1687 (F) An error peculiar to VMS. Perl handles its own command line redirection,
1688 and found a '2E<gt>' or a '2E<gt>E<gt>' on the command line, but can't find
1689 the name of the file to which to write data destined for stderr.
1691 =item No input file after E<lt> on command line
1693 (F) An error peculiar to VMS. Perl handles its own command line redirection,
1694 and found a 'E<lt>' on the command line, but can't find the name of the file
1695 from which to read data for stdin.
1697 =item No output file after E<gt> on command line
1699 (F) An error peculiar to VMS. Perl handles its own command line redirection,
1700 and found a lone 'E<gt>' at the end of the command line, so it doesn't know
1701 where you wanted to redirect stdout.
1703 =item No output file after E<gt> or E<gt>E<gt> on command line
1705 (F) An error peculiar to VMS. Perl handles its own command line redirection,
1706 and found a 'E<gt>' or a 'E<gt>E<gt>' on the command line, but can't find the
1707 name of the file to which to write data destined for stdout.
1709 =item No Perl script found in input
1711 (F) You called C<perl -x>, but no line was found in the file beginning
1712 with #! and containing the word "perl".
1714 =item No setregid available
1716 (F) Configure didn't find anything resembling the setregid() call for
1719 =item No setreuid available
1721 (F) Configure didn't find anything resembling the setreuid() call for
1724 =item No space allowed after B<-I>
1726 (F) The argument to B<-I> must follow the B<-I> immediately with no
1729 =item No such array field
1731 (F) You tried to access an array as a hash, but the field name used is
1732 not defined. The hash at index 0 should map all valid field names to
1733 array indices for that to work.
1735 =item No such field "%s" in variable %s of type %s
1737 (F) You tried to access a field of a typed variable where the type
1738 does not know about the field name. The field names are looked up in
1739 the %FIELDS hash in the type package at compile time. The %FIELDS hash
1740 is usually set up with the 'fields' pragma.
1742 =item No such pipe open
1744 (P) An error peculiar to VMS. The internal routine my_pclose() tried to
1745 close a pipe which hadn't been opened. This should have been caught earlier as
1746 an attempt to close an unopened filehandle.
1748 =item No such signal: SIG%s
1750 (W) You specified a signal name as a subscript to %SIG that was not recognized.
1751 Say C<kill -l> in your shell to see the valid signal names on your system.
1753 =item no UTC offset information; assuming local time is UTC
1755 (S) A warning peculiar to VMS. Per was unable to find the local
1756 timezone offset, so it's assuming that local system time is equivalent
1757 to UTC. If it's not, define the logical name F<SYS$TIMEZONE_DIFFERENTIAL>
1758 to translate to the number of seconds which need to be added to UTC to
1761 =item Not a CODE reference
1763 (F) Perl was trying to evaluate a reference to a code value (that is, a
1764 subroutine), but found a reference to something else instead. You can
1765 use the ref() function to find out what kind of ref it really was.
1766 See also L<perlref>.
1768 =item Not a format reference
1770 (F) I'm not sure how you managed to generate a reference to an anonymous
1771 format, but this indicates you did, and that it didn't exist.
1773 =item Not a GLOB reference
1775 (F) Perl was trying to evaluate a reference to a "typeglob" (that is,
1776 a symbol table entry that looks like C<*foo>), but found a reference to
1777 something else instead. You can use the ref() function to find out
1778 what kind of ref it really was. See L<perlref>.
1780 =item Not a HASH reference
1782 (F) Perl was trying to evaluate a reference to a hash value, but
1783 found a reference to something else instead. You can use the ref()
1784 function to find out what kind of ref it really was. See L<perlref>.
1786 =item Not a perl script
1788 (F) The setuid emulator requires that scripts have a well-formed #! line
1789 even on machines that don't support the #! construct. The line must
1792 =item Not a SCALAR reference
1794 (F) Perl was trying to evaluate a reference to a scalar value, but
1795 found a reference to something else instead. You can use the ref()
1796 function to find out what kind of ref it really was. See L<perlref>.
1798 =item Not a subroutine reference
1800 (F) Perl was trying to evaluate a reference to a code value (that is, a
1801 subroutine), but found a reference to something else instead. You can
1802 use the ref() function to find out what kind of ref it really was.
1803 See also L<perlref>.
1805 =item Not a subroutine reference in overload table
1807 (F) An attempt was made to specify an entry in an overloading table that
1808 doesn't somehow point to a valid subroutine. See L<overload>.
1810 =item Not an ARRAY reference
1812 (F) Perl was trying to evaluate a reference to an array value, but
1813 found a reference to something else instead. You can use the ref()
1814 function to find out what kind of ref it really was. See L<perlref>.
1816 =item Not enough arguments for %s
1818 (F) The function requires more arguments than you specified.
1820 =item Not enough format arguments
1822 (W) A format specified more picture fields than the next line supplied.
1825 =item Null filename used
1827 (F) You can't require the null filename, especially because on many machines
1828 that means the current directory! See L<perlfunc/require>.
1830 =item Null picture in formline
1832 (F) The first argument to formline must be a valid format picture
1833 specification. It was found to be empty, which probably means you
1834 supplied it an uninitialized value. See L<perlform>.
1836 =item NULL OP IN RUN
1838 (P) Some internal routine called run() with a null opcode pointer.
1842 (P) An attempt was made to realloc NULL.
1844 =item NULL regexp argument
1846 (P) The internal pattern matching routines blew it big time.
1848 =item NULL regexp parameter
1850 (P) The internal pattern matching routines are out of their gourd.
1852 =item Number too long
1854 (F) Perl limits the representation of decimal numbers in programs to about
1855 about 250 characters. You've exceeded that length. Future versions of
1856 Perl are likely to eliminate this arbitrary limitation. In the meantime,
1857 try using scientific notation (e.g. "1e6" instead of "1_000_000").
1859 =item Odd number of elements in hash assignment
1861 (S) You specified an odd number of elements to initialize a hash, which
1862 is odd, because hashes come in key/value pairs.
1864 =item Offset outside string
1866 (F) You tried to do a read/write/send/recv operation with an offset
1867 pointing outside the buffer. This is difficult to imagine.
1868 The sole exception to this is that C<sysread()>ing past the buffer
1869 will extend the buffer and zero pad the new area.
1873 (S) An internal warning that the grammar is screwed up.
1877 (S) An internal warning that the grammar is screwed up.
1879 =item Operation `%s': no method found, %s
1881 (F) An attempt was made to perform an overloaded operation for which
1882 no handler was defined. While some handlers can be autogenerated in
1883 terms of other handlers, there is no default handler for any
1884 operation, unless C<fallback> overloading key is specified to be
1885 true. See L<overload>.
1887 =item Operator or semicolon missing before %s
1889 (S) You used a variable or subroutine call where the parser was
1890 expecting an operator. The parser has assumed you really meant
1891 to use an operator, but this is highly likely to be incorrect.
1892 For example, if you say "*foo *foo" it will be interpreted as
1893 if you said "*foo * 'foo'".
1895 =item Out of memory for yacc stack
1897 (F) The yacc parser wanted to grow its stack so it could continue parsing,
1898 but realloc() wouldn't give it more memory, virtual or otherwise.
1900 =item Out of memory during request for %s
1902 (X|F) The malloc() function returned 0, indicating there was insufficient
1903 remaining memory (or virtual memory) to satisfy the request.
1905 The request was judged to be small, so the possibility to trap it
1906 depends on the way perl was compiled. By default it is not trappable.
1907 However, if compiled for this, Perl may use the contents of C<$^M> as
1908 an emergency pool after die()ing with this message. In this case the
1909 error is trappable I<once>.
1911 =item Out of memory during "large" request for %s
1913 (F) The malloc() function returned 0, indicating there was insufficient
1914 remaining memory (or virtual memory) to satisfy the request. However,
1915 the request was judged large enough (compile-time default is 64K), so
1916 a possibility to shut down by trapping this error is granted.
1918 =item Out of memory during ridiculously large request
1920 (F) You can't allocate more than 2^31+"small amount" bytes. This error
1921 is most likely to be caused by a typo in the Perl program. e.g., C<$arr[time]>
1922 instead of C<$arr[$time]>.
1926 (W) A single call to write() produced more lines than can fit on a page.
1929 =item panic: ck_grep
1931 (P) Failed an internal consistency check trying to compile a grep.
1933 =item panic: ck_split
1935 (P) Failed an internal consistency check trying to compile a split.
1937 =item panic: corrupt saved stack index
1939 (P) The savestack was requested to restore more localized values than there
1940 are in the savestack.
1944 (P) We popped the context stack to an eval context, and then discovered
1945 it wasn't an eval context.
1947 =item panic: do_match
1949 (P) The internal pp_match() routine was called with invalid operational data.
1951 =item panic: do_split
1953 (P) Something terrible went wrong in setting up for the split.
1955 =item panic: do_subst
1957 (P) The internal pp_subst() routine was called with invalid operational data.
1959 =item panic: do_trans
1961 (P) The internal do_trans() routine was called with invalid operational data.
1965 (P) The library function frexp() failed, making printf("%f") impossible.
1969 (P) We popped the context stack to a context with the specified label,
1970 and then discovered it wasn't a context we know how to do a goto in.
1972 =item panic: INTERPCASEMOD
1974 (P) The lexer got into a bad state at a case modifier.
1976 =item panic: INTERPCONCAT
1978 (P) The lexer got into a bad state parsing a string with brackets.
1982 (P) We popped the context stack to a block context, and then discovered
1983 it wasn't a block context.
1985 =item panic: leave_scope clearsv
1987 (P) A writable lexical variable became read-only somehow within the scope.
1989 =item panic: leave_scope inconsistency
1991 (P) The savestack probably got out of sync. At least, there was an
1992 invalid enum on the top of it.
1996 (P) Something requested a negative number of bytes of malloc.
1998 =item panic: mapstart
2000 (P) The compiler is screwed up with respect to the map() function.
2002 =item panic: null array
2004 (P) One of the internal array routines was passed a null AV pointer.
2006 =item panic: pad_alloc
2008 (P) The compiler got confused about which scratch pad it was allocating
2009 and freeing temporaries and lexicals from.
2011 =item panic: pad_free curpad
2013 (P) The compiler got confused about which scratch pad it was allocating
2014 and freeing temporaries and lexicals from.
2016 =item panic: pad_free po
2018 (P) An invalid scratch pad offset was detected internally.
2020 =item panic: pad_reset curpad
2022 (P) The compiler got confused about which scratch pad it was allocating
2023 and freeing temporaries and lexicals from.
2025 =item panic: pad_sv po
2027 (P) An invalid scratch pad offset was detected internally.
2029 =item panic: pad_swipe curpad
2031 (P) The compiler got confused about which scratch pad it was allocating
2032 and freeing temporaries and lexicals from.
2034 =item panic: pad_swipe po
2036 (P) An invalid scratch pad offset was detected internally.
2038 =item panic: pp_iter
2040 (P) The foreach iterator got called in a non-loop context frame.
2042 =item panic: realloc
2044 (P) Something requested a negative number of bytes of realloc.
2046 =item panic: restartop
2048 (P) Some internal routine requested a goto (or something like it), and
2049 didn't supply the destination.
2053 (P) We popped the context stack to a subroutine or eval context, and
2054 then discovered it wasn't a subroutine or eval context.
2056 =item panic: scan_num
2058 (P) scan_num() got called on something that wasn't a number.
2060 =item panic: sv_insert
2062 (P) The sv_insert() routine was told to remove more string than there
2065 =item panic: top_env
2067 (P) The compiler attempted to do a goto, or something weird like that.
2071 (P) The lexer got into a bad state while processing a case modifier.
2073 =item Parentheses missing around "%s" list
2075 (W) You said something like
2081 my ($foo, $bar) = @_;
2083 Remember that "my" and "local" bind closer than comma.
2085 =item Perl %3.3f required--this is only version %s, stopped
2087 (F) The module in question uses features of a version of Perl more recent
2088 than the currently running version. How long has it been since you upgraded,
2089 anyway? See L<perlfunc/require>.
2091 =item Permission denied
2093 (F) The setuid emulator in suidperl decided you were up to no good.
2095 =item pid %x not a child
2097 (W) A warning peculiar to VMS. Waitpid() was asked to wait for a process which
2098 isn't a subprocess of the current process. While this is fine from VMS'
2099 perspective, it's probably not what you intended.
2101 =item POSIX getpgrp can't take an argument
2103 (F) Your C compiler uses POSIX getpgrp(), which takes no argument, unlike
2104 the BSD version, which takes a pid.
2106 =item Possible attempt to put comments in qw() list
2108 (W) qw() lists contain items separated by whitespace; as with literal
2109 strings, comment characters are not ignored, but are instead treated
2110 as literal data. (You may have used different delimiters than the
2111 parentheses shown here; braces are also frequently used.)
2113 You probably wrote something like this:
2120 when you should have written this:
2127 If you really want comments, build your list the
2128 old-fashioned way, with quotes and commas:
2132 'b', # another comment
2135 =item Possible attempt to separate words with commas
2137 (W) qw() lists contain items separated by whitespace; therefore commas
2138 aren't needed to separate the items. (You may have used different
2139 delimiters than the parentheses shown here; braces are also frequently
2142 You probably wrote something like this:
2146 which puts literal commas into some of the list items. Write it without
2147 commas if you don't want them to appear in your data:
2151 =item Possible memory corruption: %s overflowed 3rd argument
2153 (F) An ioctl() or fcntl() returned more than Perl was bargaining for.
2154 Perl guesses a reasonable buffer size, but puts a sentinel byte at the
2155 end of the buffer just in case. This sentinel byte got clobbered, and
2156 Perl assumes that memory is now corrupted. See L<perlfunc/ioctl>.
2158 =item Precedence problem: open %s should be open(%s)
2160 (S) The old irregular construct
2164 is now misinterpreted as
2168 because of the strict regularization of Perl 5's grammar into unary
2169 and list operators. (The old open was a little of both.) You must
2170 put parentheses around the filehandle, or use the new "or" operator
2173 =item print on closed filehandle %s
2175 (W) The filehandle you're printing on got itself closed sometime before now.
2176 Check your logic flow.
2178 =item printf on closed filehandle %s
2180 (W) The filehandle you're writing to got itself closed sometime before now.
2181 Check your logic flow.
2183 =item Probable precedence problem on %s
2185 (W) The compiler found a bareword where it expected a conditional,
2186 which often indicates that an || or && was parsed as part of the
2187 last argument of the previous construct, for example:
2191 =item Prototype mismatch: %s vs %s
2193 (S) The subroutine being declared or defined had previously been declared
2194 or defined with a different function prototype.
2196 =item Range iterator outside integer range
2198 (F) One (or both) of the numeric arguments to the range operator ".."
2199 are outside the range which can be represented by integers internally.
2200 One possible workaround is to force Perl to use magical string
2201 increment by prepending "0" to your numbers.
2203 =item Read on closed filehandle E<lt>%sE<gt>
2205 (W) The filehandle you're reading from got itself closed sometime before now.
2206 Check your logic flow.
2208 =item Reallocation too large: %lx
2210 (F) You can't allocate more than 64K on an MS-DOS machine.
2212 =item Recompile perl with B<-D>DEBUGGING to use B<-D> switch
2214 (F) You can't use the B<-D> option unless the code to produce the
2215 desired output is compiled into Perl, which entails some overhead,
2216 which is why it's currently left out of your copy.
2218 =item Recursive inheritance detected in package '%s'
2220 (F) More than 100 levels of inheritance were used. Probably indicates
2221 an unintended loop in your inheritance hierarchy.
2223 =item Recursive inheritance detected while looking for method '%s' in package '%s'
2225 (F) More than 100 levels of inheritance were encountered while invoking a
2226 method. Probably indicates an unintended loop in your inheritance hierarchy.
2228 =item Reference found where even-sized list expected
2230 (W) You gave a single reference where Perl was expecting a list with
2231 an even number of elements (for assignment to a hash). This
2232 usually means that you used the anon hash constructor when you meant
2233 to use parens. In any case, a hash requires key/value B<pairs>.
2235 %hash = { one => 1, two => 2, }; # WRONG
2236 %hash = [ qw/ an anon array / ]; # WRONG
2237 %hash = ( one => 1, two => 2, ); # right
2238 %hash = qw( one 1 two 2 ); # also fine
2240 =item Reference miscount in sv_replace()
2242 (W) The internal sv_replace() function was handed a new SV with a
2243 reference count of other than 1.
2245 =item regexp *+ operand could be empty
2247 (F) The part of the regexp subject to either the * or + quantifier
2248 could match an empty string.
2250 =item regexp memory corruption
2252 (P) The regular expression engine got confused by what the regular
2253 expression compiler gave it.
2255 =item regexp out of space
2257 (P) A "can't happen" error, because safemalloc() should have caught it earlier.
2259 =item Reversed %s= operator
2261 (W) You wrote your assignment operator backwards. The = must always
2262 comes last, to avoid ambiguity with subsequent unary operators.
2264 =item Runaway format
2266 (F) Your format contained the ~~ repeat-until-blank sequence, but it
2267 produced 200 lines at once, and the 200th line looked exactly like the
2268 199th line. Apparently you didn't arrange for the arguments to exhaust
2269 themselves, either by using ^ instead of @ (for scalar variables), or by
2270 shifting or popping (for array variables). See L<perlform>.
2272 =item Scalar value @%s[%s] better written as $%s[%s]
2274 (W) You've used an array slice (indicated by @) to select a single element of
2275 an array. Generally it's better to ask for a scalar value (indicated by $).
2276 The difference is that C<$foo[&bar]> always behaves like a scalar, both when
2277 assigning to it and when evaluating its argument, while C<@foo[&bar]> behaves
2278 like a list when you assign to it, and provides a list context to its
2279 subscript, which can do weird things if you're expecting only one subscript.
2281 On the other hand, if you were actually hoping to treat the array
2282 element as a list, you need to look into how references work, because
2283 Perl will not magically convert between scalars and lists for you. See
2286 =item Scalar value @%s{%s} better written as $%s{%s}
2288 (W) You've used a hash slice (indicated by @) to select a single element of
2289 a hash. Generally it's better to ask for a scalar value (indicated by $).
2290 The difference is that C<$foo{&bar}> always behaves like a scalar, both when
2291 assigning to it and when evaluating its argument, while C<@foo{&bar}> behaves
2292 like a list when you assign to it, and provides a list context to its
2293 subscript, which can do weird things if you're expecting only one subscript.
2295 On the other hand, if you were actually hoping to treat the hash
2296 element as a list, you need to look into how references work, because
2297 Perl will not magically convert between scalars and lists for you. See
2300 =item Script is not setuid/setgid in suidperl
2302 (F) Oddly, the suidperl program was invoked on a script without a setuid
2303 or setgid bit set. This doesn't make much sense.
2305 =item Search pattern not terminated
2307 (F) The lexer couldn't find the final delimiter of a // or m{}
2308 construct. Remember that bracketing delimiters count nesting level.
2309 Missing the leading C<$> from a variable C<$m> may cause this error.
2311 =item %sseek() on unopened file
2313 (W) You tried to use the seek() or sysseek() function on a filehandle that
2314 was either never opened or has since been closed.
2316 =item select not implemented
2318 (F) This machine doesn't implement the select() system call.
2320 =item sem%s not implemented
2322 (F) You don't have System V semaphore IPC on your system.
2324 =item semi-panic: attempt to dup freed string
2326 (S) The internal newSVsv() routine was called to duplicate a scalar
2327 that had previously been marked as free.
2329 =item Semicolon seems to be missing
2331 (W) A nearby syntax error was probably caused by a missing semicolon,
2332 or possibly some other missing operator, such as a comma.
2334 =item Send on closed socket
2336 (W) The filehandle you're sending to got itself closed sometime before now.
2337 Check your logic flow.
2339 =item Sequence (? incomplete
2341 (F) A regular expression ended with an incomplete extension (?.
2344 =item Sequence (?#... not terminated
2346 (F) A regular expression comment must be terminated by a closing
2347 parenthesis. Embedded parentheses aren't allowed. See L<perlre>.
2349 =item Sequence (?%s...) not implemented
2351 (F) A proposed regular expression extension has the character reserved
2352 but has not yet been written. See L<perlre>.
2354 =item Sequence (?%s...) not recognized
2356 (F) You used a regular expression extension that doesn't make sense.
2361 Also known as "500 Server error".
2363 B<This is a CGI error, not a Perl error>.
2365 You need to make sure your script is executable, is accessible by the user
2366 CGI is running the script under (which is probably not the user account you
2367 tested it under), does not rely on any environment variables (like PATH)
2368 from the user it isn't running under, and isn't in a location where the CGI
2369 server can't find it, basically, more or less. Please see the following
2370 for more information:
2372 http://www.perl.com/perl/faq/idiots-guide.html
2373 http://www.perl.com/perl/faq/perl-cgi-faq.html
2374 ftp://rtfm.mit.edu/pub/usenet/news.answers/www/cgi-faq
2375 http://hoohoo.ncsa.uiuc.edu/cgi/interface.html
2376 http://www-genome.wi.mit.edu/WWW/faqs/www-security-faq.html
2378 =item setegid() not implemented
2380 (F) You tried to assign to C<$)>, and your operating system doesn't support
2381 the setegid() system call (or equivalent), or at least Configure didn't
2384 =item seteuid() not implemented
2386 (F) You tried to assign to C<$E<gt>>, and your operating system doesn't support
2387 the seteuid() system call (or equivalent), or at least Configure didn't
2390 =item setrgid() not implemented
2392 (F) You tried to assign to C<$(>, and your operating system doesn't support
2393 the setrgid() system call (or equivalent), or at least Configure didn't
2396 =item setruid() not implemented
2398 (F) You tried to assign to C<$E<lt>>, and your operating system doesn't support
2399 the setruid() system call (or equivalent), or at least Configure didn't
2402 =item Setuid/gid script is writable by world
2404 (F) The setuid emulator won't run a script that is writable by the world,
2405 because the world might have written on it already.
2407 =item shm%s not implemented
2409 (F) You don't have System V shared memory IPC on your system.
2411 =item shutdown() on closed fd
2413 (W) You tried to do a shutdown on a closed socket. Seems a bit superfluous.
2415 =item SIG%s handler "%s" not defined
2417 (W) The signal handler named in %SIG doesn't, in fact, exist. Perhaps you
2418 put it into the wrong package?
2420 =item sort is now a reserved word
2422 (F) An ancient error message that almost nobody ever runs into anymore.
2423 But before sort was a keyword, people sometimes used it as a filehandle.
2425 =item Sort subroutine didn't return a numeric value
2427 (F) A sort comparison routine must return a number. You probably blew
2428 it by not using C<E<lt>=E<gt>> or C<cmp>, or by not using them correctly.
2429 See L<perlfunc/sort>.
2431 =item Sort subroutine didn't return single value
2433 (F) A sort comparison subroutine may not return a list value with more
2434 or less than one element. See L<perlfunc/sort>.
2438 (P) The split was looping infinitely. (Obviously, a split shouldn't iterate
2439 more times than there are characters of input, which is what happened.)
2440 See L<perlfunc/split>.
2442 =item Stat on unopened file E<lt>%sE<gt>
2444 (W) You tried to use the stat() function (or an equivalent file test)
2445 on a filehandle that was either never opened or has since been closed.
2447 =item Statement unlikely to be reached
2449 (W) You did an exec() with some statement after it other than a die().
2450 This is almost always an error, because exec() never returns unless
2451 there was a failure. You probably wanted to use system() instead,
2452 which does return. To suppress this warning, put the exec() in a block
2455 =item Strange *+?{} on zero-length expression
2457 (W) You applied a regular expression quantifier in a place where it
2458 makes no sense, such as on a zero-width assertion.
2459 Try putting the quantifier inside the assertion instead. For example,
2460 the way to match "abc" provided that it is followed by three
2461 repetitions of "xyz" is C</abc(?=(?:xyz){3})/>, not C</abc(?=xyz){3}/>.
2463 =item Stub found while resolving method `%s' overloading `%s' in package `%s'
2465 (P) Overloading resolution over @ISA tree may be broken by importation stubs.
2466 Stubs should never be implicitely created, but explicit calls to C<can>
2469 =item Subroutine %s redefined
2471 (W) You redefined a subroutine. To suppress this warning, say
2475 eval "sub name { ... }";
2478 =item Substitution loop
2480 (P) The substitution was looping infinitely. (Obviously, a
2481 substitution shouldn't iterate more times than there are characters of
2482 input, which is what happened.) See the discussion of substitution in
2483 L<perlop/"Quote and Quote-like Operators">.
2485 =item Substitution pattern not terminated
2487 (F) The lexer couldn't find the interior delimiter of a s/// or s{}{}
2488 construct. Remember that bracketing delimiters count nesting level.
2489 Missing the leading C<$> from variable C<$s> may cause this error.
2491 =item Substitution replacement not terminated
2493 (F) The lexer couldn't find the final delimiter of a s/// or s{}{}
2494 construct. Remember that bracketing delimiters count nesting level.
2495 Missing the leading C<$> from variable C<$s> may cause this error.
2497 =item substr outside of string
2499 (S),(W) You tried to reference a substr() that pointed outside of a
2500 string. That is, the absolute value of the offset was larger than the
2501 length of the string. See L<perlfunc/substr>. This warning is
2502 mandatory if substr is used in an lvalue context (as the left hand side
2503 of an assignment or as a subroutine argument for example).
2505 =item suidperl is no longer needed since %s
2507 (F) Your Perl was compiled with B<-D>SETUID_SCRIPTS_ARE_SECURE_NOW, but a
2508 version of the setuid emulator somehow got run anyway.
2510 =item switching effective %s is not implemented
2512 (F) While under the C<use filetest> pragma, we cannot switch the
2513 real and effective uids or gids.
2517 (F) Probably means you had a syntax error. Common reasons include:
2519 A keyword is misspelled.
2520 A semicolon is missing.
2522 An opening or closing parenthesis is missing.
2523 An opening or closing brace is missing.
2524 A closing quote is missing.
2526 Often there will be another error message associated with the syntax
2527 error giving more information. (Sometimes it helps to turn on B<-w>.)
2528 The error message itself often tells you where it was in the line when
2529 it decided to give up. Sometimes the actual error is several tokens
2530 before this, because Perl is good at understanding random input.
2531 Occasionally the line number may be misleading, and once in a blue moon
2532 the only way to figure out what's triggering the error is to call
2533 C<perl -c> repeatedly, chopping away half the program each time to see
2534 if the error went away. Sort of the cybernetic version of S<20 questions>.
2536 =item syntax error at line %d: `%s' unexpected
2538 (A) You've accidentally run your script through the Bourne shell
2539 instead of Perl. Check the #! line, or manually feed your script
2542 =item System V %s is not implemented on this machine
2544 (F) You tried to do something with a function beginning with "sem",
2545 "shm", or "msg" but that System V IPC is not implemented in your
2546 machine. In some machines the functionality can exist but be
2547 unconfigured. Consult your system support.
2549 =item Syswrite on closed filehandle
2551 (W) The filehandle you're writing to got itself closed sometime before now.
2552 Check your logic flow.
2554 =item Target of goto is too deeply nested
2556 (F) You tried to use C<goto> to reach a label that was too deeply
2557 nested for Perl to reach. Perl is doing you a favor by refusing.
2559 =item tell() on unopened file
2561 (W) You tried to use the tell() function on a filehandle that was either
2562 never opened or has since been closed.
2564 =item Test on unopened file E<lt>%sE<gt>
2566 (W) You tried to invoke a file test operator on a filehandle that isn't
2567 open. Check your logic. See also L<perlfunc/-X>.
2569 =item That use of $[ is unsupported
2571 (F) Assignment to C<$[> is now strictly circumscribed, and interpreted as
2572 a compiler directive. You may say only one of
2581 This is to prevent the problem of one module changing the array base
2582 out from under another module inadvertently. See L<perlvar/$[>.
2584 =item The %s function is unimplemented
2586 The function indicated isn't implemented on this architecture, according
2587 to the probings of Configure.
2589 =item The crypt() function is unimplemented due to excessive paranoia
2591 (F) Configure couldn't find the crypt() function on your machine,
2592 probably because your vendor didn't supply it, probably because they
2593 think the U.S. Government thinks it's a secret, or at least that they
2594 will continue to pretend that it is. And if you quote me on that, I
2597 =item The stat preceding C<-l _> wasn't an lstat
2599 (F) It makes no sense to test the current stat buffer for symbolic linkhood
2600 if the last stat that wrote to the stat buffer already went past
2601 the symlink to get to the real file. Use an actual filename instead.
2603 =item times not implemented
2605 (F) Your version of the C library apparently doesn't do times(). I suspect
2606 you're not running on Unix.
2608 =item Too few args to syscall
2610 (F) There has to be at least one argument to syscall() to specify the
2611 system call to call, silly dilly.
2613 =item Too late for "B<-T>" option
2615 (X) The #! line (or local equivalent) in a Perl script contains the
2616 B<-T> option, but Perl was not invoked with B<-T> in its command line.
2617 This is an error because, by the time Perl discovers a B<-T> in a
2618 script, it's too late to properly taint everything from the environment.
2621 If the Perl script is being executed as a command using the #!
2622 mechanism (or its local equivalent), this error can usually be fixed
2623 by editing the #! line so that the B<-T> option is a part of Perl's
2624 first argument: e.g. change C<perl -n -T> to C<perl -T -n>.
2626 If the Perl script is being executed as C<perl scriptname>, then the
2627 B<-T> option must appear on the command line: C<perl -T scriptname>.
2629 =item Too late for "-%s" option
2631 (X) The #! line (or local equivalent) in a Perl script contains the
2632 B<-M> or B<-m> option. This is an error because B<-M> and B<-m> options
2633 are not intended for use inside scripts. Use the C<use> pragma instead.
2639 (A) You've accidentally run your script through B<csh> instead
2640 of Perl. Check the #! line, or manually feed your script into
2643 =item Too many args to syscall
2645 (F) Perl supports a maximum of only 14 args to syscall().
2647 =item Too many arguments for %s
2649 (F) The function requires fewer arguments than you specified.
2651 =item trailing \ in regexp
2653 (F) The regular expression ends with an unbackslashed backslash. Backslash
2656 =item Transliteration pattern not terminated
2658 (F) The lexer couldn't find the interior delimiter of a tr/// or tr[][]
2659 or y/// or y[][] construct. Missing the leading C<$> from variables
2660 C<$tr> or C<$y> may cause this error.
2662 =item Transliteration replacement not terminated
2664 (F) The lexer couldn't find the final delimiter of a tr/// or tr[][]
2667 =item truncate not implemented
2669 (F) Your machine doesn't implement a file truncation mechanism that
2670 Configure knows about.
2672 =item Type of arg %d to %s must be %s (not %s)
2674 (F) This function requires the argument in that position to be of a
2675 certain type. Arrays must be @NAME or C<@{EXPR}>. Hashes must be
2676 %NAME or C<%{EXPR}>. No implicit dereferencing is allowed--use the
2677 {EXPR} forms as an explicit dereference. See L<perlref>.
2679 =item umask: argument is missing initial 0
2681 (W) A umask of 222 is incorrect. It should be 0222, because octal
2682 literals always start with 0 in Perl, as in C.
2684 =item umask not implemented
2686 (F) Your machine doesn't implement the umask function and you tried
2687 to use it to restrict permissions for yourself (EXPR & 0700).
2689 =item Unable to create sub named "%s"
2691 (F) You attempted to create or access a subroutine with an illegal name.
2693 =item Unbalanced context: %d more PUSHes than POPs
2695 (W) The exit code detected an internal inconsistency in how many execution
2696 contexts were entered and left.
2698 =item Unbalanced saves: %d more saves than restores
2700 (W) The exit code detected an internal inconsistency in how many
2701 values were temporarily localized.
2703 =item Unbalanced scopes: %d more ENTERs than LEAVEs
2705 (W) The exit code detected an internal inconsistency in how many blocks
2706 were entered and left.
2708 =item Unbalanced tmps: %d more allocs than frees
2710 (W) The exit code detected an internal inconsistency in how many mortal
2711 scalars were allocated and freed.
2713 =item Undefined format "%s" called
2715 (F) The format indicated doesn't seem to exist. Perhaps it's really in
2716 another package? See L<perlform>.
2718 =item Undefined sort subroutine "%s" called
2720 (F) The sort comparison routine specified doesn't seem to exist. Perhaps
2721 it's in a different package? See L<perlfunc/sort>.
2723 =item Undefined subroutine &%s called
2725 (F) The subroutine indicated hasn't been defined, or if it was, it
2726 has since been undefined.
2728 =item Undefined subroutine called
2730 (F) The anonymous subroutine you're trying to call hasn't been defined,
2731 or if it was, it has since been undefined.
2733 =item Undefined subroutine in sort
2735 (F) The sort comparison routine specified is declared but doesn't seem to
2736 have been defined yet. See L<perlfunc/sort>.
2738 =item Undefined top format "%s" called
2740 (F) The format indicated doesn't seem to exist. Perhaps it's really in
2741 another package? See L<perlform>.
2743 =item Undefined value assigned to typeglob
2745 (W) An undefined value was assigned to a typeglob, a la C<*foo = undef>.
2746 This does nothing. It's possible that you really mean C<undef *foo>.
2748 =item unexec of %s into %s failed!
2750 (F) The unexec() routine failed for some reason. See your local FSF
2751 representative, who probably put it there in the first place.
2753 =item Unknown BYTEORDER
2755 (F) There are no byte-swapping functions for a machine with this byte order.
2757 =item unmatched () in regexp
2759 (F) Unbackslashed parentheses must always be balanced in regular
2760 expressions. If you're a vi user, the % key is valuable for finding
2761 the matching parenthesis. See L<perlre>.
2763 =item Unmatched right bracket
2765 (F) The lexer counted more closing curly brackets (braces) than opening
2766 ones, so you're probably missing an opening bracket. As a general
2767 rule, you'll find the missing one (so to speak) near the place you were
2770 =item unmatched [] in regexp
2772 (F) The brackets around a character class must match. If you wish to
2773 include a closing bracket in a character class, backslash it or put it first.
2776 =item Unquoted string "%s" may clash with future reserved word
2778 (W) You used a bareword that might someday be claimed as a reserved word.
2779 It's best to put such a word in quotes, or capitalize it somehow, or insert
2780 an underbar into it. You might also declare it as a subroutine.
2782 =item Unrecognized character %s
2784 (F) The Perl parser has no idea what to do with the specified character
2785 in your Perl script (or eval). Perhaps you tried to run a compressed
2786 script, a binary program, or a directory as a Perl program.
2788 =item Unrecognized escape \\%c passed through
2790 (W) You used a backslash-character combination which is not recognized
2793 =item Unrecognized signal name "%s"
2795 (F) You specified a signal name to the kill() function that was not recognized.
2796 Say C<kill -l> in your shell to see the valid signal names on your system.
2798 =item Unrecognized switch: -%s (-h will show valid options)
2800 (F) You specified an illegal option to Perl. Don't do that.
2801 (If you think you didn't do that, check the #! line to see if it's
2802 supplying the bad switch on your behalf.)
2804 =item Unsuccessful %s on filename containing newline
2806 (W) A file operation was attempted on a filename, and that operation
2807 failed, PROBABLY because the filename contained a newline, PROBABLY
2808 because you forgot to chop() or chomp() it off. See L<perlfunc/chomp>.
2810 =item Unsupported directory function "%s" called
2812 (F) Your machine doesn't support opendir() and readdir().
2814 =item Unsupported function fork
2816 (F) Your version of executable does not support forking.
2818 Note that under some systems, like OS/2, there may be different flavors of
2819 Perl executables, some of which may support fork, some not. Try changing
2820 the name you call Perl by to C<perl_>, C<perl__>, and so on.
2822 =item Unsupported function %s
2824 (F) This machine doesn't implement the indicated function, apparently.
2825 At least, Configure doesn't think so.
2827 =item Unsupported socket function "%s" called
2829 (F) Your machine doesn't support the Berkeley socket mechanism, or at
2830 least that's what Configure thought.
2832 =item Unterminated E<lt>E<gt> operator
2834 (F) The lexer saw a left angle bracket in a place where it was expecting
2835 a term, so it's looking for the corresponding right angle bracket, and not
2836 finding it. Chances are you left some needed parentheses out earlier in
2837 the line, and you really meant a "less than".
2839 =item Use of $# is deprecated
2841 (D) This was an ill-advised attempt to emulate a poorly defined B<awk> feature.
2842 Use an explicit printf() or sprintf() instead.
2844 =item Use of $* is deprecated
2846 (D) This variable magically turned on multi-line pattern matching, both for
2847 you and for any luckless subroutine that you happen to call. You should
2848 use the new C<//m> and C<//s> modifiers now to do that without the dangerous
2849 action-at-a-distance effects of C<$*>.
2851 =item Use of %s in printf format not supported
2853 (F) You attempted to use a feature of printf that is accessible from
2854 only C. This usually means there's a better way to do it in Perl.
2856 =item Use of bare E<lt>E<lt> to mean E<lt>E<lt>"" is deprecated
2858 (D) You are now encouraged to use the explicitly quoted form if you
2859 wish to use an empty line as the terminator of the here-document.
2861 =item Use of implicit split to @_ is deprecated
2863 (D) It makes a lot of work for the compiler when you clobber a
2864 subroutine's argument list, so it's better if you assign the results of
2865 a split() explicitly to an array (or list).
2867 =item Use of inherited AUTOLOAD for non-method %s() is deprecated
2869 (D) As an (ahem) accidental feature, C<AUTOLOAD> subroutines are looked
2870 up as methods (using the C<@ISA> hierarchy) even when the subroutines to
2871 be autoloaded were called as plain functions (e.g. C<Foo::bar()>), not
2872 as methods (e.g. C<Foo-E<gt>bar()> or C<$obj-E<gt>bar()>).
2874 This bug will be rectified in Perl 5.005, which will use method lookup
2875 only for methods' C<AUTOLOAD>s. However, there is a significant base
2876 of existing code that may be using the old behavior. So, as an
2877 interim step, Perl 5.004 issues an optional warning when non-methods
2878 use inherited C<AUTOLOAD>s.
2880 The simple rule is: Inheritance will not work when autoloading
2881 non-methods. The simple fix for old code is: In any module that used to
2882 depend on inheriting C<AUTOLOAD> for non-methods from a base class named
2883 C<BaseClass>, execute C<*AUTOLOAD = \&BaseClass::AUTOLOAD> during startup.
2885 In code that currently says C<use AutoLoader; @ISA = qw(AutoLoader);> you
2886 should remove AutoLoader from @ISA and change C<use AutoLoader;> to
2887 C<use AutoLoader 'AUTOLOAD';>.
2889 =item Use of reserved word "%s" is deprecated
2891 (D) The indicated bareword is a reserved word. Future versions of perl
2892 may use it as a keyword, so you're better off either explicitly quoting
2893 the word in a manner appropriate for its context of use, or using a
2894 different name altogether. The warning can be suppressed for subroutine
2895 names by either adding a C<&> prefix, or using a package qualifier,
2896 e.g. C<&our()>, or C<Foo::our()>.
2898 =item Use of %s is deprecated
2900 (D) The construct indicated is no longer recommended for use, generally
2901 because there's a better way to do it, and also because the old way has
2904 =item Use of uninitialized value
2906 (W) An undefined value was used as if it were already defined. It was
2907 interpreted as a "" or a 0, but maybe it was a mistake. To suppress this
2908 warning assign an initial value to your variables.
2910 =item Useless use of "re" pragma
2912 (W) You did C<use re;> without any arguments. That isn't very useful.
2914 =item Useless use of %s in void context
2916 (W) You did something without a side effect in a context that does nothing
2917 with the return value, such as a statement that doesn't return a value
2918 from a block, or the left side of a scalar comma operator. Very often
2919 this points not to stupidity on your part, but a failure of Perl to parse
2920 your program the way you thought it would. For example, you'd get this
2921 if you mixed up your C precedence with Python precedence and said
2925 when you meant to say
2927 ($one, $two) = (1, 2);
2929 Another common error is to use ordinary parentheses to construct a list
2930 reference when you should be using square or curly brackets, for
2935 when you should have said
2939 The square brackets explicitly turn a list value into a scalar value,
2940 while parentheses do not. So when a parenthesized list is evaluated in
2941 a scalar context, the comma is treated like C's comma operator, which
2942 throws away the left argument, which is not what you want. See
2943 L<perlref> for more on this.
2945 =item untie attempted while %d inner references still exist
2947 (W) A copy of the object returned from C<tie> (or C<tied>) was still
2948 valid when C<untie> was called.
2950 =item Value of %s can be "0"; test with defined()
2952 (W) In a conditional expression, you used <HANDLE>, <*> (glob), C<each()>,
2953 or C<readdir()> as a boolean value. Each of these constructs can return a
2954 value of "0"; that would make the conditional expression false, which is
2955 probably not what you intended. When using these constructs in conditional
2956 expressions, test their values with the C<defined> operator.
2958 =item Variable "%s" is not imported%s
2960 (F) While "use strict" in effect, you referred to a global variable
2961 that you apparently thought was imported from another module, because
2962 something else of the same name (usually a subroutine) is exported
2963 by that module. It usually means you put the wrong funny character
2964 on the front of your variable.
2966 =item Variable "%s" may be unavailable
2968 (W) An inner (nested) I<anonymous> subroutine is inside a I<named>
2969 subroutine, and outside that is another subroutine; and the anonymous
2970 (innermost) subroutine is referencing a lexical variable defined in
2971 the outermost subroutine. For example:
2973 sub outermost { my $a; sub middle { sub { $a } } }
2975 If the anonymous subroutine is called or referenced (directly or
2976 indirectly) from the outermost subroutine, it will share the variable
2977 as you would expect. But if the anonymous subroutine is called or
2978 referenced when the outermost subroutine is not active, it will see
2979 the value of the shared variable as it was before and during the
2980 *first* call to the outermost subroutine, which is probably not what
2983 In these circumstances, it is usually best to make the middle
2984 subroutine anonymous, using the C<sub {}> syntax. Perl has specific
2985 support for shared variables in nested anonymous subroutines; a named
2986 subroutine in between interferes with this feature.
2988 =item Variable "%s" will not stay shared
2990 (W) An inner (nested) I<named> subroutine is referencing a lexical
2991 variable defined in an outer subroutine.
2993 When the inner subroutine is called, it will probably see the value of
2994 the outer subroutine's variable as it was before and during the
2995 *first* call to the outer subroutine; in this case, after the first
2996 call to the outer subroutine is complete, the inner and outer
2997 subroutines will no longer share a common value for the variable. In
2998 other words, the variable will no longer be shared.
3000 Furthermore, if the outer subroutine is anonymous and references a
3001 lexical variable outside itself, then the outer and inner subroutines
3002 will I<never> share the given variable.
3004 This problem can usually be solved by making the inner subroutine
3005 anonymous, using the C<sub {}> syntax. When inner anonymous subs that
3006 reference variables in outer subroutines are called or referenced,
3007 they are automatically rebound to the current values of such
3010 =item Variable syntax
3012 (A) You've accidentally run your script through B<csh> instead
3013 of Perl. Check the #! line, or manually feed your script into
3016 =item perl: warning: Setting locale failed.
3018 (S) The whole warning message will look something like:
3020 perl: warning: Setting locale failed.
3021 perl: warning: Please check that your locale settings:
3024 are supported and installed on your system.
3025 perl: warning: Falling back to the standard locale ("C").
3027 Exactly what were the failed locale settings varies. In the above the
3028 settings were that the LC_ALL was "En_US" and the LANG had no value.
3029 This error means that Perl detected that you and/or your system
3030 administrator have set up the so-called variable system but Perl could
3031 not use those settings. This was not dead serious, fortunately: there
3032 is a "default locale" called "C" that Perl can and will use, the
3033 script will be run. Before you really fix the problem, however, you
3034 will get the same error message each time you run Perl. How to really
3035 fix the problem can be found in L<perllocale> section B<LOCALE PROBLEMS>.
3037 =item Warning: something's wrong
3039 (W) You passed warn() an empty string (the equivalent of C<warn "">) or
3040 you called it with no args and C<$_> was empty.
3042 =item Warning: unable to close filehandle %s properly
3044 (S) The implicit close() done by an open() got an error indication on the
3045 close(). This usually indicates your file system ran out of disk space.
3047 =item Warning: Use of "%s" without parentheses is ambiguous
3049 (S) You wrote a unary operator followed by something that looks like a
3050 binary operator that could also have been interpreted as a term or
3051 unary operator. For instance, if you know that the rand function
3052 has a default argument of 1.0, and you write
3056 you may THINK you wrote the same thing as
3060 but in actual fact, you got
3064 So put in parentheses to say what you really mean.
3066 =item Write on closed filehandle
3068 (W) The filehandle you're writing to got itself closed sometime before now.
3069 Check your logic flow.
3071 =item X outside of string
3073 (F) You had a pack template that specified a relative position before
3074 the beginning of the string being unpacked. See L<perlfunc/pack>.
3076 =item x outside of string
3078 (F) You had a pack template that specified a relative position after
3079 the end of the string being unpacked. See L<perlfunc/pack>.
3081 =item Xsub "%s" called in sort
3083 (F) The use of an external subroutine as a sort comparison is not yet supported.
3085 =item Xsub called in sort
3087 (F) The use of an external subroutine as a sort comparison is not yet supported.
3089 =item You can't use C<-l> on a filehandle
3091 (F) A filehandle represents an opened file, and when you opened the file it
3092 already went past any symlink you are presumably trying to look for.
3093 Use a filename instead.
3095 =item YOU HAVEN'T DISABLED SET-ID SCRIPTS IN THE KERNEL YET!
3097 (F) And you probably never will, because you probably don't have the
3098 sources to your kernel, and your vendor probably doesn't give a rip
3099 about what you want. Your best bet is to use the wrapsuid script in
3100 the eg directory to put a setuid C wrapper around your script.
3102 =item You need to quote "%s"
3104 (W) You assigned a bareword as a signal handler name. Unfortunately, you
3105 already have a subroutine of that name declared, which means that Perl 5
3106 will try to call the subroutine when the assignment is executed, which is
3107 probably not what you want. (If it IS what you want, put an & in front.)
3109 =item [gs]etsockopt() on closed fd
3111 (W) You tried to get or set a socket option on a closed socket.
3112 Did you forget to check the return value of your socket() call?
3113 See L<perlfunc/getsockopt>.
3115 =item \1 better written as $1
3117 (W) Outside of patterns, backreferences live on as variables. The use
3118 of backslashes is grandfathered on the right-hand side of a
3119 substitution, but stylistically it's better to use the variable form
3120 because other Perl programmers will expect it, and it works better
3121 if there are more than 9 backreferences.
3123 =item '|' and 'E<lt>' may not both be specified on command line
3125 (F) An error peculiar to VMS. Perl does its own command line redirection, and
3126 found that STDIN was a pipe, and that you also tried to redirect STDIN using
3127 'E<lt>'. Only one STDIN stream to a customer, please.
3129 =item '|' and 'E<gt>' may not both be specified on command line
3131 (F) An error peculiar to VMS. Perl does its own command line redirection, and
3132 thinks you tried to redirect stdout both to a file and into a pipe to another
3133 command. You need to choose one or the other, though nothing's stopping you
3134 from piping into a program or Perl script which 'splits' output into two
3137 open(OUT,">$ARGV[0]") or die "Can't write to $ARGV[0]: $!";
3144 =item Got an error from DosAllocMem
3146 (P) An error peculiar to OS/2. Most probably you're using an obsolete
3147 version of Perl, and this should not happen anyway.
3149 =item Malformed PERLLIB_PREFIX
3151 (F) An error peculiar to OS/2. PERLLIB_PREFIX should be of the form
3159 with nonempty prefix1 and prefix2. If C<prefix1> is indeed a prefix
3160 of a builtin library search path, prefix2 is substituted. The error
3161 may appear if components are not found, or are too long. See
3162 "PERLLIB_PREFIX" in F<README.os2>.
3164 =item PERL_SH_DIR too long
3166 (F) An error peculiar to OS/2. PERL_SH_DIR is the directory to find the
3167 C<sh>-shell in. See "PERL_SH_DIR" in F<README.os2>.
3169 =item Process terminated by SIG%s
3171 (W) This is a standard message issued by OS/2 applications, while *nix
3172 applications die in silence. It is considered a feature of the OS/2
3173 port. One can easily disable this by appropriate sighandlers, see
3174 L<perlipc/"Signals">. See also "Process terminated by SIGTERM/SIGINT"