If you post the code at most Perl groups, and malignantly claim that it throws a 500 error, you'll have hundreds of good minds above and beyond the compiler checking over your code for you.

At first you'll get a couple hundred messages asking about permissions settings.

I'd suggest not trying this. ;)
-Petras