perl project to collect and store answers to a survey in tabular format