perl - 带有 DBIC 的 HTML::FormHandler 在 update_model 之前更新额外的数据库列

Question

我正在使用HTML::FormHandler （带有 DBIC），我想更新模型上的一个字段，该字段依赖于表单上提交的另一个字段。HTML::FormHandler 有一个关于处理额外数据库字段的部分，它说在 update_model 之前创建行来执行此操作时：

before 'update_model' => sub {
   my $self = shift;

   $self->item->my_other_column( manipulate_value($self->field('my_field') );
};

这在我添加新项目时有效，但在我编辑它时无效。当我编辑该项目时，该项目my_field已更新但未更新my_other_column。有谁知道我怎么能做到这一点？

Answer 1

before 'update_model'仅当您添加新项目时才有效。

来自文档：如果在创建行时需要更新另一个数据库字段，请在表单中添加一个属性，然后使用before 'update_model'.

试试around 'update_model'。