在字符串中使用未初始化的值

Question

在字符串中使用未初始化的值 错误在哪里？

else{
    print $q->param('test_name');

    my $age = $q->param('age');

    print "Возраст: $age";

}

Answer 1

您应该在帖子中包含完整的错误消息。

以下脚本将输出两个警告：

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有关，则未定义年龄。

此外，您的警告消息应说明它所引用的确切行号。即使您不了解警告的确切含义，也会告诉您在哪里查看。

Answer 2

此错误（基于您发布的代码）表示没有参数发送到名为test_name或age的脚本。