I thought to mention the Perl encoding detection modules specifically because your script probably doesn't distinguish between single-byte encodings such as KOI8-R and Windows-1251.

It does, but it relies on human inspection instead of mechanical inspection. Both approaches are useful, but they have different merits and different use cases.