「もしＡの条件ならＢの処理を行なう｣ というように、条件によって処理内容を選択したい場合には、｢if｣ 文を使います。
｢if｣ 文はPerl の中心的な条件文ですのでこれからたくさん使うことになると思います。
しっかりマスターしてください。
｢if｣ 文の書式には下記の３つがあります。

１．if (条件式) { 処理内容 }
２．if (条件式) { 処理内容 } else { 処理内容 }
３．if (条件式) { 処理内容 } elsif (条件式) { 処理内容 } else { 処理内容 }

１では、条件が満たされている場合のみ処理を実行します。
２では、条件が満たされていない場合に、「else｣ の処理を実行します。
複数の条件に対してそれぞれ処理を分けたい場合には、３のように｢elsif｣ を使って処理を選択します。 ｢elsif｣ は処理の数だけ複数回使用できます。

[分岐処理のイメージ]

[真偽の判定について]
分岐の条件には真偽値を使うことも出来ます。真偽値は、文字列や数値を ｢真｣ か ｢偽｣ かで判断します。 文字列が「空｣ の場合や数値が ｢0｣ か ｢空｣ の場合には偽、それ以外の場合には真と判断されます。 ｢if｣ 文では、条件式が ｢真｣ の場合のみ処理を実行します。

「unless｣ は、｢if｣ とは反対の条件文です。
｢もしＡでないならＢの処理を行なう｣ というような条件処理を行なう際に使います。
｢unless｣ 文の書式には下記の３つがあります。

１．unless (条件式) { 処理内容 }
２．unless (条件式) { 処理内容 } else { 処理内容 }
３．unless (条件式) { 処理内容 } elsif (条件式) { 処理内容 } else { 処理内容 }

基本的には ｢if｣ と同じですが、条件が満たされないときのみ処理を実行します。
具体的には下記のような使い方となります。

｢==｣ は、｢等しければ｣を意味します。 → 数値演算子について

この場合、$a の値は１ですので ｢$a は３ではありません｣ と表示されます。

｢if｣ の使い方が分かったところで、実際に｢if｣ を使ったプログラムを書いてみましょう。
下記がそのプログラムです。
ユーザーに０か１の数字を入力してもらい、入力された文字が「０の場合｣、｢１の場合｣、｢それ以外の場合｣ で違う処理を行なうようにしています。
では、実際にプログラムを作って見ましょう。
ファイル名は｢test.pl｣ で ｢c:\windows｣ フォルダに保存してください。

[test.pl] ｢==｣ は、｢等しければ｣を意味します。｢\n｣ は改行の意味です。 → 数値演算子について
<STDIN>は、標準入力を表します。デフォルトはキーボードからの入力となっています。

ファイルが作成できたら、実際にプログラムを動かして見ましょう。
動作確認は DOSプロンプトを使って行ないます。
DOSプロンプトの起動は、｢スタート｣→｢プログラム(P)｣→｢アクセサリ｣→｢MS-DOS プロンプト｣ で起動できます。
起動したら、次のように入力して、｢ENETR｣キーを押してください。


プログラムが起動して、下記のメッセージが表示されると思います。


ここで ｢0｣ を入力して ｢ENTER｣ キーを押します。すると、下記のメッセージが表示されます。


入力が ｢1｣ の場合は、


その他の入力の場合は、


と表示されます。
入力された値によって、きちんと処理が分けられていることが分かります。

また、気づいた方もいると思いますが、何も入力せずに ｢ENTER｣キーのみ押した場合には
下記の表示となります。


Perl で空の値が入力された場合には、数値として判定した時に「0｣ の値として扱われます。
そのため、０が入力された時のメッセージが表示されます。

簡単な処理の分岐の場合には、条件演算子を使うことが出来ます。
if 文を使うと３･４行になるプログラムソースを１行で完結することが出来ます。

[書式] 式 ? Ａ ： Ｂ

式の値が真であれば、Ａの値が返されて、偽であればＢの値が返されます。

ここでは、変数 $price の値によって表示するメッセージを変えています。

変数 $price の値が１０００以上の場合 ｢値段が高すぎます｣ と表示。
１０００未満の場合は ｢適正な価格です｣ と表示されます。
この場合、変数 $price の値は９００ですので ｢適正な価格です｣ と表示されます。