#!/usr/bin/perl
use
strict;
use
CGI::WebToolkit;
my
$wtk
= CGI::WebToolkit->new(
-privatepath
=>
'/home/toki/Desktop/wtk/CGI-WebToolkit/t/private'
,
-publicpath
=>
'/home/toki/Desktop/wtk/CGI-WebToolkit/t/public'
,
-cgipath
=>
'/home/toki/Desktop/wtk/CGI-WebToolkit/t/cgi'
,
# db
-user
=>
'root'
,
-name
=>
'test'
,
# session
-sessiontable
=>
'session'
,
# user
-usertable
=>
'user'
,
-checkrights
=> 1,
# caching
-cachetable
=>
'cache'
,
-entryaction
=>
'test.home'
,
);
$wtk
->handle();