<% $opt{'prefix'} %> <% $onchange %> ><% $opt{'postfix'} %> <%init> my %opt = @_; my $onchange = $opt{'onchange'} ? 'onChange="'. $opt{'onchange'}. '(this)"' : '';