为什么定义的函数不起作用？

Question

我有一段代码无法按我期望的方式工作。主要是定义的函数不起作用。

@jobs = qw[job1 undef job2];
if(defined($jobs[1])) {
  print "Job 1 is defined";
}

我清楚地得到输出

Job 1 is defined

$jobs[1] 是 undef。我缺少什么？

Answer 1

由于您使用的是 qw，因此您的代码相当于：

@jobs = ("job1", "undef", "job2");

因此 $jobs[1] 是 string "undef" 与 undef 不同，因此其行为也不同。

如果您希望第二个作业是 undef，您可以这样做：

@jobs = ("job1", undef, "job2");

据我所知，您无法使用 qw 完成此操作。