Well, I did include the coffee disclaimer. Besides, if I just wrote it well to begin with, what would the OP have left to do?
Coincidentally, the following was the 'fortune' in my logwatch today:
last|perl -pe '$_ x=/(..:..)...(.*)/&&"'$1'"ge$1&&"'$1'"lt$2'
That's gonna be tough for Randal to beat...
-- Larry Wall in 1991Apr29.072206.5621@jpl-devvax.jpl.nasa.gov
So, your C isn't so bad, eh?