html - HREF 中的 Perl 变量

Question

是否可以在 href HTML 链接中包含变量？换句话说，我可以通过遍历数组来动态生成一系列 html 链接吗？

例如，就像在这个 Perl CGI 提取中一样：

for ($i = 1; $i <= 10; $i++) {
value=array
<A href="prog1.cgi?data=${value}">$value</A>
}

我在每次循环迭代的链接中使用不同的查询字符串值。如果这是不可能的，我将不胜感激任何其他建议。

Answer 1

HTML 是要打印的，所以我们只是在谈论连接。不过，不要忘记先将文本转换为正确的格式。

use CGI         qw( escapeHTML );
use URI::Escape qw( uri_escape );

for my $value (@array) {
   my $uri = 'prog1.cgi?data='.uri_escape($value);
   my $html = escapeHTML($value);
   print qq{<a href="$uri">$html</a>};
}

或者

use CGI         qw( escapeHTML );
use URI::Escape qw( uri_escape );

for my $value (@array) {
   printf '<a href="prog1.cgi?data=%s">%s</a>',
      uri_escape($value),
      escapeHTML($value);
}

Answer 2

只需在打印中使用该值：

for my $value (@array) {
    printf '<A href="prog1.cgi?data=%s">%s</A>', $value, $value;
}