test cleanup
|
1 |
package MyModel6::TABLE3; |
2 | ||
3 |
use base 'MyModel6'; |
|
4 | ||
5 |
__PACKAGE__->attr(filter => sub { |
|
6 |
[ |
|
7 |
KEY1 => {in => sub { uc $_[0] }} |
|
8 |
] |
|
9 |
}); |
|
10 | ||
11 |
1; |