On Tue, Nov 18, 2008 at 6:13 AM, J. Shirley [EMAIL PROTECTED] wrote:
On Mon, Nov 17, 2008 at 11:49 PM, [EMAIL PROTECTED] wrote:
HI all:
I am a Catalyst beginner and run into this problem
since I have a model like this
package MyApp::Model::Trial;
use strict;
use warnings;
sub new{
my
HI all:
I am a Catalyst beginner and run into this problem
since I have a model like this
package MyApp::Model::Trial;
use strict;
use warnings;
sub new{
my $pack = shift;
my $self = bless {
foo = 'default value foo',
},$pack;
return $self;
}
sub get{
return shift-{'foo'};
}
1
how could I