in reply to using win32::guitest in non english OS
read perlunitut: Unicode in Perl#I/O flow (the actual 5 minute tutorial) and see File::BOM and Encode::Detective/Encode::Guess and try
use autodie; open my($fh), '<:via(File::BOM)', $filename ;
In Section
Seekers of Perl Wisdom