As much as everyone complains about how bad "Matt's Scripts" are, I don't think they are that bad. At the very least they have,
- Documentation and notes near the code describing what it is supposed to do
- Its neat, easy to read.
I seen worse, the guy whose code that I took over in my last position had a 500 line if-elsif-else loop. No notes, no documentation, and a lot of it went beyond 100 characters per line (so I cannot even print it out to make it readable). That is BAD PERL CODE.
I will take the examples you gave over the stuff I had to maintain anyday!