substr tedious? substr $number, -2, 0, "." does the trick, I don't think that's very tedious. A little faster may be:

    print substr($number, 0, -2), ".", substr($number, -2);
[download]

as that doesn't have to write back a value. But you'll have to benchmark that yourself.