Perlで関数を終了させる場合

Question

Perlでは次のような意味がありますか？

my $workbook; 
$workbook = Spreadsheet::WriteExcel->new($outputfile); 
terminate("Problems creating new Excel file: $!", 'BATCH_CRITICAL') unless defined $workbook; 

私は最初の2行を理解できるように、ちょうどPerlの学習を始めました.3行目を終了関数で理解するのに問題があります。 terminateの機能とunless definedの機能は何ですか？

定義された条件がない限り、関数の終了について読むことができるドキュメントまたはページのリンクはありますか？マニュアルに述べたように、それが失敗した場合

my $workbook; 
$workbook = Spreadsheet::WriteExcel->new($outputfile); 

if (!defined($workbook)) { 
    terminate("Problems creating new Excel file: $!", 'BATCH_CRITICAL'); 
} 

Spreadsheet::WriteExcel->new戻りundef：

Answer 1

コードは同等です

ファイルが原因ファイルのアクセス権またはその他の理由により、作成することができない場合、新しいはundefを返します。したがって、先に進む前にnewの戻り値を確認することをお勧めします。通常どおり、Perl変数$!は、ファイルの作成エラーがある場合に設定されます。

terminate機能はPerlビルトインではありません。それはあなたが勉強しているコードベースの一部でなければなりません。私が知ることから、遭遇したエラーを記録する共通のポイントが提供されます。

あなたがこの問題を抱えている場合は、まずは複雑なプログラムの中でダイビングを始めるべきではありません。 good bookを入手し、まず基本を学ぶ方がよいでしょう。