我们最近将Perl从5.8.4升级到5.16.1(CGI版本3.59)。我的网络应用程序有几个页面,所有页面都通过CGI表单从一个页面传递数据。当我在每个页面中插入$ query->转储时,前两页很好,但第三页完全是数据。名称/值对不是您所期望的,有不存在的名称等。例如。第2页包含预期的名称/值对:
Content-Type:text / html;字符集= ISO-8859-1
. selectedOrganism
All
. selectedExpters
All
LKRAMER
而第3页包含名称/值对,包括:
. -----------------------------17694310364738783961604838496"
<with 12 null values>
. Content-Disposition: form-data
. All
<3 null values>
. LKRAMER
<null value>
这是在我们的开发盒上运行的;我们的生产箱还没有升级,代码是一样的,没有问题。
答案 0 :(得分:1)
我发现了问题。而不是将查询对象实例化为:
my $query = new CGI;
代码有:
my $query = CGI->new(\*STDIN);