Without any idea of what the error could possibly be, without one little piece of information about what happens when you try to run this program or how you try to run this program I'm going o say that I don't have a friggin clue what's wrong!
Next, if you're actually trying to access this page from the web browser and you're getting a 500 error, I suggest:
- Review the web logs ( tail LOG_FILE , where LOG_FILE is a path to the log file which could be anywhere ).
- put use CGI::Carp qw(fatalsToBrowser); after your #! line.
- Run the program from the command line and watch the output.
Note: I ran this program locally without any trouble. In light of that, I would also: check permissions, make sure it's in the right place, try running it from the command line, make sure your web server is set up to run Perl programs, * ( read: c'mon man, give me a clue! ).
--
Casey
I am a superhero.