如何在 Perl 中将变量的值设置为 null？

Question

我在一些示例中发现，所谓的构造函数 new 方法包含对类（包）的属性值的初始化，如下所示：

my $self = {
    _firstName => shift,
    _lastName  => shift,
    _ssn       => shift,
};

我知道 shift 是一个函数，但是上面的赋值是否将属性设置为 null？

Answer 1

如果 @_ 数组中不存在任何项，shift 将返回未定义的值 http://perldoc.perl.org/functions/shift.html

您可以使用 define http://perldoc.perl.org/functions/define.html

Answer 2

另一种简单的方法：

my $variable = undef;