初めてのPerl 4章
初めてのPerl 4章  練習問題1
初めてのPerl 4章  練習問題2
不要なサブルーチンを削除
初めてのPerl 4章じゃなくて3章だった