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