Perl 中的 unless 和 die 函数
Perl 中的 unless 函数是 if 的逻辑对立面:语句可以完全绕过成功状态,只有在表达式返回 false 时才会执行。例如 −
unless(chdir("/etc")) { die "Error: Can't change directory - $!"; }
unless 语句最适合在只有在表达式失败时才引发错误或替代条件时使用。当在单行语句中使用时,该语句也有道理 −
die "Error: Can't change directory!: $!" unless(chdir("/etc"));
我们只会在 chdir 操作失败时使用 die。
die 函数
die 函数的工作原理与 warn 完全相同,只是它还会调用 exit。在普通脚本中,此函数会立即终止执行。如果程序中出现错误,应该使用此函数来避免继续执行毫无意义的操作 −
chdir('/etc') or die "Can't change directory";
广告