3 # This is the main webstump cgi script.
5 # Figure out the home directory
8 if( !($0 =~ /\/scripts\/webstump\.pl$/) ) {
9 die "This script can only be called with full path name!!!";
13 $webstump_home =~ s/\/scripts\/webstump\.pl$//;
15 $webstump_home =~ /(^.*$)/;
18 require "$webstump_home/config/webstump.cfg";
19 require "$webstump_home/scripts/webstump.lib.pl";
20 require "$webstump_home/scripts/filter.lib.pl";
21 require "$webstump_home/scripts/html_output.pl";
22 #require "$webstump_home/scripts/gatekeeper.lib";
23 require "$webstump_home/scripts/mime-parsing.lib";
29 ######################################################################
31 %request = &readWebRequest;
35 if( defined %request ) {
37 $command = $request{'action'} if( defined $request{'action'} );
43 &processWebRequest( $command );