1.2 デフォルト値を設定する

値が設定されていないスカラー変数にデフォルト値を設定したい。デフォルト値はハードコーディングしておき、コマンドラインや環境変数で上書きできるようにしたい。

# $bが真の場合は$bを、偽の場合は$cを設定する
$a = $b || $c;

# $xが真で無い場合、$xに$yを設定する
$x ||= $y;

# 0, "0", ""が意味のある場合、definedを使う。
# $bが定義済みの場合は$bを、undef値の場合は$cを使う。
$a = defined($b) ? $b : $c;

# 将来のバージョンのPerlでは、新しく定義されるor演算子を使う
use v5.9;
$a = $b // $c;