%=l('${prefix}_${Label}') % my @${Name}_options = ${Value}; % param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}'; %= select_field '${Name}' => @${Name}_options, class => 'input'

]]> <![CDATA[ <span class=label> %=l('${prefix}_${Label}') </span><span class=data> % param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}'; %= text_area '${Name}', cols=>${cols | 40}, rows=>${rows | 10} </span><br> ]]> %=l('${prefix}_${Label}') %=date_field '${Name}' =>$$${Name}, pattern=>${regexp | .*}
]]> %=l('${prefix}_${Label}') %=time_field '${Name}' =>$$${Name}, pattern=>${regexp | .*}
]]> %=l('${prefix}_${Label}') % param '${Name}' => $$${prefix}_data->{${Name}} unless param '${Name}'; %= text_field '${Name}', size => '${size | 50}', class => 'textinput ${Name}' , pattern=>'${regexp | ".*"}' , placeholder=>'${placeholder | Name}'

]]> <%=l('${Value}')%>]]>

<%=l('${Value}')%>]]>

%=l('${Value}')

]]> %= submit_button l('${Value}'), class => 'action subm${type_serial}' ]]> %=l('${prefix}_${Label}') %=Search field %=search field , class => 'searc${type_serial}' span>

]]> %=l('${Label}') %=URL field , class => 'url${type_serial}' span>

]]> %=l('${Label}') %=tel field, class => 'tel${type_serial}' span>

]]> %=l('${Label}') %=email field, class => 'emai${type_serial}' span>

]]> %=l('${Label}') %=password field, class => 'pass${type_serial}' span>

]]> %=l('${Label}') %=timedate field, class => 'time${type_serial}' span>

]]> %=l('${Label}') %=week field, class => 'week${type_serial}' span>

]]> %=l('${Label}') %=month field, class => 'mont${type_serial}' span>

]]> %=l('${Label}') %=range field, class => 'rang${type_serial}' span>

]]> %=l('${Label}') %=radio field, class => 'radi${type_serial}' span>

]]> %=l('${Label}') %=number field, class => 'numb${type_serial}' span>

]]> %=l('${Label}') %=file field, class => 'file${type_serial}' span>

]]> %=l('${Label}') %=color field, class => 'colo${type_serial}' span>

]]> %=l('${Label}') %=checkbox field, class => 'chec${type_serial}' span>

]]> % my $control_data = $self->stash('${TableControl}'); % foreach my $row (@$control_data) { %}

<%=l('${ColHead}')%>
<%=$c->render_to_string(inline=>$row->{'${ColContent}'})%>

]]> ${Value}' ]]>