You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by sb...@locus.apache.org on 2000/04/19 14:46:41 UTC
cvs commit: modperl/eg startup.pl
sbekman 00/04/19 05:46:40
Modified: eg startup.pl
Log:
sane env check example
Revision Changes Path
1.3 +3 -0 modperl/eg/startup.pl
Index: startup.pl
===================================================================
RCS file: /home/cvs/modperl/eg/startup.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- startup.pl 1998/03/19 23:08:30 1.2
+++ startup.pl 2000/04/19 12:46:39 1.3
@@ -12,6 +12,9 @@
#add this to srm.conf:
#PerlRequire scripts/startup.pl
+# make sure we are in a sane environment.
+$ENV{GATEWAY_INTERFACE} =~ /^CGI-Perl/ or die "GATEWAY_INTERFACE not Perl!";
+
#modify @INC if needed
#use lib qw(/foo/perl/lib);
Re: cvs commit: modperl/eg startup.pl
Posted by Doug MacEachern <do...@covalent.net>.
> +# make sure we are in a sane environment.
> +$ENV{GATEWAY_INTERFACE} =~ /^CGI-Perl/ or die "GATEWAY_INTERFACE not Perl!";
please don't use that uglyness anymore, we have the cleaner and more logic
$ENV{MOD_PERL} for quite a while now. actually, i would like to remove
eg/ from the distribution altogether, it's way out of date, and not very
useful now that we have the guide, the book, and a pile of Apache::*
modules on cpan.