package test09::Models::NewModel;
use strict;
use warnings;
my $model=
{
};
sub model{
if($_[0] eq __PACKAGE__){
shift;
}
my $arg = shift;
if($arg){
$model = $arg;
}else{
return $model;
}
}
1;
package test09::Models::NewModel;
use strict;
use warnings;
my $model=
{
};
sub model{
if($_[0] eq __PACKAGE__){
shift;
}
my $arg = shift;
if($arg){
$model = $arg;
}else{
return $model;
}
}
1;