デフォルト引数 - 車輪のx発明 ~B.G's Blog~

サブルーチンの引数をハッシュで受け取る方法を応用すると、デフォルト引数を作ることが出来る。

sub.plで、

サブルーチンの中で、デフォルト値の決まったハッシュを作っておいて、実際に引数として渡されたハッシュと突き合わせる。
今回は何も渡さないので、全部デフォルト値になる。

$ vi sub.pl
$ perl sub.pl
-value2 = BBB
-value3 = CCC
-value1 = AAA
$

こうなる。