#!/usr/bin/perl -w package SFConfig::Globals; use strict; use Exporter; use vars qw(@ISA @EXPORT); @ISA = qw(Exporter); @EXPORT = qw(TEMPLATE_DIRECTORY); sub TEMPLATE_DIRECTORY () {"/srv/www/vhosts/spamfilter.onlineky.net/Templates"} 1; #### #!/usr/bin/perl -w use strict; use SFConfig::Globals; print "Content-type: text/html\n\n"; my $test = SFConfig::Globals::TEMPLATE_PATH; print "$test\n";