open (FILE, '<:encoding(UTF-8)', 'C:/strawberry/PERL_DATA/test.txt') || die ("Can not open file: test.txt # [Error: $!]");