my @wordlwr = map lc, @word;