如何缩短 Perl 中的 [ qw( ... ) ] 结构?

How can I shorten a [ qw( ... ) ] construct in Perl?

Perl 的类引号运算符 qw() 创建一个 word list from barewords, while square brackets [] 可用于创建对匿名数组的引用。现在,我想知道 Perl 是否提供了一种以某种方式缩写它的方法:

my $aref = [qw( a b c )];

使用类似 不存在的 qa() 运算符:

my $aref = qa( a b c );

我最近经常同时使用 qw()[],我只想减少混乱。

注意:这不是我要找的:

my @a = \( qw( a b c ) );

不是核心 Perl,但请查看 Syntax::Feature::Qwa

不,核心 Perl 没有更短的方式来表达:

my $aref = [qw( a b c )];

有人提出的一个建议可以稍微提高可读性,就是说 [qw[ a b c ]];