$r += 250 if $temp > 100; [download]
I find it very readable.
In reply to Re: Is this reliable? by frozenwithjoy in thread Is this reliable? by misterperl