version 1.2, 2002/05/04 00:03:29
|
version 1.5, 2002/05/16 17:24:06
|
Line 43 my $confdir='/etc/httpd/conf/';
|
Line 43 my $confdir='/etc/httpd/conf/';
|
sub read_conf { |
sub read_conf { |
my (@conf_files)=@_; |
my (@conf_files)=@_; |
my %perlvar; |
my %perlvar; |
foreach my $filename (@conf_files) { |
foreach my $filename (@conf_files,'loncapa_apache.conf') { |
open(CONFIG,'<'.$confdir.$filename) or die("Can't read $filename"); |
open(CONFIG,'<'.$confdir.$filename) or die("Can't read $confdir$filename"); |
while (my $configline=<CONFIG>) { |
while (my $configline=<CONFIG>) { |
if ($configline =~ /^[^\#]*PerlSetVar/) { |
if ($configline =~ /^[^\#]*PerlSetVar/) { |
my ($unused,$varname,$varvalue)=split(/\s+/,$configline); |
my ($unused,$varname,$varvalue)=split(/\s+/,$configline); |
Line 82 trying to support backwards compatibilit
|
Line 82 trying to support backwards compatibilit
|
|
|
=head1 DESCRIPTION |
=head1 DESCRIPTION |
|
|
Many different parts of the LON-CAPA software need to read in the machine-specific |
Many different parts of the LON-CAPA software need to read in the |
configuration information. These included scripts controlling the TCP/IP layer |
machine-specific configuration information. These included scripts |
(e.g. F<lonc> and F<lond>), testing scripts (e.g. test_weblayer.pl and sqltest.pl), |
controlling the TCP/IP layer (e.g. F<lonc> and F<lond>), testing scripts |
and utility scripts (e.g. clusterstatus.pl and metadata_keywords.pl). |
(e.g. test_weblayer.pl and sqltest.pl), and utility scripts |
|
(e.g. clusterstatus.pl and metadata_keywords.pl). |
|
|
The following methods are available: |
The following methods are available: |
|
|
Line 104 have been initialized from the configura
|
Line 105 have been initialized from the configura
|
in the arguments. |
in the arguments. |
|
|
If multiple file names define the same hash key, then priority is |
If multiple file names define the same hash key, then priority is |
given toward the last file name processed. |
given toward the B<last> file name processed. |
|
|
=back |
=back |
|
|