在字符串中使用未初始化的值 错误在哪里?
else{
print $q->param('test_name');
my $age = $q->param('age');
print "Возраст: $age";
}
答案 0 :(得分:2)
您应该在帖子中包含完整的错误消息。
以下脚本将输出两个警告:
use strict;
use warnings;
print undef;
my $age = undef;
print "Label: $age";
输出:
Use of uninitialized value in print at script.pl line 4.
Use of uninitialized value $age in concatenation (.) or string at script.pl line 8.
Label:
如您所见,如果您的警告是uninitialized value in a print
,则未定义test_name。如果它与uninitialized value in concatenation
有关,则未定义年龄。
此外,您的警告消息应说明它所引用的确切行号。即使您不了解警告的确切含义,也会告诉您在哪里查看。
答案 1 :(得分:0)
此错误(基于您发布的代码)表示没有参数发送到名为test_name
或age
的脚本。