#!/usr/bin/perl
use strict;

use FindBin qw($Bin);
my $MyBin = "$Bin/../../../";
$ENV{PERLIB} = (length($ENV{PERLIB})? "$ENV{PERLIB}:" : '')
    . "$MyBin/perl/common-inc/:$MyBin/perl/fallback-inc/";
chdir $MyBin;
my $s = system("perl site/stunnixwebsrv/startsite.pl");
    
    