- バックアップ一覧
- 現在との差分 を表示
- ソース を表示
- バックアップ を表示
- Perl-DBIx-Skinny/スキーマの設定方法(inflate deflate) へ行く。
- 1 (2010-10-23 (土) 19:11:16)
- 2 (2010-10-23 (土) 19:11:33)
- 追加された行はこの色です。
- 削除された行はこの色です。
* スキーマの設定方法(inflate / deflate) [#r4ca6d26]
*** MyDB/Schema.pm [#f7cd6f8f]
install_inflate_rule
'^sex$' =>
callback {
inflate {
my $value = shift;
return $value eq '1' ? 'man' : 'woman';
};
deflate {
my $value = shift;
return defined $value == 1 ? 1 : 2;
};
};