帶有Perl的CGI表

Question

我正在嘗試使用perl使用CGI構建登錄表單。

sub show_login_form{
return div ({-id =>'loginFormDiv'}),
    start_form, "\n",
    CGI->start_table, "\n",     
    CGI->end_table, "\n",   
    end_form, "\n",
    div, "\n";
}

我想知道為什么我不需要在start_form之前添加CGI-> ，但是如果我在start_table和end_table之前不包括它， start_table "start_table"和"end_table"打印為strings嗎？

謝謝您的幫助。

Answer 1

為什么我可以使用一些子例程？

因為您可能使用以下use語句導入它們：

use CGI qw(:standard);

如CGI中所記錄-使用面向功能的界面 ，這將導入“標准”功能，“ html2”，“ html3”，“ html4”，“ ssl”，“ form”和“ cgi”。

但這不包括表方法。

要獲得它們，您可以將use語句修改為以下內容：

use CGI qw(:standard *table);

為什么刪除CGI-> print start_table作為字符串？

因為您不明智地沒有use strict打開。

如果有的話，將會出現以下錯誤：

Bareword "start_table" not allowed while "strict subs"