为什么我得到：未定义的子程序

Question

我正在尝试将现有的perl文件移动到新服务器，我收到错误（error_log文件）。它适用于旧服务器。

当我访问：http://2x.29.xx.xx/admin/web.pl

时

我收到错误：

  

[error]未定义的子程序＆amp; web_main :: main被调用   /var/www/path/web.pl第40行。

web.pl 文件，它看起来像这样：

#!/usr/bin/perl -w

use strict;
use warnings;

use lib '/var/www/web';

our $var = '/var/www/web';
our $var1; 
our $var2; 
use web_main qw($var $var1 $var2);

web_main::main();  # Line 40

web_main.pm 文件（在/ var / www / web中），如下所示：

#!/usr/bin/perl -w

package web_main;

use strict;
use warnings;

sub main
{

  # Lots of code here... removed for brevity
}

不确定出了什么问题？

Answer 1

我不是Perl的专家，但也许你需要导出主子程序？您可以使用Exporter。