<select name="<%$Name%>">
%if ($DefaultValue) {
<option <% !$Default && 'selected="selected"' %> value=""><%$DefaultLabel%></option>
%}
%foreach my $protocol (qw (TCP UDP)) {
<option <% ($protocol eq $Default) && selected="selected"' %> value="<%$protocol%>"><%loc($protocol)%></option>
% }
</SELECT>
<%ARGS>
$Name => undef
$Default => ''
$DefaultValue => 1
$DefaultLabel => "-"
</%ARGS>
