This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
This is my patch patch.1n for perl5.001.
[perl5.git] / pod / perldiag.pod
CommitLineData
a0d0e21e
LW
1=head1 NAME
2
3perldiag - various Perl diagnostics
4
5=head1 DESCRIPTION
6
7These messages are classified as follows (listed in increasing order of
8desperation):
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 (non-trappable).
16
748a9306
LW
17Optional warnings are enabled by using the B<-w> switch. Warnings may
18be captured by setting C<$^Q> to a reference to a routine that will be
19called on each warning instead of printing it. See L<perlvar>.
20Trappable errors may be trapped using the eval operator. See
21L<perlfunc/eval>.
a0d0e21e
LW
22
23Some of these messages are generic. Spots that vary are denoted with a %s,
24just as in a printf format. Note that some message start with a %s!
25The symbols C<"%-?@> sort before the letters, while C<[> and C<\> sort after.
26
27=over 4
28
29=item "my" variable %s can't be in a package
30
31(F) Lexically scoped variables aren't in a package, so it doesn't make sense
32to try to declare one with a package qualifier on the front. Use local()
33if you want to localize a package variable.
34
35=item "no" not allowed in expression
36
37(F) The "no" keyword is recognized and executed at compile time, and returns
38no useful value. See L<perlmod>.
39
40=item "use" not allowed in expression
41
42(F) The "use" keyword is recognized and executed at compile time, and returns
43no useful value. See L<perlmod>.
44
45=item % may only be used in unpack
46
47(F) You can't pack a string by supplying a checksum, since the
48checksumming process loses information, and you can't go the other
49way. See L<perlfunc/unpack>.
50
51=item %s (...) interpreted as function
52
53(W) You've run afoul of the rule that says that any list operator followed
54by parentheses turns into a function, with all the list operators arguments
55found inside the parens. See L<perlop/Terms and List Operators (Leftward)>.
56
57=item %s argument is not a HASH element
58
59(F) The argument to delete() or exists() must be a hash element, such as
60
61 $foo{$bar}
62 $ref->[12]->{"susie"}
63
64=item %s did not return a true value
65
66(F) A required (or used) file must return a true value to indicate that
67it compiled correctly and ran its initialization code correctly. It's
68traditional to end such a file with a "1;", though any true value would
69do. See L<perlfunc/require>.
70
71=item %s found where operator expected
72
73(S) The Perl lexer knows whether to expect a term or an operator. If it
74sees what it knows to be a term when it was expecting to see an operator,
75it gives you this warning. Usually it indicates that an operator or
76delimiter was omitted, such as a semicolon.
77
78=item %s had compilation errors.
79
80(F) The final summary message when a C<perl -c> fails.
81
82=item %s has too many errors.
83
84(F) The parser has given up trying to parse the program after 10 errors.
85Further error messages would likely be uninformative.
86
87=item %s matches null string many times
88
89(W) The pattern you've specified would be an infinite loop if the
90regular expression engine didn't specifically check for that. See L<perlre>.
91
92=item %s never introduced
93
94(S) The symbol in question was declared but somehow went out of scope
95before it could possibly have been used.
96
97=item %s syntax OK
98
99(F) The final summary message when a C<perl -c> succeeds.
100
101=item B<-P> not allowed for setuid/setgid script
102
103(F) The script would have to be opened by the C preprocessor by name,
104which provides a race condition that breaks security.
105
106=item C<-T> and C<-B> not implemented on filehandles
107
108(F) Perl can't peek at the stdio buffer of filehandles when it doesn't
109know about your kind of stdio. You'll have to use a filename instead.
110
111=item ?+* follows nothing in regexp
112
113(F) You started a regular expression with a quantifier. Backslash it
114if you meant it literally. See L<perlre>.
115
116=item @ outside of string
117
118(F) You had a pack template that specified an absolution position outside
119the string being unpacked. See L<perlfunc/pack>.
120
121=item accept() on closed fd
122
123(W) You tried to do an accept on a closed socket. Did you forget to check
124the return value of your socket() call? See L<perlfunc/accept>.
125
126=item Allocation too large: %lx
127
128(F) You can't allocate more than 64K on an MSDOS machine.
129
130=item Arg too short for msgsnd
131
132(F) msgsnd() requires a string at least as long as sizeof(long).
133
748a9306
LW
134=item Ambiguous use of %s resolved as %s
135
136(W)(S) You said something that may not be interpreted the way
137you thought. Normally it's pretty easy to disambiguate it by supplying
138a missing quote, operator, paren pair or declaration.
139
a0d0e21e
LW
140=item Args must match #! line
141
142(F) The setuid emulator requires that the arguments Perl was invoked
143with match the arguments specified on the #! line.
144
145=item Argument "%s" isn't numeric
146
147(W) The indicated string was fed as an argument to an operator that
148expected a numeric value instead. If you're fortunate the message
149will identify which operator was so unfortunate.
150
151=item Array @%s missing the @ in argument %d of %s()
152
153(D) Really old Perl let you omit the @ on array names in some spots. This
154is now heavily deprecated.
155
156=item assertion botched: %s
157
158(P) The malloc package that comes with Perl had an internal failure.
159
160=item Assertion failed: file "%s"
161
162(P) A general assertion failed. The file in question must be examined.
163
164=item Assignment to both a list and a scalar
165
166(F) If you assign to a conditional operator, the 2nd and 3rd arguments
167must either both be scalars or both be lists. Otherwise Perl won't
168know which context to supply to the right side.
169
170=item Attempt to free non-arena SV: 0x%lx
171
172(P) All SV objects are supposed to be allocated from arenas that will
173be garbage collected on exit. An SV was discovered to be outside any
174of those arenas.
175
176=item Attempt to free temp prematurely
177
178(W) Mortalized values are supposed to be freed by the free_tmps()
179routine. This indicates that something else is freeing the SV before
180the free_tmps() routine gets a chance, which means that the free_tmps()
181routine will be freeing an unreferenced scalar when it does try to free
182it.
183
184=item Attempt to free unreferenced glob pointers
185
186(P) The reference counts got screwed up on symbol aliases.
187
188=item Attempt to free unreferenced scalar
189
190(W) Perl went to decrement the reference count of a scalar to see if it
191would go to 0, and discovered that it had already gone to 0 earlier,
192and should have been freed, and in fact, probably was freed. This
193could indicate that SvREFCNT_dec() was called too many times, or that
194SvREFCNT_inc() was called too few times, or that the SV was mortalized
195when it shouldn't have been, or that memory has been corrupted.
196
8e07c86e
AD
197=item Attempt to use reference as hash key
198
199(W) References as not very meaningful as hash keys. You probably forgot to
200dereference the reference before using it in a hash list, or got mixed up
201and used C<{}> or C<[]> instead of C<()>. Or perhaps a missing key in the
202hash list is causing values to be treated as keys.
203
a0d0e21e
LW
204=item Bad arg length for %s, is %d, should be %d
205
206(F) You passed a buffer of the wrong size to one of msgctl(), semctl() or
207shmctl(). In C parlance, the correct sized are, respectively,
208S<sizeof(struct msqid_ds *)>, S<sizeof(struct semid_ds *)> and
209S<sizeof(struct shmid_ds *)>.
210
211=item Bad associative array
212
213(P) One of the internal hash routines was passed a null HV pointer.
214
215=item Bad filehandle: %s
216
217(F) A symbol was passed to something wanting a filehandle, but the symbol
218has no filehandle associated with it. Perhaps you didn't do an open(), or
219did it in another package.
220
221=item Bad free() ignored
222
223(S) An internal routine called free() on something that had never been
224malloc()ed in the first place.
225
226=item Bad name after %s::
227
228(F) You started to name a symbol by using a package prefix, and then didn't
229finish the symbol. In particular, you can't interpolate outside of quotes,
230so
231
232 $var = 'myvar';
233 $sym = mypack::$var;
234
235is not the same as
236
237 $var = 'myvar';
238 $sym = "mypack::$var";
239
240=item Bad symbol for array
241
242(P) An internal request asked to add an array entry to something that
243wasn't a symbol table entry.
244
245=item Bad symbol for filehandle
246
247(P) An internal request asked to add a filehandle entry to something that
248wasn't a symbol table entry.
249
250=item Bad symbol for hash
251
252(P) An internal request asked to add a hash entry to something that
253wasn't a symbol table entry.
254
255=item BEGIN failed--compilation aborted
256
257(F) An untrapped exception was raised while executing a BEGIN subroutine.
258Compilation stops immediately and the interpreter is exited.
259
260=item bind() on closed fd
261
262(W) You tried to do a bind on a closed socket. Did you forget to check
263the return value of your socket() call? See L<perlfunc/bind>.
264
265=item Callback called exit
266
267(F) A subroutine invoked from an external package via perl_call_sv()
268exited by calling exit.
269
270=item Can't "last" outside a block
271
272(F) A "last" statement was executed to break out of the current block,
273except that there's this itty bitty problem called there isn't a
274current block. Note that an "if" or "else" block doesn't count as a
275"loopish" block. You can usually double the curlies to get the same
276effect though, since the inner curlies will be considered a block
277that loops once. See L<perlfunc/last>.
278
279=item Can't "next" outside a block
280
281(F) A "next" statement was executed to reiterate the current block, but
282there isn't a current block. Note that an "if" or "else" block doesn't
283count as a "loopish" block. You can usually double the curlies to get
284the same effect though, since the inner curlies will be considered a block
285that loops once. See L<perlfunc/last>.
286
287=item Can't "redo" outside a block
288
289(F) A "redo" statement was executed to restart the current block, but
290there isn't a current block. Note that an "if" or "else" block doesn't
291count as a "loopish" block. You can usually double the curlies to get
292the same effect though, since the inner curlies will be considered a block
293that loops once. See L<perlfunc/last>.
294
295=item Can't bless non-reference value
296
297(F) Only hard references may be blessed. This is how Perl "enforces"
298encapsulation of objects. See L<perlobj>.
299
300=item Can't break at that line
301
302(S) A warning intended for while running within the debugger, indicating
303the line number specified wasn't the location of a statement that could
304be stopped at.
305
306=item Can't call method "%s" in empty package "%s"
307
308(F) You called a method correctly, and it correctly indicated a package
309functioning as a class, but that package doesn't have ANYTHING defined
310in it, let alone methods. See L<perlobj>.
311
312=item Can't call method "%s" on unblessed reference
313
314(F) A method call must know what package it's supposed to run in. It
315ordinarily finds this out from the object reference you supply, but
316you didn't supply an object reference in this case. A reference isn't
317an object reference until it has been blessed. See L<perlobj>.
318
319=item Can't call method "%s" without a package or object reference
320
321(F) You used the syntax of a method call, but the slot filled by the
322object reference or package name contains an expression that returns
323neither an object reference nor a package name. (Perhaps it's null?)
324Something like this will reproduce the error:
325
326 $BADREF = undef;
327 process $BADREF 1,2,3;
328 $BADREF->process(1,2,3);
329
330=item Can't chdir to %s
331
332(F) You called C<perl -x/foo/bar>, but C</foo/bar> is not a directory
333that you can chdir to, possibly because it doesn't exist.
334
335=item Can't coerce %s to integer in %s
336
337(F) Certain types of SVs, in particular real symbol table entries
338(type GLOB), can't be forced to stop being what they are. So you can't
339say things like:
340
341 *foo += 1;
342
343You CAN say
344
345 $foo = *foo;
346 $foo += 1;
347
348but then $foo no longer contains a glob.
349
350=item Can't coerce %s to number in %s
351
352(F) Certain types of SVs, in particular real symbol table entries
353(type GLOB), can't be forced to stop being what they are.
354
355=item Can't coerce %s to string in %s
356
357(F) Certain types of SVs, in particular real symbol table entries
358(type GLOB), can't be forced to stop being what they are.
359
360=item Can't create pipe mailbox
361
748a9306
LW
362(P) An error peculiar to VMS. The process is suffering from exhausted quotas
363or other plumbing problems.
a0d0e21e
LW
364
365=item Can't declare %s in my
366
367(F) Only scalar, array and hash variables may be declared as lexical variables.
368They must have ordinary identifiers as names.
369
370=item Can't do inplace edit on %s: %s
371
372(S) The creation of the new file failed for the indicated reason.
373
374=item Can't do inplace edit without backup
375
376(F) You're on a system such as MSDOS that gets confused if you try reading
377from a deleted (but still opened) file. You have to say B<-i>C<.bak>, or some
378such.
379
380=item Can't do inplace edit: %s > 14 characters
381
382(S) There isn't enough room in the filename to make a backup name for the file.
383
384=item Can't do inplace edit: %s is not a regular file
385
386(S) You tried to use the B<-i> switch on a special file, such as a file in
387/dev, or a FIFO. The file was ignored.
388
389=item Can't do setegid!
390
391(P) The setegid() call failed for some reason in the setuid emulator
392of suidperl.
393
394=item Can't do seteuid!
395
396(P) The setuid emulator of suidperl failed for some reason.
397
398=item Can't do setuid
399
400(F) This typically means that ordinary perl tried to exec suidperl to
401do setuid emulation, but couldn't exec it. It looks for a name of the
402form sperl5.000 in the same directory that the perl executable resides
403under the name perl5.000, typically /usr/local/bin on Unix machines.
404If the file is there, check the execute permissions. If it isn't, ask
405your sysadmin why he and/or she removed it.
406
407=item Can't do waitpid with flags
408
409(F) This machine doesn't have either waitpid() or wait4(), so only waitpid()
410without flags is emulated.
411
412=item Can't do {n,m} with n > m
413
414(F) Minima must be less than or equal to maxima. If you really want
415your regexp to match something 0 times, just put {0}. See L<perlre>.
416
417=item Can't emulate -%s on #! line
418
419(F) The #! line specifies a switch that doesn't make sense at this point.
420For example, it'd be kind of silly to put a B<-x> on the #! line.
421
422=item Can't exec "%s": %s
423
424(W) An system(), exec() or piped open call could not execute the named
425program for the indicated reason. Typical reasons include: the permissions
426were wrong on the file, the file wasn't found in C<$ENV{PATH}>, the
427executable in question was compiled for another architecture, or the
428#! line in a script points to an interpreter that can't be run for
429similar reasons. (Or maybe your system doesn't support #! at all.)
430
431=item Can't exec %s
432
433(F) Perl was trying to execute the indicated program for you because that's
434what the #! line said. If that's not what you wanted, you may need to
435mention "perl" on the #! line somewhere.
436
437=item Can't execute %s
438
439(F) You used the B<-S> switch, but the script to execute could not be found
440in the PATH, or at least not with the correct permissions.
441
442=item Can't find label %s
443
444(F) You said to goto a label that isn't mentioned anywhere that it's possible
445for us to go to. See L<perlfunc/goto>.
446
447=item Can't find string terminator %s anywhere before EOF
448
449(F) Perl strings can stretch over multiple lines. This message means that
450the closing delimiter was omitted. Since bracketed quotes count nesting
451levels, the following is missing its final parenthesis:
452
453 print q(The character '(' starts a side comment.)
454
455=item Can't fork
456
457(F) A fatal error occurred while trying to fork while opening a pipeline.
458
748a9306
LW
459=item Can't get filespec - stale stat buffer?
460
461(S) A warning peculiar to VMS. This arises because of the difference between
462access checks under VMS and under the Unix model Perl assumes. Under VMS,
463access checks are done by filename, rather than by bits in the stat buffer, so
464that ACLs and other protections can be taken into account. Unfortunately, Perl
465assumes that the stat buffer contains all the necessary information, and passes
466it, instead of the filespec, to the access checking routine. It will try to
467retrieve the filespec using the device name and FID present in the stat buffer,
468but this works only if you haven't made a subsequent call to the CRTL stat()
469routine, since the device name is overwritten with each call. If this warning
470appears, the name lookup failed, and the access checking routine gave up and
471returned FALSE, just to be conservative. (Note: The access checking routine
472knows about the Perl C<stat> operator and file tests, so you shouldn't ever
473see this warning in response to a Perl command; it arises only if some internal
474code takes stat buffers lightly.)
475
a0d0e21e
LW
476=item Can't get pipe mailbox device name
477
748a9306
LW
478(P) An error peculiar to VMS. After creating a mailbox to act as a pipe, Perl
479can't retrieve its name for later use.
a0d0e21e
LW
480
481=item Can't get SYSGEN parameter value for MAXBUF
482
748a9306
LW
483(P) An error peculiar to VMS. Perl asked $GETSYI how big you want your
484mailbox buffers to be, and didn't get an answer.
a0d0e21e
LW
485
486=item Can't goto subroutine outside a subroutine
487
488(F) The deeply magical "goto subroutine" call can only replace one subroutine
489call for another. It can't manufacture one out of whole cloth. In general
490you should only be calling it out of an AUTOLOAD routine anyway. See
491L<perlfunc/goto>.
492
748a9306
LW
493=item Can't localize lexical variable %s
494
495(F) You used local on a variable name that was previous declared as a
496lexical variable using "my". This is not allowed. If you want to
497localize a package variable of the same name, qualify it with the
498package name.
499
a0d0e21e
LW
500=item Can't locate %s in @INC
501
502(F) You said to do (or require, or use) a file that couldn't be found
503in any of the libraries mentioned in @INC. Perhaps you need to set
504the PERL5LIB environment variable to say where the extra library is,
505or maybe the script needs to add the library name to @INC. Or maybe
506you just misspelled the name of the file. See L<perlfunc/require>.
507
508=item Can't locate object method "%s" via package "%s"
509
510(F) You called a method correctly, and it correctly indicated a package
511functioning as a class, but that package doesn't define that particular
512method, nor does any of it's base classes. See L<perlobj>.
513
514=item Can't locate package %s for @%s::ISA
515
516(W) The @ISA array contained the name of another package that doesn't seem
517to exist.
518
519=item Can't mktemp()
520
521(F) The mktemp() routine failed for some reason while trying to process
522a B<-e> switch. Maybe your /tmp partition is full, or clobbered.
523
524=item Can't modify %s in %s
525
526(F) You aren't allowed to assign to the item indicated, or otherwise try to
527change it, such as with an autoincrement.
528
529=item Can't modify non-existent substring
530
531(P) The internal routine that does assignment to a substr() was handed
532a NULL.
533
534=item Can't msgrcv to readonly var
535
536(F) The target of a msgrcv must be modifiable in order to be used as a receive
537buffer.
538
539=item Can't open %s: %s
540
541(S) An inplace edit couldn't open the original file for the indicated reason.
542Usually this is because you don't have read permission for the file.
543
544=item Can't open bidirectional pipe
545
546(W) You tried to say C<open(CMD, "|cmd|")>, which is not supported. You can
547try any of several modules in the Perl library to do this, such as
548"open2.pl". Alternately, direct the pipe's output to a file using ">",
549and then read it in under a different file handle.
550
748a9306
LW
551=item Can't open error file %s as stderr
552
553(F) An error peculiar to VMS. Perl does its own command line redirection, and
554couldn't open the file specified after '2>' or '2>>' on the command line for
555writing.
556
557=item Can't open input file %s as stdin
558
559(F) An error peculiar to VMS. Perl does its own command line redirection, and
560couldn't open the file specified after '<' on the command line for reading.
561
562=item Can't open output file %s as stdout
563
564(F) An error peculiar to VMS. Perl does its own command line redirection, and
565couldn't open the file specified after '>' or '>>' on the command line for
566writing.
567
568=item Can't open output pipe (name: %s)
569
570(P) An error peculiar to VMS. Perl does its own command line redirection, and
571couldn't open the pipe into which to send data destined for stdout.
572
a0d0e21e
LW
573=item Can't open perl script "%s": %s
574
575(F) The script you specified can't be opened for the indicated reason.
576
577=item Can't rename %s to %s: %s, skipping file
578
579(S) The rename done by the B<-i> switch failed for some reason, probably because
580you don't have write permission to the directory.
581
748a9306
LW
582=item Can't reopen input pipe (name: %s) in binary mode
583
584(P) An error peculiar to VMS. Perl thought stdin was a pipe, and tried to
585reopen it to accept binary data. Alas, it failed.
586
a0d0e21e
LW
587=item Can't reswap uid and euid
588
589(P) The setreuid() call failed for some reason in the setuid emulator
590of suidperl.
591
592=item Can't return outside a subroutine
593
594(F) The return statement was executed in mainline code, that is, where
595there was no subroutine call to return out of. See L<perlsub>.
596
597=item Can't stat script "%s"
598
599(P) For some reason you can't fstat() the script even though you have
600it open already. Bizarre.
601
602=item Can't swap uid and euid
603
604(P) The setreuid() call failed for some reason in the setuid emulator
605of suidperl.
606
607=item Can't take log of %g
608
609(F) Logarithms are only defined on positive real numbers.
610
611=item Can't take sqrt of %g
612
613(F) For ordinary real numbers, you can't take the square root of a
614negative number. There's a Complex package available for Perl, though,
615if you really want to do that.
616
617=item Can't undef active subroutine
618
619(F) You can't undefine a routine that's currently running. You can,
620however, redefine it while it's running, and you can even undef the
621redefined subroutine while the old routine is running. Go figure.
622
623=item Can't unshift
624
625(F) You tried to unshift an "unreal" array that can't be unshifted, such
626as the main Perl stack.
627
628=item Can't upgrade that kind of scalar
629
630(P) The internal sv_upgrade routine adds "members" to an SV, making
631it into a more specialized kind of SV. The top several SV types are
632so specialized, however, that they cannot be interconverted. This
633message indicates that such a conversion was attempted.
634
635=item Can't upgrade to undef
636
637(P) The undefined SV is the bottom of the totem pole, in the scheme
638of upgradability. Upgrading to undef indicates an error in the
639code calling sv_upgrade.
640
a0d0e21e
LW
641=item Can't use %s for loop variable
642
643(F) Only a simple scalar variable may be used as a loop variable on a foreach.
644
645=item Can't use %s ref as %s ref
646
647(F) You've mixed up your reference types. You have to dereference a
648reference of the type needed. You can use the ref() function to
649test the type of the reference, if need be.
650
748a9306
LW
651=item Can't use \1 to mean $1 in expression
652
653(W) In an ordinary expression, backslash is a unary operator that creates
654a reference to its argument. The use of backslash to indicate a backreference
655to a matched substring is only valid as part of a regular expression pattern.
656Trying to do this in ordinary Perl code produces a value that prints
657out looking like SCALAR(0xdecaf). Use the $1 form instead.
658
659=item Can't use string ("%s") as %s ref while "strict refs" in use
a0d0e21e
LW
660
661(F) Only hard references are allowed by "strict refs". Symbolic references
662are disallowed. See L<perlref>.
663
664=item Can't use an undefined value as %s reference
665
666(F) A value used as either a hard reference or a symbolic reference must
667be a defined value. This helps to de-lurk some insidious errors.
668
669=item Can't use delimiter brackets within expression
670
671(F) The ${name} construct is for disambiguating identifiers in strings, not
672in ordinary code.
673
674=item Can't use global %s in "my"
675
676(F) You tried to declare a magical variable as a lexical variable. This is
677not allowed, because the magic can only be tied to one location (namely
678the global variable) and it would be incredibly confusing to have
679variables in your program that looked like magical variables but
680weren't.
681
748a9306
LW
682=item Can't use subscript on %s
683
684(F) The compiler tried to interpret a bracketed expression as a
685subscript. But to the left of the brackets was an expression that
686didn't look like an array reference, or anything else subscriptable.
687
a0d0e21e
LW
688=item Can't write to temp file for B<-e>: %s
689
690(F) The write routine failed for some reason while trying to process
691a B<-e> switch. Maybe your /tmp partition is full, or clobbered.
692
693=item Can't x= to readonly value
694
695(F) You tried to repeat a constant value (often the undefined value) with
696an assignment operator, which implies modifying the value itself.
697Perhaps you need to copy the value to a temporary, and repeat that.
698
699=item Cannot open temporary file
700
701(F) The create routine failed for some reaon while trying to process
702a B<-e> switch. Maybe your /tmp partition is full, or clobbered.
703
704=item chmod: mode argument is missing initial 0
705
706(W) A novice will sometimes say
707
708 chmod 777, $filename
709
710not realizing that 777 will be interpreted as a decimal number, equivalent
711to 01411. Octal constants are introduced with a leading 0 in Perl, as in C.
712
713=item Close on unopened file <%s>
714
715(W) You tried to close a filehandle that was never opened.
716
717=item connect() on closed fd
718
719(W) You tried to do a connect on a closed socket. Did you forget to check
720the return value of your socket() call? See L<perlfunc/connect>.
721
722=item Corrupt malloc ptr 0x%lx at 0x%lx
723
724(P) The malloc package that comes with Perl had an internal failure.
725
726=item corrupted regexp pointers
727
728(P) The regular expression engine got confused by what the regular
729expression compiler gave it.
730
731=item corrupted regexp program
732
733(P) The regular expression engine got passed a regexp program without
734a valid magic number.
735
736=item Deep recursion on subroutine "%s"
737
738(W) This subroutine has called itself (directly or indirectly) 100
739times than it has returned. This probably indicates an infinite
740recursion, unless you're writing strange benchmark programs, in which
741case it indicates something else.
742
748a9306 743=item Did you mean $ or @ instead of %?
a0d0e21e 744
748a9306
LW
745(W) You probably said %hash{$key} when you meant $hash{$key} or @hash{@keys}.
746On the other hand, maybe you just meant %hash and got carried away.
747
748=item Do you need to predeclare %s?
749
750(S) This is an educated guess made in conjunction with the message "%s
751found where operator expected". It often means a subroutine or module
752name is being referenced that hasn't been declared yet. This may be
753because of ordering problems in your file, or because of a missing
754"sub", "package", "require", or "use" statement. If you're
755referencing something that isn't defined yet, you don't actually have
756to define the subroutine or package before the current location. You
757can use an empty "sub foo;" or "package FOO;" to enter a "forward"
758declaration.
a0d0e21e
LW
759
760=item Don't know how to handle magic of type '%s'
761
762(P) The internal handling of magical variables has been cursed.
763
764=item do_study: out of memory
765
766(P) This should have been caught by safemalloc() instead.
767
768=item Duplicate free() ignored
769
770(S) An internal routine called free() on something that had already
771been freed.
772
773=item END failed--cleanup aborted
774
775(F) An untrapped exception was raised while executing an END subroutine.
776The interpreter is immediately exited.
777
748a9306
LW
778=item Error converting file specification %s
779
780(F) An error peculiar to VMS. Since Perl may have to deal with file
781specifications in either VMS or Unix syntax, it converts them to a
782single form when it must operate on them directly. Either you've
783passed an invalid file specification to Perl, or you've found a
784case the conversion routines don't handle. Drat.
785
a0d0e21e
LW
786=item Execution of %s aborted due to compilation errors.
787
788(F) The final summary message when a Perl compilation fails.
789
790=item Exiting eval via %s
791
792(W) You are exiting an eval by unconventional means, such as a
793a goto, or a loop control statement.
794
795=item Exiting subroutine via %s
796
797(W) You are exiting a subroutine by unconventional means, such as a
798a goto, or a loop control statement.
799
800=item Exiting substitution via %s
801
802(W) You are exiting a substitution by unconventional means, such as a
803a return, a goto, or a loop control statement.
804
748a9306 805=item Fatal VMS error at %s, line %d
a0d0e21e 806
748a9306
LW
807(P) An error peculiar to VMS. Something untoward happened in a VMS system
808service or RTL routine; Perl's exit status should provide more details. The
809filename in "at %s" and the line number in "line %d" tell you which section of
810the Perl source code is distressed.
a0d0e21e
LW
811
812=item fcntl is not implemented
813
814(F) Your machine apparently doesn't implement fcntl(). What is this, a
815PDP-11 or something?
816
817=item Filehandle %s never opened
818
819(W) An I/O operation was attempted on a filehandle that was never initialized.
820You need to do an open() or a socket() call, or call a constructor from
821the FileHandle package.
822
823=item Filehandle %s opened only for input
824
825(W) You tried to write on a read-only filehandle. If you
826intended it to be a read-write filehandle, you needed to open it with
827"+<" or "+>" or "+>>" instead of with "<" or nothing. If you only
828intended to write the file, use ">" or ">>". See L<perlfunc/open>.
829
830=item Filehandle only opened for input
831
832(W) You tried to write on a read-only filehandle. If you
833intended it to be a read-write filehandle, you needed to open it with
834"+<" or "+>" or "+>>" instead of with "<" or nothing. If you only
835intended to write the file, use ">" or ">>". See L<perlfunc/open>.
836
837=item Final $ should be \$ or $name
838
839(F) You must now decide whether the final $ in a string was meant to be
840a literal dollar sign, or was meant to introduce a variable name
841that happens to be missing. So you have to put either the backslash or
842the name.
843
844=item Final @ should be \@ or @name
845
846(F) You must now decide whether the final @ in a string was meant to be
847a literal "at" sign, or was meant to introduce a variable name
848that happens to be missing. So you have to put either the backslash or
849the name.
850
851=item Format %s redefined
852
853(W) You redefined a format. To suppress this warning, say
854
855 {
856 local $^W = 0;
857 eval "format NAME =...";
858 }
859
860=item Format not terminated
861
862(F) A format must be terminated by a line with a solitary dot. Perl got
863to the end of your file without finding such a line.
864
865=item Found = in conditional, should be ==
866
867(W) You said
868
869 if ($foo = 123)
870
871when you meant
872
873 if ($foo == 123)
874
875(or something like that).
876
877=item gdbm store returned %d, errno %d, key "%s"
878
879(S) A warning from the GDBM_File extension that a store failed.
880
881=item gethostent not implemented
882
883(F) Your C library apparently doesn't implement gethostent(), probably
884because if it did, it'd feel morally obligated to return every hostname
885on the Internet.
886
887=item get{sock,peer}name() on closed fd
888
889(W) You tried to get a socket or peer socket name on a closed socket.
890Did you forget to check the return value of your socket() call?
891
748a9306
LW
892=item getpwnam returned invalid UIC %#o for user "%s"
893
894(S) A warning peculiar to VMS. The call to C<sys$getuai> underlying the
895C<getpwnam> operator returned an invalid UIC.
896
897
a0d0e21e
LW
898=item Glob not terminated
899
900(F) The lexer saw a left angle bracket in a place where it was expecting
901a term, so it's looking for the corresponding right angle bracket, and not
902finding it. Chances are you left some needed parentheses out earlier in
903the line, and you really meant a "less than".
904
905=item Global symbol "%s" requires explicit package name
906
907(F) You've said "use strict vars", which indicates that all variables must
908either be lexically scoped (using "my"), or explicitly qualified to
909say which package the global variable is in (using "::").
910
911=item goto must have label
912
913(F) Unlike with "next" or "last", you're not allowed to goto an
914unspecified destination. See L<perlfunc/goto>.
915
916=item Had to create %s unexpectedly
917
918(S) A routine asked for a symbol from a symbol table that ought to have
919existed already, but for some reason it didn't, and had to be created on
920an emergency basis to prevent a core dump.
921
922=item Hash %%s missing the % in argument %d of %s()
923
924(D) Really old Perl let you omit the % on hash names in some spots. This
925is now heavily deprecated.
926
927=item Identifier "%s::%s" used only once: possible typo
928
929(W) Typographical errors often show up as unique identifiers. If you
930had a good reason for having a unique identifier, then just mention it
931again somehow to suppress the message.
932
933=item Illegal division by zero
934
935(F) You tried to divide a number by 0. Either something was wrong in your
936logic, or you need to put a conditional in to guard against meaningless input.
937
938=item Illegal modulus zero
939
940(F) You tried to divide a number by 0 to get the remainder. Most numbers
941don't take to this kindly.
942
943=item Illegal octal digit
944
945(F) You used an 8 or 9 in a octal number.
946
748a9306
LW
947=item Illegal octal digit ignored
948
949(W) You may have tried to use an 8 or 9 in a octal number. Interpretation
950of the octal number stopped before the 8 or 9.
951
a0d0e21e
LW
952=item Insecure dependency in %s
953
954(F) You tried to do something that the tainting mechanism didn't like.
955The tainting mechanism is turned on when you're running setuid or setgid,
956or when you specify B<-T> to turn it on explicitly. The tainting mechanism
957labels all data that's derived directly or indirectly from the user,
958who is considered to be unworthy of your trust. If any such data is
959used in a "dangerous" operation, you get this error. See L<perlsec>
960for more information.
961
962=item Insecure directory in %s
963
964(F) You can't use system(), exec(), or a piped open in a setuid or setgid
965script if $ENV{PATH} contains a directory that is writable by the world.
966See L<perlsec>.
967
968=item Insecure PATH
969
970(F) You can't use system(), exec(), or a piped open in a setuid or
971setgid script if $ENV{PATH} is derived from data supplied (or
972potentially supplied) by the user. The script must set the path to a
973known value, using trustworthy data. See L<perlsec>.
974
748a9306
LW
975=item Internal inconsistency in tracking vforks
976
977(S) A warning peculiar to VMS. Perl keeps track of the number
978of times you've called C<fork> and C<exec>, in order to determine
979whether the current call to C<exec> should be affect the current
980script or a subprocess (see L<perlvms/exec>). Somehow, this count
981has become scrambled, so Perl is making a guess and treating
982this C<exec> as a request to terminate the Perl script
983and execute the specified command.
984
a0d0e21e
LW
985=item internal disaster in regexp
986
987(P) Something went badly wrong in the regular expression parser.
988
989=item internal urp in regexp at /%s/
990
991(P) Something went badly awry in the regular expression parser.
992
993=item invalid [] range in regexp
994
995(F) The range specified in a character class had a minimum character
996greater than the maximum character. See L<perlre>.
997
998=item ioctl is not implemented
999
1000(F) Your machine apparently doesn't implement ioctl(), which is pretty
1001strange for a machine that supports C.
1002
1003=item junk on end of regexp
1004
1005(P) The regular expression parser is confused.
1006
1007=item Label not found for "last %s"
1008
1009(F) You named a loop to break out of, but you're not currently in a
1010loop of that name, not even if you count where you were called from.
1011See L<perlfunc/last>.
1012
1013=item Label not found for "next %s"
1014
1015(F) You named a loop to continue, but you're not currently in a loop of
1016that name, not even if you count where you were called from. See
1017L<perlfunc/last>.
1018
1019=item Label not found for "redo %s"
1020
1021(F) You named a loop to restart, but you're not currently in a loop of
1022that name, not even if you count where you were called from. See
1023L<perlfunc/last>.
1024
1025=item listen() on closed fd
1026
1027(W) You tried to do a listen on a closed socket. Did you forget to check
1028the return value of your socket() call? See L<perlfunc/listen>.
1029
1030=item Literal @%s now requires backslash
1031
1032(F) It used to be that Perl would try to guess whether you wanted an
1033array interpolated or a literal @. It did this when the string was
1034first used at runtime. Now strings are parsed at compile time, and
1035ambiguous instances of @ must be disambiguated, either by putting a
1036backslash to indicate a literal, or by declaring (or using) the array
1037within the program before the string (lexically). (Someday it will simply
1038assume that an unbackslashed @ interpolates an array.)
1039
1040=item Method for operation %s not found in package %s during blessing
1041
1042(F) An attempt was made to specify an entry in an overloading table that
1043doesn't somehow point to a valid method. See L<perlovl>.
1044
1045=item Might be a runaway multi-line %s string starting on line %d
1046
1047(S) An advisory indicating that the previous error may have been caused
1048by a missing delimiter on a string or pattern, because it eventually
1049ended earlier on the current line.
1050
1051=item Misplaced _ in number
1052
1053(W) An underline in a decimal constant wasn't on a 3-digit boundary.
1054
1055=item Missing $ on loop variable
1056
1057(F) Apparently you've been programming in csh too much. Variables are always
1058mentioned with the $ in Perl, unlike in the shells, where it can vary from
1059one line to the next.
1060
1061=item Missing comma after first argument to %s function
1062
1063(F) While certain functions allow you to specify a filehandle or an
1064"indirect object" before the argument list, this ain't one of them.
1065
748a9306
LW
1066=item Missing operator before %s?
1067
1068(S) This is an educated guess made in conjunction with the message "%s
1069found where operator expected". Often the missing operator is a comma.
1070
a0d0e21e
LW
1071=item Missing right bracket
1072
1073(F) The lexer counted more opening curly brackets (braces) than closing ones.
1074As a general rule, you'll find it's missing near the place you were last
1075editing.
1076
1077=item Missing semicolon on previous line?
1078
1079(S) This is an educated guess made in conjunction with the message "%s
1080found where operator expected". Don't automatically put a semicolon on
1081the previous line just because you saw this message.
1082
1083=item Modification of a read-only value attempted
1084
1085(F) You tried, directly or indirectly, to change the value of a
1086constant. You didn't, of course, try "2 = 1", since the compiler
1087catches that. But an easy way to do the same thing is:
1088
1089 sub mod { $_[0] = 1 }
1090 mod(2);
1091
1092Another way is to assign to a substr() that's off the end of the string.
1093
1094=item Modification of non-creatable array value attempted, subscript %d
1095
1096(F) You tried to make an array value spring into existence, and the
1097subscript was probably negative, even counting from end of the array
1098backwards.
1099
1100=item Modification of non-creatable hash value attempted, subscript "%s"
1101
1102(F) You tried to make a hash value spring into existence, and it couldn't
1103be created for some peculiar reason.
1104
1105=item Module name must be constant
1106
1107(F) Only a bare module name is allowed as the first argument to a "use".
1108
1109=item msg%s not implemented
1110
1111(F) You don't have System V message IPC on your system.
1112
1113=item Multidimensional syntax %s not supported
1114
1115(W) Multidimensional arrays aren't written like $foo[1,2,3]. They're written
1116like $foo[1][2][3], as in C.
1117
1118=item Negative length
1119
1120(F) You tried to do a read/write/send/recv operation with a buffer length
1121that is less than 0. This is difficult to imagine.
1122
1123=item nested *?+ in regexp
1124
1125(F) You can't quantify a quantifier without intervening parens. So
1126things like ** or +* or ?* are illegal.
1127
1128Note, however, that the minimal matching quantifiers, *?, +? and ?? appear
1129to be nested quantifiers, but aren't. See L<perlre>.
1130
1131=item No #! line
1132
1133(F) The setuid emulator requires that scripts have a well-formed #! line
1134even on machines that don't support the #! construct.
1135
1136=item No %s allowed while running setuid
1137
1138(F) Certain operations are deemed to be too insecure for a setuid or setgid
1139script to even be allowed to attempt. Generally speaking there will be
1140another way to do what you want that is, if not secure, at least securable.
1141See L<perlsec>.
1142
1143=item No B<-e> allowed in setuid scripts
1144
1145(F) A setuid script can't be specified by the user.
1146
1147=item No comma allowed after %s
1148
1149(F) A list operator that has a filehandle or "indirect object" is not
1150allowed to have a comma between that and the following arguments.
1151Otherwise it'd be just another one of the arguments.
1152
748a9306
LW
1153=item No command into which to pipe on command line
1154
1155(F) An error peculiar to VMS. Perl handles its own command line redirection,
1156and found a '|' at the end of the command line, so it doesn't know whither you
1157want to pipe the output from this command.
1158
a0d0e21e
LW
1159=item No DB::DB routine defined
1160
1161(F) The currently executing code was compiled with the B<-d> switch,
1162but for some reason the perl5db.pl file (or some facsimile thereof)
1163didn't define a routine to be called at the beginning of each
1164statement. Which is odd, because the file should have been required
1165automatically, and should have blown up the require if it didn't parse
1166right.
1167
1168=item No dbm on this machine
1169
1170(P) This is counted as an internal error, because every machine should
1171supply dbm nowadays, since Perl comes with SDBM. See L<SDBM_File>.
1172
1173=item No DBsub routine
1174
1175(F) The currently executing code was compiled with the B<-d> switch,
1176but for some reason the perl5db.pl file (or some facsimile thereof)
1177didn't define a DB::sub routine to be called at the beginning of each
1178ordinary subroutine call.
1179
748a9306
LW
1180=item No error file after 2> or 2>> on command line
1181
1182(F) An error peculiar to VMS. Perl handles its own command line redirection,
1183and found a '2>' or a '2>>' on the command line, but can't find the name of the
1184file to which to write data destined for stderr.
1185
1186=item No input file after < on command line
1187
1188(F) An error peculiar to VMS. Perl handles its own command line redirection,
1189and found a '<' on the command line, but can't find the name of the file from
1190which to read data for stdin.
1191
1192=item No output file after > on command line
1193
1194(F) An error peculiar to VMS. Perl handles its own command line redirection,
1195and found a lone '>' at the end of the command line, so it doesn't know whither
1196you wanted to redirect stdout.
1197
1198=item No output file after > or >> on command line
1199
1200(F) An error peculiar to VMS. Perl handles its own command line redirection,
1201and found a '>' or a '>>' on the command line, but can't find the name of the
1202file to which to write data destined for stdout.
1203
a0d0e21e
LW
1204=item No Perl script found in input
1205
1206(F) You called C<perl -x>, but no line was found in the file beginning
1207with #! and containing the word "perl".
1208
1209=item No setregid available
1210
1211(F) Configure didn't find anything resembling the setregid() call for
1212your system.
1213
1214=item No setreuid available
1215
1216(F) Configure didn't find anything resembling the setreuid() call for
1217your system.
1218
1219=item No space allowed after B<-I>
1220
1221(F) The argument to B<-I> must follow the B<-I> immediately with no
1222intervening space.
1223
748a9306
LW
1224=item No such pipe open
1225
1226(P) An error peculiar to VMS. The internal routine my_pclose() tried to
1227close a pipe which hadn't been opened. This should have been caught earlier as
1228an attempt to close an unopened filehandle.
1229
a0d0e21e
LW
1230=item No such signal: SIG%s
1231
1232(W) You specified a signal name as a subscript to %SIG that was not recognized.
1233Say C<kill -l> in your shell to see the valid signal names on your system.
1234
1235=item Not a CODE reference
1236
1237(F) Perl was trying to evaluate a reference to a code value (that is, a
1238subroutine), but found a reference to something else instead. You can
1239use the ref() function to find out what kind of ref it really was.
1240See also L<perlref>.
1241
1242=item Not a format reference
1243
1244(F) I'm not sure how you managed to generate a reference to an anonymous
1245format, but this indicates you did, and that it didn't exist.
1246
1247=item Not a GLOB reference
1248
1249(F) Perl was trying to evaluate a reference to a "type glob" (that is,
1250a symbol table entry that looks like C<*foo>), but found a reference to
1251something else instead. You can use the ref() function to find out
1252what kind of ref it really was. See L<perlref>.
1253
1254=item Not a HASH reference
1255
1256(F) Perl was trying to evaluate a reference to a hash value, but
1257found a reference to something else instead. You can use the ref()
1258function to find out what kind of ref it really was. See L<perlref>.
1259
1260=item Not a perl script
1261
1262(F) The setuid emulator requires that scripts have a well-formed #! line
1263even on machines that don't support the #! construct. The line must
1264mention perl.
1265
1266=item Not a SCALAR reference
1267
1268(F) Perl was trying to evaluate a reference to a scalar value, but
1269found a reference to something else instead. You can use the ref()
1270function to find out what kind of ref it really was. See L<perlref>.
1271
1272=item Not a subroutine reference
1273
1274(F) Perl was trying to evaluate a reference to a code value (that is, a
1275subroutine), but found a reference to something else instead. You can
1276use the ref() function to find out what kind of ref it really was.
1277See also L<perlref>.
1278
1279=item Not a subroutine reference in %OVERLOAD
1280
1281(F) An attempt was made to specify an entry in an overloading table that
1282doesn't somehow point to a valid subroutine. See L<perlovl>.
1283
1284=item Not an ARRAY reference
1285
1286(F) Perl was trying to evaluate a reference to an array value, but
1287found a reference to something else instead. You can use the ref()
1288function to find out what kind of ref it really was. See L<perlref>.
1289
1290=item Not enough arguments for %s
1291
1292(F) The function requires more arguments than you specified.
1293
1294=item Not enough format arguments
1295
1296(W) A format specified more picture fields than the next line supplied.
1297See L<perlform>.
1298
1299=item Null filename used
1300
1301(F) You can't require the null filename, especially since on many machines
1302that means the current directory! See L<perlfunc/require>.
1303
1304=item NULL OP IN RUN
1305
1306(P) Some internal routine called run() with a null opcode pointer.
1307
1308=item Null realloc
1309
1310(P) An attempt was made to realloc NULL.
1311
1312=item NULL regexp argument
1313
1314(P) The internal pattern matching routines blew it bigtime.
1315
1316=item NULL regexp parameter
1317
1318(P) The internal pattern matching routines are out of their gourd.
1319
1320=item Odd number of elements in hash list
1321
1322(S) You specified an odd number of elements to a hash list, which is odd,
1323since hash lists come in key/value pairs.
1324
1325=item oops: oopsAV
1326
1327(S) An internal warning that the grammar is screwed up.
1328
1329=item oops: oopsHV
1330
1331(S) An internal warning that the grammar is screwed up.
1332
1333=item Operation `%s' %s: no method found,
1334
1335(F) An attempt was made to use an entry in an overloading table that
1336somehow no longer points to a valid method. See L<perlovl>.
1337
748a9306
LW
1338=item Operator or semicolon missing before %s
1339
1340(S) You used a variable or subroutine call where the parser was
1341expecting an operator. The parser has assumed you really meant
1342to use an operator, but this is highly likely to be incorrect.
1343For example, if you say "*foo *foo" it will be interpreted as
1344if you said "*foo * 'foo'".
1345
a0d0e21e
LW
1346=item Out of memory for yacc stack
1347
1348(F) The yacc parser wanted to grow its stack so it could continue parsing,
1349but realloc() wouldn't give it more memory, virtual or otherwise.
1350
1351=item Out of memory!
1352
1353(X) The malloc() function returned 0, indicating there was insufficient
1354remaining memory (or virtual memory) to satisfy the request.
1355
1356=item page overflow
1357
1358(W) A single call to write() produced more lines than can fit on a page.
1359See L<perlform>.
1360
1361=item panic: ck_grep
1362
1363(P) Failed an internal consistency check trying to compile a grep.
1364
1365=item panic: ck_split
1366
1367(P) Failed an internal consistency check trying to compile a split.
1368
1369=item panic: corrupt saved stack index
1370
1371(P) The savestack was requested to restore more localized values than there
1372are in the savestack.
1373
1374=item panic: die %s
1375
1376(P) We popped the context stack to an eval context, and then discovered
1377it wasn't an eval context.
1378
1379=item panic: do_match
1380
1381(P) The internal pp_match() routine was called with invalid operational data.
1382
1383=item panic: do_split
1384
1385(P) Something terrible went wrong in setting up for the split.
1386
1387=item panic: do_subst
1388
1389(P) The internal pp_subst() routine was called with invalid operational data.
1390
1391=item panic: do_trans
1392
1393(P) The internal do_trans() routine was called with invalid operational data.
1394
1395=item panic: goto
1396
1397(P) We popped the context stack to a context with the specified label,
1398and then discovered it wasn't a context we know how to do a goto in.
1399
1400=item panic: INTERPCASEMOD
1401
1402(P) The lexer got into a bad state at a case modifier.
1403
1404=item panic: INTERPCONCAT
1405
1406(P) The lexer got into a bad state parsing a string with brackets.
1407
1408=item panic: last
1409
1410(P) We popped the context stack to a block context, and then discovered
1411it wasn't a block context.
1412
1413=item panic: leave_scope clearsv
1414
1415(P) A writable lexical variable became readonly somehow within the scope.
1416
1417=item panic: leave_scope inconsistency
1418
1419(P) The savestack probably got out of sync. At least, there was an
1420invalid enum on the top of it.
1421
1422=item panic: malloc
1423
1424(P) Something requested a negative number of bytes of malloc.
1425
1426=item panic: mapstart
1427
1428(P) The compiler is screwed up with respect to the map() function.
1429
1430=item panic: null array
1431
1432(P) One of the internal array routines was passed a null AV pointer.
1433
1434=item panic: pad_alloc
1435
1436(P) The compiler got confused about which scratch pad it was allocating
1437and freeing temporaries and lexicals from.
1438
1439=item panic: pad_free curpad
1440
1441(P) The compiler got confused about which scratch pad it was allocating
1442and freeing temporaries and lexicals from.
1443
1444=item panic: pad_free po
1445
1446(P) An invalid scratch pad offset was detected internally.
1447
1448=item panic: pad_reset curpad
1449
1450(P) The compiler got confused about which scratch pad it was allocating
1451and freeing temporaries and lexicals from.
1452
1453=item panic: pad_sv po
1454
1455(P) An invalid scratch pad offset was detected internally.
1456
1457=item panic: pad_swipe curpad
1458
1459(P) The compiler got confused about which scratch pad it was allocating
1460and freeing temporaries and lexicals from.
1461
1462=item panic: pad_swipe po
1463
1464(P) An invalid scratch pad offset was detected internally.
1465
1466=item panic: pp_iter
1467
1468(P) The foreach iterator got called in a non-loop context frame.
1469
1470=item panic: realloc
1471
1472(P) Something requested a negative number of bytes of realloc.
1473
1474=item panic: restartop
1475
1476(P) Some internal routine requested a goto (or something like it), and
1477didn't supply the destination.
1478
1479=item panic: return
1480
1481(P) We popped the context stack to a subroutine or eval context, and
1482then discovered it wasn't a subroutine or eval context.
1483
1484=item panic: scan_num
1485
1486(P) scan_num() got called on something that wasn't a number.
1487
1488=item panic: sv_insert
1489
1490(P) The sv_insert() routine was told to remove more string than there
1491was string.
1492
1493=item panic: top_env
1494
1495(P) The compiler attempted to do a goto, or something weird like that.
1496
1497=item panic: yylex
1498
1499(P) The lexer got into a bad state while processing a case modifier.
1500
1501=item Parens missing around "%s" list
1502
1503(W) You said something like
1504
1505 my $foo, $bar = @_;
1506
1507when you meant
1508
1509 my ($foo, $bar) = @_;
1510
1511Remember that "my" and "local" bind closer than comma.
1512
1513=item Perl %3.3f required--this is only version %s, stopped
1514
1515(F) The module in question uses features of a version of Perl more recent
1516than the currently running version. How long has it been since you upgraded,
1517anyway? See L<perlfunc/require>.
1518
1519=item Permission denied
1520
1521(F) The setuid emulator in suidperl decided you were up to no good.
1522
748a9306
LW
1523=item pid %d not a child
1524
1525(W) A warning peculiar to VMS. Waitpid() was asked to wait for a process which
1526isn't a subprocess of the current process. While this is fine from VMS'
1527perspective, it's probably not what you intended.
1528
a0d0e21e
LW
1529=item POSIX getpgrp can't take an argument
1530
1531(F) Your C compiler uses POSIX getpgrp(), which takes no argument, unlike
1532the BSD version, which takes a pid.
1533
1534=item Possible memory corruption: %s overflowed 3rd argument
1535
1536(F) An ioctl() or fcntl() returned more than Perl was bargaining for.
1537Perl guesses a reasonable buffer size, but puts a sentinel byte at the
1538end of the buffer just in case. This sentinel byte got clobbered, and
1539Perl assumes that memory is now corrupted. See L<perlfunc/ioctl>.
1540
1541=item Precedence problem: open %s should be open(%s)
1542
1543(S) The old irregular construct
1544
1545 open FOO || die;
1546
1547is now misinterpreted as
1548
1549 open(FOO || die);
1550
1551because of the strict regularization of Perl 5's grammar into unary and
1552list operators. (The old open was a little of both.) You must put
1553parens around the filehandle, or use the new "or" operator instead of "||".
1554
1555=item print on closed filehandle %s
1556
1557(W) The filehandle you're printing on got itself closed sometime before now.
1558Check your logic flow.
1559
1560=item printf on closed filehandle %s
1561
1562(W) The filehandle you're writing to got itself closed sometime before now.
1563Check your logic flow.
1564
1565=item Probable precedence problem on %s
1566
1567(W) The compiler found a bare word where it expected a conditional,
1568which often indicates that an || or && was parsed as part of the
1569last argument of the previous construct, for example:
1570
1571 open FOO || die;
1572
1573=item Read on closed filehandle <%s>
1574
1575(W) The filehandle you're reading from got itself closed sometime before now.
1576Check your logic flow.
1577
1578=item Reallocation too large: %lx
1579
1580(F) You can't allocate more than 64K on an MSDOS machine.
1581
1582=item Recompile perl with B<-D>DEBUGGING to use B<-D> switch
1583
1584(F) You can't use the B<-D> option unless the code to produce the
1585desired output is compiled into Perl, which entails some overhead,
1586which is why it's currently left out of your copy.
1587
1588=item Recursive inheritance detected
1589
1590(F) More than 100 levels of inheritance were used. Probably indicates
1591an unintended loop in your inheritance hierarchy.
1592
1593=item Reference miscount in sv_replace()
1594
1595(W) The internal sv_replace() function was handed a new SV with a
1596reference count of other than 1.
1597
1598=item regexp memory corruption
1599
1600(P) The regular expression engine got confused by what the regular
1601expression compiler gave it.
1602
1603=item regexp out of space
1604
1605(P) A "can't happen" error, because safemalloc() should have caught it earlier.
1606
1607=item regexp too big
1608
1609(F) The current implementation of regular expression uses shorts as
1610address offsets within a string. Unfortunately this means that if
1611the regular expression compiles to longer than 32767, it'll blow up.
1612Usually when you want a regular expression this big, there is a better
1613way to do it with multiple statements. See L<perlre>.
1614
1615=item Reversed %s= operator
1616
1617(W) You wrote your assignment operator backwards. The = must always
1618comes last, to avoid ambiguity with subsequent unary operators.
1619
1620=item Runaway format
1621
1622(F) Your format contained the ~~ repeat-until-blank sequence, but it
1623produced 200 lines at once, and the 200th line looked exactly like the
1624199th line. Apparently you didn't arrange for the arguments to exhaust
1625themselves, either by using ^ instead of @ (for scalar variables), or by
1626shifting or popping (for array variables). See L<perlform>.
1627
1628=item Scalar value @%s[%s] better written as $%s[%s]
1629
1630(W) You've used an array slice (indicated by @) to select a single value of
1631an array. Generally it's better to ask for a scalar value (indicated by $).
1632The difference is that $foo[&bar] always behaves like a scalar, both when
1633assigning to it and when evaluating its argument, while @foo[&bar] behaves
1634like a list when you assign to it, and provides a list context to its
1635subscript, which can do weird things if you're only expecting one subscript.
1636
748a9306
LW
1637On the other hand, if you were actually hoping to treat the array
1638element as a list, you need to look into how references work, since
1639Perl will not magically convert between scalars and lists for you. See
1640L<perlref>.
1641
a0d0e21e
LW
1642=item Script is not setuid/setgid in suidperl
1643
1644(F) Oddly, the suidperl program was invoked on a script with its setuid
1645or setgid bit set. This doesn't make much sense.
1646
1647=item Search pattern not terminated
1648
1649(F) The lexer couldn't find the final delimiter of a // or m{}
1650construct. Remember that bracketing delimiters count nesting level.
1651
1652=item seek() on unopened file
1653
1654(W) You tried to use the seek() function on a filehandle that was either
1655never opened or has been closed since.
1656
1657=item select not implemented
1658
1659(F) This machine doesn't implement the select() system call.
1660
1661=item sem%s not implemented
1662
1663(F) You don't have System V semaphore IPC on your system.
1664
1665=item semi-panic: attempt to dup freed string
1666
1667(S) The internal newSVsv() routine was called to duplicate a scalar
1668that had previously been marked as free.
1669
1670=item Semicolon seems to be missing
1671
1672(W) A nearby syntax error was probably caused by a missing semicolon,
1673or possibly some other missing operator, such as a comma.
1674
1675=item Send on closed socket
1676
1677(W) The filehandle you're sending to got itself closed sometime before now.
1678Check your logic flow.
1679
1680=item Sequence (?#... not terminated
1681
1682(F) A regular expression comment must be terminated by a closing
1683parenthesis. Embedded parens aren't allowed. See L<perlre>.
1684
1685=item Sequence (?%s...) not implemented
1686
1687(F) A proposed regular expression extension has the character reserved
1688but has not yet been written. See L<perlre>.
1689
1690=item Sequence (?%s...) not recognized
1691
1692(F) You used a regular expression extension that doesn't make sense.
1693See L<perlre>.
1694
1695=item setegid() not implemented
1696
1697(F) You tried to assign to $), and your operating system doesn't support
1698the setegid() system call (or equivalent), or at least Configure didn't
1699think so.
1700
1701=item seteuid() not implemented
1702
1703(F) You tried to assign to $>, and your operating system doesn't support
1704the seteuid() system call (or equivalent), or at least Configure didn't
1705think so.
1706
1707=item setrgid() not implemented
1708
1709(F) You tried to assign to $(, and your operating system doesn't support
1710the setrgid() system call (or equivalent), or at least Configure didn't
1711think so.
1712
1713=item setruid() not implemented
1714
1715(F) You tried to assign to $<, and your operating system doesn't support
1716the setruid() system call (or equivalent), or at least Configure didn't
1717think so.
1718
1719=item Setuid/gid script is writable by world
1720
1721(F) The setuid emulator won't run a script that is writable by the world,
1722because the world might have written on it already.
1723
1724=item shm%s not implemented
1725
1726(F) You don't have System V shared memory IPC on your system.
1727
1728=item shutdown() on closed fd
1729
1730(W) You tried to do a shutdown on a closed socket. Seems a bit superfluous.
1731
1732=item SIG%s handler "%s" not defined.
1733
1734(W) The signal handler named in %SIG doesn't, in fact, exist. Perhaps you
1735put it into the wrong package?
1736
1737=item sort is now a reserved word
1738
1739(F) An ancient error message that almost nobody ever runs into anymore.
1740But before sort was a keyword, people sometimes used it as a filehandle.
1741
1742=item Sort subroutine didn't return a numeric value
1743
1744(F) A sort comparison routine must return a number. You probably blew
1745it by not using C<E<lt>=E<gt> or C<cmp>, or by not using them correctly.
1746See L<perlfunc/sort>.
1747
1748=item Sort subroutine didn't return single value
1749
1750(F) A sort comparison subroutine may not return a list value with more
1751or less than one element. See L<perlfunc/sort>.
1752
1753=item Split loop
1754
1755(P) The split was looping infinitely. (Obviously, a split shouldn't iterate
1756more times than there are characters of input, which is what happened.)
1757See L<perlfunc/split>.
1758
1759=item Stat on unopened file <%s>
1760
1761(W) You tried to use the stat() function (or an equivalent file test)
1762on a filehandle that was either never opened or has been closed since.
1763
1764=item Statement unlikely to be reached
1765
1766(W) You did an exec() with some statement after it other than a die().
1767This is almost always an error, because exec() never returns unless
1768there was a failure. You probably wanted to use system() instead,
1769which does return. To suppress this warning, put the exec() in a block
1770by itself.
1771
1772=item Subroutine %s redefined
1773
1774(W) You redefined a subroutine. To suppress this warning, say
1775
1776 {
1777 local $^W = 0;
1778 eval "sub name { ... }";
1779 }
1780
1781=item Substitution loop
1782
1783(P) The substitution was looping infinitely. (Obviously, a
1784substitution shouldn't iterate more times than there are characters of
1785input, which is what happened.) See the discussion of substitution in
1786L<perlop/"Quote and Quotelike Operators">.
1787
1788=item Substitution pattern not terminated
1789
1790(F) The lexer couldn't find the interior delimiter of a s/// or s{}{}
1791construct. Remember that bracketing delimiters count nesting level.
1792
1793=item Substitution replacement not terminated
1794
1795(F) The lexer couldn't find the final delimiter of a s/// or s{}{}
1796construct. Remember that bracketing delimiters count nesting level.
1797
1798=item substr outside of string
1799
1800(W) You tried to reference a substr() that pointed outside of a string.
1801That is, the absolute value of the offset was larger than the length of
1802the string. See L<perlfunc/substr>.
1803
1804=item suidperl is no longer needed since...
1805
1806(F) Your Perl was compiled with B<-D>SETUID_SCRIPTS_ARE_SECURE_NOW, but a
1807version of the setuid emulator somehow got run anyway.
1808
1809=item syntax error
1810
1811(F) Probably means you had a syntax error. Common reasons include:
1812
1813 A keyword is misspelled.
1814 A semicolon is missing.
1815 A comma is missing.
1816 An opening or closing parenthesis is missing.
1817 An opening or closing brace is missing.
1818 A closing quote is missing.
1819
1820Often there will be another error message associated with the syntax
1821error giving more information. (Sometimes it helps to turn on B<-w>.)
1822The error message itself often tells you where it was in the line when
1823it decided to give up. Sometimes the actual error is several tokens
1824before this, since Perl is good at understanding random input.
1825Occasionally the line number may be misleading, and once in a blue moon
1826the only way to figure out what's triggering the error is to call
1827C<perl -c> repeatedly, chopping away half the program each time to see
1828if the error went away. Sort of the cybernetic version of S<20 questions>.
1829
1830=item System V IPC is not implemented on this machine
1831
1832(F) You tried to do something with a function beginning with "sem", "shm"
1833or "msg". See L<perlfunc/semctl>, for example.
1834
1835=item Syswrite on closed filehandle
1836
1837(W) The filehandle you're writing to got itself closed sometime before now.
1838Check your logic flow.
1839
1840=item tell() on unopened file
1841
1842(W) You tried to use the tell() function on a filehandle that was either
1843never opened or has been closed since.
1844
1845=item Test on unopened file <%s>
1846
1847(W) You tried to invoke a file test operator on a filehandle that isn't
1848open. Check your logic. See also L<perlfunc/-X>.
1849
1850=item That use of $[ is unsupported
1851
1852(F) Assignment to $[ is now strictly circumscribed, and interpreted as
1853a compiler directive. You may only say one of
1854
1855 $[ = 0;
1856 $[ = 1;
1857 ...
1858 local $[ = 0;
1859 local $[ = 1;
1860 ...
1861
1862This is to prevent the problem of one module changing the array base
1863out from under another module inadvertently. See L<perlvar/$[>.
1864
1865=item The %s function is unimplemented
1866
1867The function indicated isn't implemented on this architecture, according
1868to the probings of Configure.
1869
1870=item The crypt() function is unimplemented due to excessive paranoia.
1871
1872(F) Configure couldn't find the crypt() function on your machine,
1873probably because your vendor didn't supply it, probably because they
1874think the U.S. Govermnment thinks it's a secret, or at least that they
1875will continue to pretend that it is. And if you quote me on that, I
1876will deny it.
1877
1878=item The stat preceding C<-l _> wasn't an lstat
1879
1880(F) It makes no sense to test the current stat buffer for symbolic linkhood
1881if the last stat that wrote to the stat buffer already went past
1882the symlink to get to the real file. Use an actual filename instead.
1883
1884=item times not implemented
1885
1886(F) Your version of the C library apparently doesn't do times(). I suspect
1887you're not running on Unix.
1888
1889=item Too few args to syscall
1890
1891(F) There has to be at least one argument to syscall() to specify the
1892system call to call, silly dilly.
1893
1894=item Too many args to syscall
1895
1896(F) Perl only supports a maximum of 14 args to syscall().
1897
1898=item Too many arguments for %s
1899
1900(F) The function requires fewer arguments than you specified.
1901
1902=item trailing \ in regexp
1903
1904(F) The regular expression ends with an unbackslashed backslash. Backslash
1905it. See L<perlre>.
1906
1907=item Translation pattern not terminated
1908
1909(F) The lexer couldn't find the interior delimiter of a tr/// or tr[][]
1910construct.
1911
1912=item Translation replacement not terminated
1913
1914(F) The lexer couldn't find the final delimiter of a tr/// or tr[][]
1915construct.
1916
1917=item truncate not implemented
1918
1919(F) Your machine doesn't implement a file truncation mechanism that
1920Configure knows about.
1921
1922=item Type of arg %d to %s must be %s (not %s)
1923
1924(F) This function requires the argument in that position to be of a
1925certain type. Arrays must be @NAME or @{EXPR}. Hashes must be
1926%NAME or %{EXPR}. No implicit dereferencing is allowed--use the
1927{EXPR} forms as an explicit dereference. See L<perlref>.
1928
1929=item umask: argument is missing initial 0
1930
1931(W) A umask of 222 is incorrect. It should be 0222, since octal literals
1932always start with 0 in Perl, as in C.
1933
1934=item Unbalanced context: %d more PUSHes than POPs
1935
1936(W) The exit code detected an internal inconsistency in how many execution
1937contexts were entered and left.
1938
1939=item Unbalanced saves: %d more saves than restores
1940
1941(W) The exit code detected an internal inconsistency in how many
1942values were temporarily localized.
1943
1944=item Unbalanced scopes: %d more ENTERs than LEAVEs
1945
1946(W) The exit code detected an internal inconsistency in how many blocks
1947were entered and left.
1948
1949=item Unbalanced tmps: %d more allocs than frees
1950
1951(W) The exit code detected an internal inconsistency in how many mortal
1952scalars were allocated and freed.
1953
1954=item Undefined format "%s" called
1955
1956(F) The format indicated doesn't seem to exist. Perhaps it's really in
1957another package? See L<perlform>.
1958
1959=item Undefined sort subroutine "%s" called
1960
1961(F) The sort comparison routine specified doesn't seem to exist. Perhaps
1962it's in a different package? See L<perlfunc/sort>.
1963
1964=item Undefined subroutine &%s called
1965
1966(F) The subroutine indicated hasn't been defined, or if it was, it
1967has since been undefined.
1968
1969=item Undefined subroutine called
1970
1971(F) The anonymous subroutine you're trying to call hasn't been defined,
1972or if it was, it has since been undefined.
1973
1974=item Undefined subroutine in sort
1975
1976(F) The sort comparison routine specified is declared but doesn't seem to
1977have been defined yet. See L<perlfunc/sort>.
1978
1979=item unexec of %s into %s failed!
1980
1981(F) The unexec() routine failed for some reason. See your local FSF
1982representative, who probably put it there in the first place.
1983
1984=item Unknown BYTEORDER
1985
1986(F) There are no byteswapping functions for a machine with this byte order.
1987
1988=item unmatched () in regexp
1989
1990(F) Unbackslashed parentheses must always be balanced in regular
1991expressions. If you're a vi user, the % key is valuable for finding
1992the matching paren. See L<perlre>.
1993
1994=item Unmatched right bracket
1995
1996(F) The lexer counted more closing curly brackets (braces) than opening
1997ones, so you're probably missing an opening bracket. As a general
1998rule, you'll find the missing one (so to speak) near the place you were
1999last editing.
2000
2001=item unmatched [] in regexp
2002
2003(F) The brackets around a character class must match. If you wish to
2004include a closing bracket in a character class, backslash it or put it first.
2005See L<perlre>.
2006
2007=item Unquoted string "%s" may clash with future reserved word
2008
2009(W) You used a bare word that might someday be claimed as a reserved word.
2010It's best to put such a word in quotes, or capitalize it somehow, or insert
2011an underbar into it. You might also declare it as a subroutine.
2012
2013=item Unrecognized character \%03o ignored
2014
2015(S) A garbage character was found in the input, and ignored, in case it's
2016a weird control character on an EBCDIC machine, or some such.
2017
2018=item Unrecognized signal name "%s"
2019
2020(F) You specified a signal name to the kill() function that was not recognized.
2021Say C<kill -l> in your shell to see the valid signal names on your system.
2022
2023=item Unrecognized switch: -%s
2024
2025(F) You specified an illegal option to Perl. Don't do that.
2026(If you think you didn't do that, check the #! line to see if it's
2027supplying the bad switch on your behalf.)
2028
2029=item Unsuccessful %s on filename containing newline
2030
2031(W) A file operation was attempted on a filename, and that operation
2032failed, PROBABLY because the filename contained a newline, PROBABLY
2033because you forgot to chop() or chomp() it off. See L<perlfunc/chop>.
2034
2035=item Unsupported directory function "%s" called
2036
2037(F) Your machine doesn't support opendir() and readdir().
2038
2039=item Unsupported function %s
2040
2041(F) This machines doesn't implement the indicated function, apparently.
2042At least, Configure doesn't think so.
2043
2044=item Unsupported socket function "%s" called
2045
2046(F) Your machine doesn't support the Berkeley socket mechanism, or at
2047least that's what Configure thought.
2048
2049=item Unterminated <> operator
2050
2051(F) The lexer saw a left angle bracket in a place where it was expecting
2052a term, so it's looking for the corresponding right angle bracket, and not
2053finding it. Chances are you left some needed parentheses out earlier in
2054the line, and you really meant a "less than".
2055
2056=item Use of $# is deprecated
2057
2058(D) This was an ill-advised attempt to emulate a poorly defined awk feature.
2059Use an explicit printf() or sprintf() instead.
2060
2061=item Use of $* is deprecated
2062
2063(D) This variable magically turned on multiline pattern matching, both for
2064you and for any luckless subroutine that you happen to call. You should
2065use the new C<//m> and C<//s> modifiers now to do that without the dangerous
2066action-at-a-distance effects of C<$*>.
2067
748a9306
LW
2068=item Use of %s in printf format not supported
2069
2070(F) You attempted to use a feature of printf that is accessible only
2071from C. This usually means there's a better way to do it in Perl.
2072
a0d0e21e
LW
2073=item Use of %s is deprecated
2074
2075(D) The construct indicated is no longer recommended for use, generally
2076because there's a better way to do it, and also because the old way has
2077bad side effects.
2078
2079=item Use of implicit split to @_ is deprecated
2080
2081(D) It makes a lot of work for the compiler when you clobber a
2082subroutine's argument list, so it's better if you assign the results of
2083a split() explicitly to an array (or list).
2084
2085=item Use of uninitialized value
2086
2087(W) An undefined value was used as if it were already defined. It was
2088interpreted as a "" or a 0, but maybe it was a mistake. To suppress this
2089warning assign an initial value to your variables.
2090
2091=item Useless use of %s in void context
2092
2093(W) You did something without a side effect in a context that does nothing
2094with the return value, such as a statement that doesn't return a value
2095from a block, or the left side of a scalar comma operator. Very often
2096this points not to stupidity on your part, but a failure of Perl to parse
2097your program the way you thought it would. For example, you'd get this
2098if you mixed up your C precedence with Python precedence and said
2099
2100 $one, $two = 1, 2;
2101
2102when you meant to say
2103
2104 ($one, $two) = (1, 2);
2105
748a9306
LW
2106Another common error is to use ordinary parentheses to construct a list
2107reference when you should be using square or curly brackets, for
2108example, if you say
2109
2110 $array = (1,2);
2111
2112when you should have said
2113
2114 $array = [1,2];
2115
2116The square brackets explicitly turn a list value into a scalar value,
2117while parentheses do not. So when a parenthesized list is evaluated in
2118a scalar context, the comma is treated like C's comma operator, which
2119throws away the left argument, which is not what you want. See
2120L<perlref> for more on this.
2121
a0d0e21e
LW
2122=item Warning: unable to close filehandle %s properly.
2123
2124(S) The implicit close() done by an open() got an error indication on the
2125close(0. This usually indicates your filesystem ran out of disk space.
2126
2127=item Warning: Use of "%s" without parens is ambiguous
2128
2129(S) You wrote a unary operator followed by something that looks like a
2130binary operator that could also have been interpreted as a term or
2131unary operator. For instance, if you know that the rand function
2132has a default argument of 1.0, and you write
2133
2134 rand + 5;
2135
2136you may THINK you wrote the same thing as
2137
2138 rand() + 5;
2139
2140but in actual fact, you got
2141
2142 rand(+5);
2143
2144So put in parens to say what you really mean.
2145
2146=item Write on closed filehandle
2147
2148(W) The filehandle you're writing to got itself closed sometime before now.
2149Check your logic flow.
2150
2151=item X outside of string
2152
2153(F) You had a pack template that specified a relative position before
2154the beginning of the string being unpacked. See L<perlfunc/pack>.
2155
2156=item x outside of string
2157
2158(F) You had a pack template that specified a relative position after
2159the end of the string being unpacked. See L<perlfunc/pack>.
2160
2161=item Xsub "%s" called in sort
2162
2163(F) The use of an external subroutine as a sort comparison is not yet supported.
2164
2165=item Xsub called in sort
2166
2167(F) The use of an external subroutine as a sort comparison is not yet supported.
2168
2169=item You can't use C<-l> on a filehandle
2170
2171(F) A filehandle represents an opened file, and when you opened the file it
2172already went past any symlink you are presumably trying to look for.
2173Use a filename instead.
2174
2175=item YOU HAVEN'T DISABLED SET-ID SCRIPTS IN THE KERNEL YET!
2176
2177(F) And you probably never will, since you probably don't have the
2178sources to your kernel, and your vendor probably doesn't give a rip
2179about what you want. Your best bet is to use the wrapsuid script in
2180the eg directory to put a setuid C wrapper around your script.
2181
2182=item You need to quote "%s"
2183
2184(W) You assigned a bareword as a signal handler name. Unfortunately, you
2185already have a subroutine of that name declared, which means that Perl 5
2186will try to call the subroutine when the assignment is executed, which is
2187probably not what you want. (If it IS what you want, put an & in front.)
2188
2189=item [gs]etsockopt() on closed fd
2190
2191(W) You tried to get or set a socket option on a closed socket.
2192Did you forget to check the return value of your socket() call?
2193See L<perlfunc/getsockopt>.
2194
2195=item \1 better written as $1
2196
2197(W) Outside of patterns, backreferences live on as variables. The use
2198of backslashes is grandfathered on the righthand side of a
2199substitution, but stylistically it's better to use the variable form
2200because other Perl programmers will expect it, and it works better
2201if there are more than 9 backreferences.
2202
748a9306
LW
2203=item '|' and '<' may not both be specified on command line
2204
2205(F) An error peculiar to VMS. Perl does its own command line redirection, and
2206found that STDIN was a pipe, and that you also tried to redirect STDIN using
2207'<'. Only one STDIN stream to a customer, please.
2208
2209=item '|' and '>' may not both be specified on command line
2210
2211(F) An error peculiar to VMS. Perl does its own command line redirection, and
2212thinks you tried to redirect stdout both to a file and into a pipe to another
2213command. You need to choose one or the other, though nothing's stopping you
2214from piping into a program or Perl script which 'splits' output into two
2215streams, such as
2216
2217 open(OUT,">$ARGV[0]") or die "Can't write to $ARGV[0]: $!";
2218 while (<STDIN>) {
2219 print;
2220 print OUT;
2221 }
2222 close OUT;
2223
a0d0e21e
LW
2224=back
2225