HREF中的Perl变量

时间:2013-07-29 13:09:31

标签: html perl cgi

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

例如,就像在这个Perl CGI提取中一样:

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

我在循环的每次迭代中使用链接中的不同查询字符串值。如果无法做到这一点,我将不胜感激。

2 个答案:

答案 0 :(得分:4)

要打印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);
}

答案 1 :(得分:1)

只需使用印刷品中的值:

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