my( $bits, $type, $seq, $time )= unpack "C C n N", $user_data;