[perl] Победить кодировки

Есть текст содержащий кириллицу. Кодировка этого файла не известна. Необходимо конвертировать этот текст в общем случае в заданную кодировку (в частном в utf8). Всё это надо сделать разумеется не интерактивно. По хорошему (но не обязательно) не пребегая к экзотическим модулям. Не скромный вопрос: никто не поделится кодом? Думаю задача не оригинальная. Скромный вопрос: как бы это реализовать?