|
- added EXPERIMENTAL DBIx::C...
|
1 |
package MyModel8::table2; |
| 2 | ||
| 3 |
use base 'MyModel8'; |
|
| 4 | ||
| 5 |
__PACKAGE__->attr(filter => sub {
|
|
| 6 |
[ |
|
| 7 |
key3 => {out => sub { $_[0] * 2}, in => sub { $_[0] * 3}, end => sub { $_[0] * 4 }}
|
|
| 8 |
] |
|
| 9 |
}); |
|
| 10 | ||
| 11 |
1; |