utf-8 cp1251 сортировка файлов(фильтр) Опции

[FREEON]

Кто знает программу, плагин, фильтр или способ сортировки текстовых файлов(массовый) по кодировке. Что бы например выбрал папку и там показывалось какой файл находится кодировке utf-8 или cp1251 или еще какой.
Массовая перекодировка различными программами не дает желаемого результата т.к. из перекодировки допустим из cp1251 в utf-8 будет норм вариант если этот файл в этой кодировке но если он был в ютф то при кодировке выдаст крокозябры. Поэтому и нужно точный фильтр который показал какой файл в какой кодировке изначально. Знаю к пилоту мало относится но есть ли разумное решения вопроса

[DarkMaster]

for v in f:lines() do s = s .. v end -- прочитать файл

Если файл большой, то после такого чтения можно обнаружить седену и внуков =) Операция '..' достаточно тормознутая и зачастую приводит к повторному выделению памяти и полному копированию. В данном случае не очень понимаю смысла чтения по строкам. Почему не считать сразу весь?:
s = f:read("*a")
Если нужно считать все-таки строками, то лучше это делать через таблицу:

Код

s = {}
for v in f:lines() do
    s[#s+1] =  v
end
s = table.concat(s)