ok, funzt, also weiter zur datenbankanbindung
script\mypboard_create.pl model PBDB DBIC dbi:mysql:dbname=pboard user secret
so wie in der doku funzts nicht
= $c->model('PBDB')->table('PbUser')->search( 'order_by' => 'id ASC');
Caught exception in MyPBoard::Controller::User->list "Can't call method "search" on an undefined value at E:/web/PBoard_Catalyst/MyPBoard/script/../lib/MyPBoard/Controller/User.pm line 14."
dann ein wenig rumgespielt
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
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 }
# $c->stash->{user_list} =
# MyPBoard::SchemaLoader::PBoard::PbUser
# # $c->model('PBoard')->table('PbUser')
# ->search( 'order_by' => 'id ASC');
die Dumper (\%MyPBoard::Model::PBoard::);
die Dumper $c->model('PBoard');
# my @x = MyPBoard::SchemaLoader::PBoard->loader->tables;
# die "Tables: @x";
# die Dumper($c->model('PBoard')->schema);
# my $pbUser = $c->model('PBoard')->class('PbUser');
# die Dumper($pbUser);
# my $pbUser = $c->model('PBoard')->resultset('PbUser');
# die Dumper ($pbUser->search( { nick => 'Strat' } ));
# die Dumper( $c->model('PBoard')->resultset('PbUser')->search('id' => 1) );
} # list
danach mal hier meine Frage gestellt:
Catalyst + Model::DBIC - Verzweiflung\n\n
<!--EDIT|Strat|1147816780-->