#!/usr/bin/perl

my $phptype = shift(@ARGV); # php or php3
my $remoteip = shift(@ARGV);
my $httphost = shift(@ARGV);
my $requri = shift(@ARGV);

require "reamweaver.conf";   # configuration file
require "reamweaverlib.pl";      # script lib

indexcall($phptype, $remoteip, $httphost, $requri);