わかった。 fallback => 1 であとはよきに計らってくれるのならほんとに必要なとこだけ書けばいいんだ。 実際に文字列一文字前処理サブルーチンはプログラミングPerl Vol.1から。 MagicDecrement.pm package MagicDecrement; use strict; use warnings; use …