#!/usr/bin/perl

# get the current dir
use Cwd;
my $cwd = &Cwd::cwd();

use File::Basename;
# find out where this script resides
my $basedir = dirname($0);

if (! $basedir eq $pwd ) {
    # change dir and launch the installer
    exec("cd $basedir; include/installServer.pl");
    exit 0;
}

# start the installer
exec("include/installServer.pl");