added t/common-mysql-qualifi...
|
1 |
package MyModel8::dbix_custom::table2; |
2 |
use MyModel8 -base; |
|
3 | ||
4 |
has filter => sub { |
|
5 |
{ |
|
6 |
key3 => {out => sub { $_[0] * 2}, in => sub { $_[0] * 3}, end => sub { $_[0] * 4 }} |
|
7 |
} |
|
8 |
}; |
|
9 | ||
10 |
1; |