@date = unpack 'n C6 a C2', $octets;