1
我得到NULL表单数据值%fdat
变量EmbPerl
的文件上传表单属性enctype="multipart/form-data"
。获取表单数据值作为空在%FDAT变量EmbPerl
这里是EmbPerl代码:
if((defined $fdat{file} && $fdat{file}) && $fdat{upload})
{
$filename = "/tmp/sample.txt";
open (FILE, "> $filename") || die("open failed: $!");
while (read($fdat{file}, $buffer, 32768))
{
print FILE $buffer || die("print test: $!");
close FILE || die("close test: $!");
}
}
和HTML代码是:
<form name="form1" method="post" enctype="multipart/form-data" onsubmit="return validation();">
<table>
<tr>
<td>Select EXCEL sheet</td>
<td><input type="file" name="file" value=""></td>
</tr>
<tr>
<td> </td>
<td><input type="submit" name="upload" value="upload"></td>
</tr>
</table>
</form>
我使用EmbPerl/2.3.0,CGI/3.63,Perl的/ 5.10.1,阿帕奇/ 2.2.22和Linux操作系统。
和你的问题是什么? – 2013-03-06 12:05:20
你如何填充'%fdat'?什么是你得到的错误信息?你能提供一个小脚本来查明你的错误吗? – dgw 2013-03-06 12:20:26
显示没有错误,但fdat值变为空。这是问题 – Futuregeek 2013-03-07 03:01:35