http://www.perlmonks.org?node_id=197168

I'm sure this topic has been covered before but, oh well. The thing is I'd spent most of Saturday afternoon working on a piece of code, a small sort routine which no matter what I did just didn't work. Saturday evening came and I decided to open a few beers, well it was the weekend plus I'd had a hard week and all that :). I carried on with my coding and after a while solved the problem... but now I'm sober I can't work out why it works, it's the strangest thing, it just doesn't look right and unless I can figure out why it works it may as-well be something someone else wrote :/.

So my bit of advice for what it's worth is don't code whilst intoxicated, it'll only lead to frustration.