I'm about to feel that way about my regex parser. I figured out a way to make it much faster, and much easier to read. While my regex parser (and related modules) are my <language type="french">chef d'ouevre</language>, they are hideous to look at, and I'm embarrassed enough that I'm not going to show it to people willingly.

I usually code well, though. I have a clear idea of the task, and how to solve it with Perl. When I started learning Perl, though, I was silly and awkward. ;)

_____________________________________________________
Jeff[japhy]Pinyan: Perl, regex, and perl hacker.
s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;