in reply to Need help writting a Perl Module
core.pm did not return a true value [download]
Put =cut before the 1 at the end:
... =cut 1; [download]
As you have it, the 1 is considered part of the POD.