@days=qw(mon tues wed thurs fri sat sun);
@cols=qw(red orange yellow green blue indigo violet);