以下,并且在提交后,在两个提交的整数上执行添加。
下面的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