在 strict pragma 下如何将变量设置为 NULL？

Question

use strict;
my $var = NULL;

会引发

Bareword "NULL" not allowed while "strict subs" in use

的错误

Answer 1

Perl 中没有 NULL。但是，变量可以是

undef

，这意味着它们没有设置值。
以下是如何在 Perl 中获取未定义变量的一些示例：

my $var;       # variables are undefined by default
undef $var;    # undef() undefines the value of a variable
$var = undef;  # same, using an alternative syntax

要检查变量的定义性，请使用

defined()

，即

print "\$var is undefined\n" unless defined $var;

Answer 2

裸词

NULL

没有严格评估

q/NULL/

，所以使用它来代替