This is really excellent advice. I think that you would be surprised at how much code there is to write in the world. I work in a scientific research field, and the majority of code that has been written for my application is poorly written, poorly designed and generally not commented. I completely agree with your sig "A conclusion is simply the place where someone got tired of thinking," it's applicable here. I've never written a program that I consider finished, there are always new features that I'd love to add, new ideas I'd like to test.

Helping people learn Perl better is a great way to dredge up useful idioms from the back part of your brain. It can also help you realize how many applications are out there just waiting to be written. Another thing that you could do is to help yourself by using the PM community, post some unreviewed code up in a node and ask people what they think. I'm always impressed by the quality of code review around here.

One thing that I like to do when I don't feel creative enough to write a new program is to learn a new module. I have no idea what you know or what you are interested in, but over the last week I've learned about Class::DBI a module that has really changed the way that I code database-driven applications.

I've always thought of writing code as very similar to writing a book or essay. Both are creative processes, both require a great deal of patience, and both can make you susceptible to writer's block. The important thing to remember is that you've been physically hurt by this car accident, and you need to take it easy on yourself for a while. Consider this just a time in which you can improve your Perl Kung-fu significantly, because you have the time to do it.

One more thing: try to relax as much as possible. Read a book, watch a movie, play cards with some friends. That will probably make you feel better more effectively than any kind of programming, and I think it will improve your attitude about programming a great deal.

Sorry to hear about the crash, good luck with your recovery.