Catalyst + Model::DBIC - Verzweiflung - #28511 (Webframeworks, Sonstige Fragen zur Webprogrammierung mit Perl)

Strat

2006-05-06 01:46

User since
2003-08-04
5246 Artikel
ModeratorIn

Hallo Leute,

zum Lernen von Catalyst fuer das neue Forum spiele ich mal mit Catalyst herum, und habe Probleme bei der Datenbankanbindung, an der ich jetzt schon etwa vier Stunden rumprobiere.

Code: (dl )

catalyst MyPBoard
cd MyPBoard
script\MyPBoard_create.pl view HTC HTML::Template::Compiled
script\mypboard_create.pl controller User

In lib\MyPBoard\View\HTC.pm sub new hinzugefuegt:

Code: (dl )

sub new {
    my ($self) = shift;
    return $self->SUPER::new(@_);
} # new

In .\myboard.yml folgendes (und ein paar weitere Parameter) hinzugefuegt:

Code: (dl )

template:
    # cache_dir: './tmp/htc'
    path:        './templates'
    global_vars: 1

in .\lib\MyPBoard\Controller\User.pm die folgenden Subs reingeschrieben:

Code: (dl )

sub list : Path('/user/list') {
    my ($self, $c) = @_;

    my %data = ( template     => 'user/list.tmpl',
                 title        => 'Benutzerliste',

                 navigationfile   => 'sub_naviagtion_user.tmpl',
                 username         => 'XXXXXX',
                 show_images      => 1,
            );
    
    while (my ($k, $v) = each %data) { $c->stash->{$k} = $v }

    die;
} # list
# ------------------------------------------------------------
sub end : Private {
    my ($self, $c) = @_;

    $c->forward("MyPBoard::View::HTC");
} # end

das template list.tmpl nach user/list.tmpl gestellt

Bisher laeuft alles, wie ich es erwarte, keine warnungen/fehler usw.

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/