test cleranup
|
1 |
package MyModel4::company; |
2 | ||
3 |
use base 'MyModel4'; |
|
4 | ||
5 |
sub insert { shift->SUPER::insert(param => $_[0]) } |
|
6 |
sub list { shift->select } |
|
7 | ||
8 |
1; |