Re: [PerlChina] catalyst problem

xu zhou wrote:
> 粗略看了下catalyst
> 没搞明白Model是如何传递数据给controller的
>
> 我原以为是这样
> package MyApp::Model::Trial;
> sub new{
> my $pack = shift;
> my $self = bless {
> foo => 'default value foo',
> },$pack;
> return $self;
> }
>
> sub get{
> return shift->{'foo'};
> }
> 1
>
> 然后通过在controller里面调用
> my $a = $c->model('Trial::get');
> 来获得这个model的对象从而调用model的数据

我没用 Catalyst(我用 CGI::Application). 但记得Catalyst 里 Model 的调用方
法应该是 $c->model('Trial')->method. 这里catalyst 每次调用
$c->model('Trial') 都会得到一个 MyApp::Model::Trial 的对象，所以接着你就
可以调用 ->get 。

说的不对的地方请熟悉 catalyst 的朋友指出..

Qiang(James)
_______________________________________________
China-pm mailing list
China-pm@pm.org
http://mail.pm.org/mailman/listinfo/china-pm