#!/usr/bin/perl -Tw -I. -I/usr/local/positive/Perl

use strict;
use Pos::Webtop::Web::ModuleLoader;

my $tb = Pos::Webtop::Toolbox->new();
my $client = $tb->getClient();
my $cgi = $tb->getCgi();

#$client->checkSession();

my $p = $tb->getPage( title=> "Blah and stuff" );

print $p->getHeaderHtml();

my $box1 = $tb->createBox( type=> "contentModulePreview", title=> "Doh, a box" );

print $box1->getHeaderHtml();

print "<br/><br/>Some stuff inside the box!<br/><br/><br/>";

print $box1->getFooterHtml();

print $p->getFooterHtml();