Maybe Encode::Repair can help you?
In reply to Re: Fixing broken character encoding by moritz in thread Fixing broken character encoding by pfaut