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