Обсуждение статьи тематического каталога: Определение кодировки в которой были отправлены данные из HTML формы. (charset perl cgi web)Ссылка на текст статьи: http://www.opennet.me/base/dev/charset_detect.txt.html
<input type="Hidden" name="EncKey" value="я">if(Ord($EncKey) == 0xd1) DecodeInput("k"); /* КОИ */
if(Ord($EncKey) == 0xff) DecodeInput("w"); /* Win */
if(Ord($EncKey) == 0xdf) DecodeInput("m"); /* Mac */DecodeInput - что это за функция???
if(Ord($EncKey) == 0xef) DecodeInput("d"); /* DOS */