Koordination der Seitengenerierung II

lib/VShop/Page.pm

my $page = new VShop::Element::Box( mode => 'horizontal'); $page->add($nav, 25); $page->add($body, 75); print $out $cgi->header, $cgi->start_html("Virtual Shop Demo"); $page->gen($out); print $out $cgi->end_html; }; if ($@) { my $error = $@; print $out $cgi->header, $cgi->start_html("Fatal Error"), $cgi->h1("Fatal Error"), $cgi->hr; print $out "Regrettably, we are unable to " . "process your request:\n<P>\n"; print $out "Error Message:<P>\n" . "<PRE>\n$error\n</PRE>\n"; print $out $cgi->end_html; } }