Chuyển đổi số thập lục phân thành chuỗi thành số âm, trong Perl

Question

Tôi có một số số được biểu diễn dưới dạng chuỗi thập lục phân trong tệp nhật ký đang được phân tích bằng tập lệnh Perl và tôi khá thiếu kinh nghiệm với Perl.

Một số những con số này thực sự là số âm đã ký, tức là 0xFFFE == -2 khi được biểu diễn dưới dạng số nguyên được ký 16 bit.

Ai đó có thể vui lòng cho tôi biết cách đại diện có chữ ký của số này từ chuỗi FFFE trong Perl hoặc nói cách khác là hướng dẫn hoặc tài nguyên khác?

Answer 1

Bạn có thể sử dụng hàm hex() để chuyển đổi từ thập lục phân sang thập phân, nhưng nó diễn giải đầu vào dưới dạng giá trị chưa ký. Để bù đắp cho rằng, gói giá trị thập phân như một số lượng unsigned và giải nén nó như là một ký một:

my $num = unpack('s', pack('S', hex('FFFE'))); 

's' Các và 'S' mẫu là dành cho số lượng 16-bit signed và unsigned, tương ứng. Xem tài liệu về chức năng pack cho các mẫu và thông tin sử dụng khác.

Answer 2

print unpack('s>', pack('H4', 'FFFE')); 
-2