从列表中选择要编辑的元素 - Perl / CGI

时间:2012-11-28 16:39:57

标签: perl cgi

我有一个表格,其中显示用户MAC地址和其他信息。我通过for循环为每个条目添加一个编辑按钮。我的问题是如何选择其中一个条目显示在另一个子程序中?换句话说,当我单击一个条目的编辑按钮时,如何将该条目信息添加到我执行编辑功能的另一个子例程中?

以下是我的条目清单子。

print <<EOF;
<br>
 <table>
  <tr>
   <th>MAC</th>
   <th>Description</th>
   <th>UserID</th>
   <th>Edit</th>
<th>Delete</th>
   </tr>
EOF



foreach $test ( @list ) {

   print "<tr>";
   print "<td>" . scalar($test->mac()) . "</td>";
   print "<td>" . scalar($test->comment()) . "</td>\n";
   print "<td>" . scalar($test->username()) . "</td>\n";


   print "<td>" . $editButton . "</td>\n";



 print "</tr>";

  }

1 个答案:

答案 0 :(得分:1)

选择要编辑的内容是非破坏性操作,因此您可以使用链接。

您需要使用独特的内容识别要编辑的内容。

假设MAC地址是唯一的(它应该是设备,但可能不是用户或评论),您可以使用它。

use URI::Escape;
use HTML::Entities;

my $editButton = sprintf(
    q{<a href="edit.cgi?mac="%s">Edit</a>}, 
    encode_entities(uri_escape($test->mac()))
);

然后,您可以在生成编辑表单的脚本中access the value