my @days = map { Day->new($_) } qw(Sun Mon Tue Wed Thur Fri Sat);