如果你忘记了一个包结尾的1，Perl告诉你“包没有返回一个真正的值”。好吧，如果它知道你忘了它，为什么不只是把它放在那里？
解决方法
因为如果require伪指令必须成功(返回true值)或失败(返回false值，如果模块由于某种原因未能初始化，则这是有意义的)，则需要Perl模块返回一个值。
如果你不返回任何东西，解释器不能知道require是否必须成功或失败;同时，由于很容易忘记将真正的价值放在包的末尾，它建议对此错误的“常见修复”：添加一个真值作为返回。
对于一些其他信息/民间文学关于模块的返回值看看this question。