1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
<% include('tr-td-label.html', @_ ) %> <TD <% $style %>> <% include('checkbox.html', @_) %> </TD> </TR> <%init> my %opt = @_; my $onchange = $opt{'onchange'} ? 'onChange="'. $opt{'onchange'}. '(this)"' : ''; my $style = $opt{'cell_style'} ? 'STYLE="'. $opt{'cell_style'}. '"' : ''; </%init>