package Site::Cfg;

# Stolen from Thomas Sibley's Mooseboard 
# <trs@perlmonk.org>
sub new {
	my $class = shift; 
	my $self  = bless { template => \%templates }, $class;
	return $self;
}

my %templates = ( splash => 'C:/indigoperl/apache/fd/tmpl/splash.tmpl' );

1;

###############################
#!perl -w

use strict;
use lib '.';
use Site;


my $q =  CGI->new;
my $tmpl = Site::Cfg->new;
print Site::Page->header;
print $tmpl->{template}->{splash};