HTML::FormFuの覚書

Perl

今日もcatalystの勉強中〜

selectとかのoptionを動的に変える

  my $e = $form->get_element({name => 'inform_to'});
  my @option;
  for my $mail (@managers) {
      push @option, [$mail => $mail];
  }
  $e->options(\@option);

actionを変える

  $form->populate({ action => $c->uri_for("/user/$uid")});

とか。

Catalyst::Controller::HTML::FormFuか。
最近少しずつ慣れてきました。

しかし自宅サーバ壊れたのは痛い･･･。
バックアップとかとってない僕が悪いんですけどねー。