HTML Escape для Perl

Question

0

У меня есть html-код, присвоенный переменной perl

1) my $content;

$content .= qq~<input type='hidden' name='Email' value='~.$ARGS{Email}.qq~' />~;

Еще один:

2) <form name="email_form" id="email_form" class="form-inline <% $ARGS{Email} ? 'hide' : '' %>" >

Как сделать замену каменщика для них?

Для второго, это правильно?

<form name="email_form" id="email_form" class="form-inline <% $ARGS{Email} | h ? 'hide' : '' %>" >

user3409351 21 март 2014, в 08:27

0

я не получаю этот вопрос, ты объяснишь больше
Developer 21 март 2014, в 07:21
0

Я имел в виду подмену масона, например, если есть <% $ ARGS {error}%>, она становится <% $ ARGS {error} | h%> в масонской замене. Как это сделать для вышеперечисленных.
user3409351 21 март 2014, в 07:27

Теги:

1 ответ

я не получаю этот вопрос, ты объяснишь больше
Я имел в виду подмену масона, например, если есть <% $ ARGS {error}%>, она становится <% $ ARGS {error} | h%> в масонской замене. Как это сделать для вышеперечисленных.

Miller · Accepted Answer · 2014-03-21T06-06-00.000Z

Использовать CGI's escapeHTML или некоторый эквивалент

use CGI qw(escapeHTML);

$content .= qq~<input type='hidden' name='Email' value='~. escapeHTML($ARGS{Email}) .qq~' />~;