use strict; use warnings; my $n = 0x30000; $n += 0x10000;