The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
<% Jifty->web->form->start %>

% my $action = Jifty->web->form->add_action( class => 'GetGrail', moniker => 'grail');

<% Jifty->web->form->submit( label => 'Get the holy grail') %>

<% Jifty->web->form->end %>


<% Jifty->web->form->start %>
% my $grail_1  = Jifty->web->form->add_action( class => 'GetGrail', order => 1 );
% my $bridge_1 = Jifty->web->new_action( class => 'CrossBridge',    order => 2 );
<% $bridge_1->form_field( 'quest',  default_value => { result_of => $grail_1, name => 'castle' } ) %>
<% $bridge_1->form_field( 'castle', default_value => { result_of => $grail_1 } ) %>
<% $bridge_1->form_field( 'colour', default_value => 'Green' ) %>
<% Jifty->web->form->submit( label => 'Do both') %>
<% Jifty->web->form->end %>


<% Jifty->web->form->start %>
% my $grail_2  = Jifty->web->form->add_action( class => 'GetGrail', order => 1 );
% my $bridge_2 = Jifty->web->new_action( class => 'CrossBridge', 
%                                        order => 2,
%                                        arguments => { quest => { result_of => $grail_2, name => 'castle' } } );
<% $bridge_2->form_field( 'quest' ) %>
<% $bridge_2->form_field( 'colour', default_value => 'Green' ) %>
<% Jifty->web->form->submit( label => 'Do both') %>
<% Jifty->web->form->end %>