Используя бинарный язык в Perl

Question

По какой-то причине, для меня Perl выполняет сравнение строк, где

if ("hãt" eq "hat")

оценивает как истинное. Я думаю, что это потому, что я использую неправильную локаль где-то в моем коде, но я не уверен, где (это большой стек, и я не уверен, как определить локаль).

Есть ли способ, которым я могу форсировать сравнение с использованием двоичного сопоставления или чего-то подобного, чтобы вышеприведенное оценивалось как ложное?

Answer 1

Perl по умолчанию использует локаль "C", если в вашей среде не установлена ​​переменная локали, такая как LC_ALL, в которой cse вы можете форсировать ее следующим образом:

use POSIX;
setlocale(LC_ALL, "C");