my $eight_bytes = pack 'Q>', $user_id;