Общеслав. Того же корня, что и корить, корнать. Исходное значение — «бить, убивать» (мечом, топором и т. п.), затем — «наказывать» (плетью, кнутом и т. д.) и далее — «наказывать».
Школьный этимологический словарь русского языка. Происхождение слов. — М.: Дрофа.
Н. М. Шанский, Т. А. Боброва.
2004.