Have you tried:

• use strict;
• use warnings;
• perl -c
• perltidy

?

C.