Integers are always stored exactly (assuming they're not too big), so you could use something like:

perl -le 'my $n = 505645 + 1011292; print $n == 1516937 ? $n / 100 . "
+ as expected" : "Gah. sharkey was right all along!"'
[download]

<