Perl入学式 #1の資料を修正.