@DoW  = map($_ . "tai", qw(sunnun maanan tiis keskivii tors perjan lauan));