我应该在Perl中使用autobox吗？

Question

对于那些不了解Perl的autobox的人autobox ，它是一个模块，它为你提供内置基元的方法，甚至可以覆盖它们。

# primitives
'a string'->toupper();
10->to(1); # returns [10, 9, 8, 7, 6, 5, 4, 3, 2, 1]

# Arrays, array refs
[qw(A B C D E)]->for_each( sub { ... } );
@array->length()

# Hashes, hash refs
{ key => 'value', key2 => 'value2' }->values()
%hash->keys()

# Even specify your own base class...
use autobox SCALAR => 'Foo';

总体而言，内置类型的方法更像是对象，简化了一些任务，使其他任务变得更加明显。

然而...

autobox docs表示存在性能损失 ，不仅仅是简单地调用对象上的方法，而不仅仅是标准语法。 然后，有一些关于它在eval使用的警告（特别是字符串evals），在某些情况下可能导致问题。 它看起来似乎没有标准的许多Perl发行版。

使用autobox真的值得吗？

Answer 1

好吧，你有没有希望在你发现autobox之前有一个模块可以做autobox呢？

如果答案是'是'，那么你应该使用它。 您可能还希望通过提交错误报告并在获得机会时修复它们来为其开发做出贡献。

不幸的是，我陷入了“酷，但......”的阵营，所以我无法为你提供更多的见解。

Answer 2

马课程！ 然而，从左到右阅读链条往往更容易理解恕我直言：

say sort grep /\w/, map { chr } 0 .. 255;

虽然较短的下方确实更好地流动：

say [ 0..255 ]->map( sub { chr } )->grep( sub { m/\w/ } )->sort->join(''); 

来自Hacker News评论的参考： 片段

/ I3az /

Answer 3

我使用autobox：

$c->login($c->req->{params}->hslice([qw/username password/])

最终采用任意哈希并将其减少为{ username => <whatever>, password => <whatever> } 。 通常很多代码。 Moose :: Autobox的一个符号。