这个Perl模块出了什么问题？

Question

我正在制作一个非常非常简单的模块（这是我写过的第一个）：

package Master::Math;
use 5.12.4;
use strict;
use warnings;

require Exporter;

our @ISA = qw(Exporter)

our %EXPORT_TAGS = ( 
    'all' => [ qw(
        max



=cut

1; # End of Master::Math

当我在我的程序中运行时，我收到错误

  

C：/Perl/lib/Master/Math.pm第3行的版本格式无效（非数字数据），   靠近“包Master :: Math

     

”   语法错误在C：/Perl/lib/Master/Math.pm第3行，靠近“包Master :: Math

     

要求出口商“   在C：\ MainDev \ myperl \ max.pl第3行的require中编译失败。   BEGIN失败 - 编译在C：\ MainDev \ myperl \ max.pl第3行中止。

我需要解决这个问题？谢谢！

Answer 1

您在@ISA声明中遗漏了分号。

在sub max中，$foo未声明;使用foreach my $foo ...。

应该让它编译。我没有超越那个。

（顺便说一下，我没有得到你做的同样的错误。我使用了perl 5.14.0，perl -cw master-math.pm。）