授業でやったperlの課題