my $LIM = 2**32 -1; my $int = $num > $LIM ? Math::BigInt->new($num) : $num;