my $var1 = 17232; # really 0100001101010000
my $var2 = 12822; # really 0011001000010110
my $var3 = $var1 << 16 | $var2;  # 01000011010100000011001000010110