3zz*_*zzy 3 html quotes perl escaping
$selected = ' selected="selected"'
# or
$selected = qq( selected="selected")
Run Code Online (Sandbox Code Playgroud)
is returned as:
selected="selected"
Run Code Online (Sandbox Code Playgroud)
which is an invalid HTML attribute, ofcourse.
How do I fix it?
Edited to add:
<select name="alignment" class="select"
<%== param('feature') ? '' : 'disabled'; %>
>
% foreach (keys %al) {
% my $selected = param('aligment') && param('aligment') eq $_ ? ' selected' : '';
%
% if (!param('aligment') && $_ eq 'left') { $selected = ' selected' }
%
<option value="<%=$_%>" <%= $selected %>>
<%= $al{$_} %>
</option>
%
% }
</select>
Run Code Online (Sandbox Code Playgroud)
Thanks!
根据Mojolicious Web框架文档,您需要添加和extra = at <%=才能以原始格式打印它.
<%= $selected %>
Run Code Online (Sandbox Code Playgroud)
将会
<%== $selected %>
Run Code Online (Sandbox Code Playgroud)
有关更多参考,请参阅此http://github.com/kraih/mojo/blob/master/lib/Mojolicious/Guides/Rendering.pod
试试这样:
<select name="alignment" class="select"
<%== param('feature') ? '' : 'disabled'; %>
>
% foreach (keys %al) {
% my $selected = param('aligment') && param('aligment') eq $_ ? ' selected' : '';
%
% if (!param('aligment') && $_ eq 'left') { $selected = ' selected' }
%
<option value="<%=$_%>"
<%= $selected %>
>
<%= $al{$_} %>
</option>
%
% }
</select>
Run Code Online (Sandbox Code Playgroud)
要么
<select name="alignment" class="select"
<%== param('feature') ? '' : 'disabled'; %>
>
% foreach (keys %al) {
% my $selected = param('aligment') && param('aligment') eq $_ ? ' selected="selected"' : '';
%
% if (!param('aligment') && $_ eq 'left') { $selected = ' selected="selected"' }
%
<option value="<%=$_%>"
<%== $selected %>
>
<%= $al{$_} %>
</option>
%
% }
</select>
Run Code Online (Sandbox Code Playgroud)