Perl の条件文

Perl 条件ステートメントは、1 つ以上のステートメントの実行結果 (True または False) に基づいて実行されるコードブロックです。

次の図を通して、条件文の実行プロセスを簡単に理解できます:

数値 0、文字列 '0'、""、空のリスト ()、および undef は false であることに注意してください。他の値は true です。 true の前に ! または not がある場合、false が返されます。

Perl は、ドロップダウン条件ステートメントを提供します。

Statement	説明
if ステートメント	if ステートメントは、1 つ以上のステートメントが後に続くブール式で構成されます。
if...else ステートメント	if ステートメントの後には、オプションの else ステートメントを続けることができます。このステートメントは、ブール式が false の場合に実行されます。
if...elsif...else ステートメント	if ステートメントの後にオプションの elsif ステートメントを続け、その後に別の else ステートメントを続けることができます。
unless ステートメント	unless ステートメントは、1 つ以上のステートメントが続くブール式で構成されます。
ただし...else ステートメント。	unless ステートメントの後には、オプションの else ステートメントを続けることができます。
unless...elsif..elseステートメント	unlessステートメントの後に、オプションのelsifステートメントを続けて、さらに別のelseステートメントを続けることができます。
switch ステートメント	Perl の最新バージョンでは、switch ステートメントを使用できます。異なる値に基づいて、対応するコードブロックを実行します。

三項演算子 ? :

条件演算子 ? : を使用して、if...else ステートメントの操作を簡素化できます。通常の形式は次のとおりです:

Exp1 ? Exp2 : Exp3;

Exp1 式が true の場合、Exp2 式の計算結果が返され、それ以外の場合は Exp3 が返されます。

例は次のとおりです:

#!/usr/local/bin/perl
 
$name = "php中文网";
$favorite = 10;     # 喜欢数

$status = ($favorite > 60 )? "热门网站" : "不是热门网站";

print "$name - $status\n";

上記のプログラムを実行すると、出力結果は次のようになります:

php中文网 - 不是热门网站