2 Usage

24.03.2006

Usage

use Website;

$ws = Website->new(
	file => PATH_TO_TEMPLATE
	[, debug     => 0|1  ]
	[, start_seq => '{%' ]
	[, stop_seq  => '%}' ]
	[, save_as   => PATH_TO_TEMPLATE ]
);

$ws->let(KEY, VALUE);
$ws->block(BLOCK_NAME, print => 0|1);

$ws->print( contentType_is_set => 0|1 [ ,quiet => 0|1 ] );

Object Parameters

• file pfad zu template
• save_as falls rendering zu statischem file, sonst leer
• start_seq start-sequenz, Annahme {{, falls leer
• stop_seq stop-sequenz, Annahme }}, falls leer
• debug true, falls debugging gewünscht, sonst leer

Zuweisung der Variablen (Platzhalter):

$Website->let(YOUR_VARIABLE_NAME, 'your value');

Examples

use Website;

$Website = Website->new( file => 'website-tpl.htm' );
$Website->let('firstname', 'Reto');
$Website->let('lastname' , 'Hersiczky');
$Website->block('demoBlock', print => $ENV{QUERY_STRING} eq 'block=1' ? 1 : 0);

Variablen von der Struktur {-YOUR_VARIABLE_NAME-} sollen ersetzt werden:

my $Website = Website->new(
  file      => 'website_sample.htm' ,
  start_seq => '{-' ,  
  stop_seq  => '-}' 
);

Rendering auslösen (Seite Senden)

$Website->print( contentType_is_set => 0 );

Falls contentType_is_set auf 0 (false) gesetzt wird, wird der MIME Type von Website ausgegeben. Falls der MIME Type im aufrufenden Script bereits früher ausgeben wurde, muss das Rendering mit folgendem Perl Code ausgelöst werden:

$Website->print( contentType_is_set => 1);