if test $perllib
then 
    perlparams="-I$homelib -I$perllib"
fi

echo "#!$perlbin $perlparams"
echo 
echo "use lib qw( $perllib $homelib );"
echo
echo 'use strict;'
echo 'use warnings;'
echo

if test $web_debug
then 
  echo 'BEGIN {'
  echo '    print "Content-Type: text/html; charset=utf-8\nCache-Control: no-cache\n\n";'
  echo '    print "<pre>";'
  echo '    $ACIS::DEBUGIMMEDIATELY = "on";'
  echo '}'
fi
echo
echo 'BEGIN { $ACIS::DEBUG = "on"; }'
echo
echo 'use ACIS::Web;'
echo 'my $acis = new ACIS::Web( "home" => ' "'$homedir' );"
echo
echo '$acis -> handle_request;'
echo

