Обнаружение того, является ли система маленькой энтикой или большой эндией с perl

Есть ли возможность найти, если моя система представляет собой небольшой порядковый номер байта или большой байтовый порядок байтов с использованием Perl?

Ответы

Ответ 1

perl -MConfig -e 'print "$Config{byteorder}\n";'

См. Документация Perl.

Ответ 2

Я думаю, вы могли бы сделать:

$big_endian = pack("L", 1) eq pack("N", 1);

Это может завершиться неудачно, если ваша система имеет нестандартное (ни байтинское, ни мало-endian) байтовое упорядочение (например, PDP-11).