(join '', map{ qq!<option value="$options->{$_}">$_</option>\n! }
    keys %$options ) .

##</code><code>##

(join '', map{ qq!<option value="$options->{$_}">$_</option>\n! }
    sort sort_function keys %$options ) .