my @days = qw(Sun Mon Tues Wed Thurs Fri Sat);
my @mons = qw(Jan Feb Mar Apr May Jun Jul Aug Sept Oct Nov Dec);