Have you tried this with the current version of WWW::Mechanize? IIRC recently there has been work done regarding how it determines encoding.

Martin