| 2.1 | See it in action |
| 2.2 | Loops (Table rows) |
| 2.3 | Using BLOCK command (Sections) |
| 2.4 | Weitere Beispiele / More Samples |
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 ] );
- 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
$Website->let(YOUR_VARIABLE_NAME, 'your value');
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 => '-}'
);
$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);
copyright by retoh - created with mytexi