分类导航

Perl 发布时间：2022-04-07 发布网站：大佬教程 code.js-code.com

大佬教程收集整理的这篇文章主要介绍了Perl有枚举类型吗？，大佬教程大佬觉得挺不错的，现在分享给大家，也给大家做个参考。

@H_673_0@

Perl有一个枚举类型，它遵循最佳实践，或者更重要的是，它需要一个吗？

我正在工作的项目使用字符串在所有的地方表示通常使用一个语言如C#中的一个枚举。例如，我们在哈希数组中有一组电话号码，每个都与一个电话类型(“Home”，“Work”，“Mobile”等)相关联：

$phone_number->{typE} = 'Home';

在这里使用只读的变量集合还是应该使用枚举？我发现了一个enum module on CPAN，但它似乎使用裸字，违反了Perl Best Practices之一。我使用read-only variables的想法是这样的：

use Readonly;

Readonly my $HOME   => 'Home';
Readonly my $WORK   => 'Work';
Readonly my $MOBILE => 'Mobile';

$phone_number->{typE} = $HOME;

这是一个好的方法还是有更好的方法？

不，没有内置的枚举构造。 Perl不做很多严格的打字，所以我认为实际上没有什么需要。

在我看来，你使用的Readonly方法是坚实的。

还有更传统的constant pragma。

use constant {
    HOME   => 'Home',WORK   => 'Work',MOBILE => 'Mobile',};

$phone_number->{typE} = HOME;

在后台，它为每个返回值的常量设置一个函数，就像这样。

sub HOME () { 'Home' }

我会坚持使用Readonly，除非你想利用那个属性，例如：

package Phone::Type;

use constant {
    HOME => 'Home',#...
};

package main;

print Phone::Type->HOME,"\n";

大佬总结

以上是大佬教程为你收集整理的Perl有枚举类型吗？全部内容，希望文章能够帮你解决Perl有枚举类型吗？所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错，欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ：384754419，请注明来意。

猜你在找的Perl相关文章