使用相对路径中存放的 *.pm (perl module) 之方法，请遵照面向对象编程规则整理代码