<%once>
    use DBI;
    use XML::Simple;

    my $config = XMLin($m->file('config/config.xml'));
    my $dbh = DBI->connect(    "DBI:mysql:usw:usf",$config->...->usr,$config->...->$pwd,...) 
        or $m->comp('errorhandler', error => "kein verbindung usw.;) ") and exit;
</%once>

<%init>
    $m->call_next;
</%init>

<%flags>
    inherit => undef
</%flags>