以下,并且在提交后,在两个提交的整数上执行添加。
下面的Perl/CGI表单示例,将要求用户输入两个整数,然后计算两个数之和。
在HTML表单中,以下面的格式创建 post方法:
<form action="/cgi-bin/perl-cgi-form.cgi" enctype="multipart/form-data" method="post"> <input name="num1"> <input name="num2"> <input type="submit"> </form>
将以下Perl-CGI-Form.CGI代码保存到/usr/lib/cgi-bin /:
#!/usr/bin/perl -T
use strict;
use CGI qw/:standard/;
print header,
start_html('Perl/CGI form example'),
start_form,
"Integer 1: ",textfield('num1'),
br,
"Integer 2: ",textfield('num2'),
br,
submit,
end_form,
hr;
print param('num1')+param('num2'),
p,
end_html;
exit;
使它可执行文件:
# chmod 755 /usr/lib/cgi-bin/perl-cgi-form.cgi
浏览器打开:
http://localhost/cgi-bin/form.cgi
日期:2020-07-07 20:54:58 来源:oir作者:oir
