As others have suggested: Always use strictures (use strict; use warnings; - see The strictures, according to Seuss)!
You seem to be writing Perl circa 4.x rather than 5.x. There were many enhancements made to Perl between 4.x and 5.x with most of them improving robustness of code in various ways (using strictures is an example of that). A few things we do differently now:
In reply to Re: prob w/ gatekeeper subroutine
by GrandFather
in thread prob w/ gatekeeper subroutine
by weglarz
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |