2009-11-04 state 変数 perl 以下のように使う。プライベートな永続的変数になる。 &countup for(1..10); # 1 から 10 までカウントアップ sub countup { state $num = 0; $num++; say $num; }