That's what the 1; is for. See perlmod for details.
In reply to Re: why do some perl files end with 1; by moritz in thread why do some perl files end with 1; by nikhil.patil