In my case, the one great example I can think of this wasn't exactly well-written so much as quickly written. At the last Lancaster County Linux Users Group meeting I was at, somebody wanted to run two tethereal processes at once, and have one output in green and the other in red. (For incomming and outgoing packets on a firewall.) A professional programmer across the table from me started to say how hard it would be. I just said "I can do that in one line of perl" -- and then proceded to do it, with help from a manpage (to get the escape code), and a peice of paper.
Warning: Unless otherwise stated, code is untested. Do not use without understanding. Code is posted in the hopes it is useful, but without warranty. All copyrights are relinquished into the public domain unless otherwise stated. I am not an angel. I am capable of error, and err on a fairly regular basis. If I made a mistake, please let me know (such as by replying to this node).