評估 EXPR 並立即以該值結束。範例
my $ans = <STDIN>;
exit 0 if $ans =~ /^[Xx]/;
另請參閱 die
。如果省略 EXPR,則以 0
狀態結束。EXPR 唯一普遍識別的值是成功為 0
,錯誤為 1
;其他值會根據 Perl 程式執行環境的不同而有不同的詮釋。例如,從 sendmail 收件郵件篩選器結束 69 (EX_UNAVAILABLE) 會導致郵件服務將項目退回,但並非到處都是如此。
如果有人可能想要捕捉任何發生的錯誤,請勿使用 exit
中止子程式。請改用 die
,它可以被 eval
捕捉。
exit
函式並不總是立即結束。它會先呼叫任何已定義的 END
常式,但這些 END
常式本身可能不會中止結束。同樣地,任何需要呼叫的物件解構式都會在實際結束前呼叫。END
常式和解構式可以透過修改 $?
來變更結束狀態。如果這是一個問題,您可以呼叫 POSIX::_exit($status)
來避免 END
和解構式處理。有關詳細資訊,請參閱 perlmod。
移植性問題:"exit" in perlport。