This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[dummy merge]
authorChip Salzenberg <chip@atlantic.net>
Fri, 21 Feb 1997 14:41:53 +0000 (02:41 +1200)
committerChip Salzenberg <chip@atlantic.net>
Fri, 21 Feb 1997 14:41:53 +0000 (02:41 +1200)
This merge exists so that the p5p version of the patch and the applied
version are both in the history

pod/perldiag.pod
pod/perlsec.pod
utils/perlbug.PL

index 394ffcb..3334b65 100644 (file)
@@ -122,25 +122,25 @@ before it could possibly have been used.
 =item %s: Command not found
 
 (A) You've accidentally run your script through B<csh> instead
-of Perl.  Check the E<lt>#!E<gt> line, or manually feed your script
-into Perl yourself.
+of Perl.  Check the #! line, or manually feed your script into
+Perl yourself.
 
 =item %s: Expression syntax
 
 (A) You've accidentally run your script through B<csh> instead
-of Perl.  Check the E<lt>#!E<gt> line, or manually feed your script
-into Perl yourself.
+of Perl.  Check the #! line, or manually feed your script into
+Perl yourself.
 
 =item %s: Undefined variable
 
 (A) You've accidentally run your script through B<csh> instead
-of Perl.  Check the E<lt>#!E<gt> line, or manually feed your script
-into Perl yourself.
+of Perl.  Check the #! line, or manually feed your script into
+Perl yourself.
 
 =item %s: not found
 
 (A) You've accidentally run your script through the Bourne shell
-instead of Perl.  Check the E<lt>#!E<gt> line, or manually feed your script
+instead of Perl.  Check the #! line, or manually feed your script
 into Perl yourself.
 
 =item B<-P> not allowed for setuid/setgid script
@@ -193,7 +193,9 @@ a missing quote, operator, parenthesis pair or declaration.
 =item Args must match #! line
 
 (F) The setuid emulator requires that the arguments Perl was invoked
-with match the arguments specified on the #! line.
+with match the arguments specified on the #! line.  Since some systems
+impose a one-argument limit on the #! line, try combining switches;
+for example, turn C<-w -U> into C<-wU>.
 
 =item Argument "%s" isn't numeric%s
 
@@ -320,8 +322,8 @@ wasn't a symbol table entry.
 =item Badly placed ()'s
 
 (A) You've accidentally run your script through B<csh> instead
-of Perl.  Check the E<lt>#!E<gt> line, or manually feed your script
-into Perl yourself.
+of Perl.  Check the #! line, or manually feed your script into
+Perl yourself.
 
 =item BEGIN failed--compilation aborted
 
@@ -2125,7 +2127,7 @@ if the error went away.  Sort of the cybernetic version of S<20 questions>.
 =item syntax error at line %d: `%s' unexpected
 
 (A) You've accidentally run your script through the Bourne shell
-instead of Perl.  Check the E<lt>#!E<gt> line, or manually feed your script
+instead of Perl.  Check the #! line, or manually feed your script
 into Perl yourself.
 
 =item System V IPC is not implemented on this machine
@@ -2200,9 +2202,9 @@ handles tainting, by the time Perl discovers a B<-T> in a script, it's
 too late to properly taint everything from the environment.  So Perl
 gives up.
 
-This error can usually be fixed by editing the "#!" line so that the
+This error can usually be fixed by editing the #! line so that the
 B<-T> option is in the Perl program's first argument.  (Many operating
-systems that implement the "#!" feature only pick up one argument from
+systems that implement the #! feature only pick up one argument from
 it, so Perl has to get the rest on its own.)
 
 =item Too many ('s
@@ -2210,8 +2212,8 @@ it, so Perl has to get the rest on its own.)
 =item Too many )'s
 
 (A) You've accidentally run your script through B<csh> instead
-of Perl.  Check the E<lt>#!E<gt> line, or manually feed your script
-into Perl yourself.
+of Perl.  Check the #! line, or manually feed your script into
+Perl yourself.
 
 =item Too many args to syscall
 
@@ -2523,8 +2525,8 @@ variables.
 =item Variable syntax
 
 (A) You've accidentally run your script through B<csh> instead
-of Perl.  Check the E<lt>#!E<gt> line, or manually feed your script
-into Perl yourself.
+of Perl.  Check the #! line, or manually feed your script into
+Perl yourself.
 
 =item Warning: something's wrong
 
index 5961200..3e44e5b 100644 (file)
@@ -141,6 +141,17 @@ locale-aware program, and want to launder data with a regular expression
 containing C<\w>, put C<no locale> ahead of the expression in the same
 block.  See L<perllocale/SECURITY> for further discussion and examples.
 
+=head2 Switches On the "#!" Line
+
+When you make a script executable, in order to make it usable as a
+command, the system will pass switches to perl from the script's #!
+line.  Perl checks that any command-line switches given to a setuid
+(or setgid) script actually match the ones set on the #! line.  Some
+UNIX and UNIX-like environments impose a one-switch limit on the #!
+line, so you may need to use something like C<-wU> instead of C<-w -U>
+under such systems.  (This issue should arise only in UNIX or
+UNIX-like environments that support #! and setuid or setgid scripts.)
+
 =head2 Cleaning Up Your Path
 
 For "Insecure C<$ENV{PATH}>" messages, you need to set C<$ENV{'PATH'}> to a
index 5c7a767..064d71d 100644 (file)
@@ -904,19 +904,6 @@ the bug, and encourage the maintainers with kind words (but never any
 flames!).  Feel free to resend your bug report if the next released
 version of perl comes out and your bug is still present.
 
-If it is important to you that your bug be fixed B<soon>, you may 
-wish to arrange with a programmer to do the work. If you don't 
-have one handy, you may reach many talented folks who already 
-know the internals of Perl by mentioning your desire to hire a 
-contract programmer in your bug report. (In reality, this is
-hardly ever necessary, since the Perl maintainers are simple 
-folk dedicated to helping Perl approach perfection. The only 
-thing that makes them happier than fixing bugs is to be given 
-a plate of warm cookies and a glass of milk at bedtime. 
-Nevertheless, very few of the developers have taken a vow of 
-poverty (though some have had poverty thrust upon them), and 
-so this may be your way of contributing to Perl.)
-
 =head1 OPTIONS
 
 =over 8