Of course, I forgot to attach the httpd.conf itself. Here it
is. Sorry.
--
Alex Shnitman <[EMAIL PROTECTED]>
LiveLinx Extensible Solutions Ltd.
AccessConfig /dev/null
ResourceConfig /dev/null
ServerType standalone
LoadModule perl_module /usr/lib/apache/1.3/mod_perl.so
ServerRoot /tmp
ErrorLog /dev/null
PidFile /tmp/httpd.pid
<Perl>
my %port = (zz => 8010);
use POSIX;
my $portname = POSIX::getcwd;
chomp $portname;
$portname =~ s:.*/::;
#$portname = "zz";
print "'$portname'\n";
$Port = $port{$portname};
print $Port, "\n";
</Perl>
