in reply to Perl Module ending without 1;

saranperl also discussing the same question, get some thing useful If you need.

module return
Update

Forget to mention the node link