# signed big-endian
@fields = map { unpack 's', pack 'S', $_ } unpack('n3', $_);

# signed little-endian
@fields = map { unpack 's', pack 'S', $_ } unpack('v3', $_);