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;