Perl：在脚本中包含/嵌入模块

Question

我有一个脚本，它使用我从CPAN中编写的用于演示的模块的子类。理想情况下，我希望将这两个文件放在同一个文件中，因为子类模块中没有太多代码。扩展子模块以包含脚本代码或将脚本转换为模块是没有意义的。我应该如何在脚本中包含模块代码？

Answer 1

在一个文件中包含多个包没有问题。

package Foo; 

sub new { 
    print "Foo::new\n"; 
} 

package main; 

new Foo; 

Answer 2

你可以做的是如下，命名你想包括的'模块'core.pm或类似的东西。然后把它放在与其他脚本相同的目录中，并在脚本中放入require core;，这应该工作。一般有use和require这应该帮助你以某种方式实现你想要的东西。