<%doc>
   # document everything (conventions, hacks etc) :P~
</%doc>
<%once>
   # load modules at this step only if you're not able to load them "at startup"
   # (e.g. preloading them under a mod_perl enabled HTTPd)
   use My::App;
</%once>
<%init>
    # set up runtime/dynamic default configuration parameters
    $m->comp( '_conf', %ARGS );
    # ^ these should all be "notes" ($m->notes)

    # a <%shared> replacement (yeah, that's me,
    # I always avoided it for not doing what I meant) ;-/
    if ( $m->request_comp->method_exists('_init') ) {
        $m->request_comp->call_method('_init', %ARGS);
    }

    # fetch page content
    $m->notes( 'page_content' => $m->scomp( $m->fetch_next, %ARGS ) );
    # ^ remember that you have to *handle* the "exceptions"

    # <%cleanup> replacement
    if ( $m->request_comp->method_exists('_cleanup') ) {
        $m->request_comp->call_method( '_cleanup', %ARGS );
    }

    # render output
    return $m->comp( '_render', %ARGS );
</%init>