我可以在perl中导出用enum :: fields创建的常量吗?

时间:2019-07-08 06:37:56

标签: perl constants exporter

我可以导出用enum::fields创建的常量吗?例如:

package XLine {
    use enum::fields qw{VAL SLOPE INTERVAL};
    use parent qw(Exporter);

    our @EXPORT = qw(VAL SLOPE INTERVAL);

    sub new {
    my $class = shift;
    my $self = bless [], $class;
    return($self);
    }
}

my $x = XLine->new();

printf("INTERVAL = %d\n", INTERVAL);

是否应该使用其他“常量”软件包代替?我之所以使用它,是因为我读到它很快,在这里:http://neilb.org/reviews/constants.html

1 个答案:

答案 0 :(得分:1)

enum :: fields在这里不是问题。当您添加XLine->import(qw(INTERVAL));时,或者更现实地/遵循最佳实践,将XLine程序包移动到其自己的.pm文件中时,该代码即可工作。