如何在工具提示中显示Perl变量的值

Question

我有一个CGI perl脚本，它处理一个大型的应用程序配置文件，并以表格格式显示提取的配置数据。

其中一列显示从配置文件中提取的给定服务器的主机名。

当用户将鼠标悬停在主机名上时，我想要做的是显示别名（存储在$alias中） - 就像工具提示一样。

每个表行都有不同的主机名和别名，我通过迭代数组来创建表。

我正在使用面向对象的CGI Perl方法。

我尝试使用以下内容：

print $cgi->start_td({class=>'primpeer',title=>'$aliasName'}),"$hostName";  

但这只是回显了工具提示中的$ aliasName而不是$ aliasName的内容

Answer 1

将$alias的值放入title attribute（可能是td元素）。它将为您生成工具提示，例如alt元素的img属性。

Answer 2

单引号内的变量不会被插入 只需使用双引号而不是单引号：

print $cgi->start_td({class=>'primpeer',title=>"$aliasName"}),"$hostName";  
                                        here __^   here __^

或没有任何引号：

print $cgi->start_td({class=>'primpeer', title=>$aliasName}), $hostName;