perl - 如何使用 perltidy 格式化 qw 列表？

Question

假设一个 Perl 脚本是这样的:

my @a = (
    1,
    2,
    3
) ;

my @b = qw(
    foo
    bar
    baz
) ;

使用选项执行 perltidy:perltidy -nopro -ci=4 -boc -sts，我在数组和 qw 之间得到不同的右括号对齐方式 列表:

my @a = (
    1,
    2,
    3
) ;

my @b = qw(
    foo
    bar
    baz
    ) ; # <== misplaced parens, I want it to be at column 1

我想让 qw 列表的右括号与第 1 列对齐。我做错了什么，或者我错过了什么？

更新

感谢@toolic 的建议，我禁用了我的 .perltidyrc 文件(我的错，我之前没有这样做)并搜索导致 qw 列表格式错误的规则，发现这是--space-terminal-semicolon 仅改变 qw 列表的右括号对齐方式。

我更新了上述问题描述中的 perltidy 选项。 我不太明白这是否是 perltidy 的错误。

无论如何，这个问题现在可以重现了，看来我必须在 qw 列表的右括号未对齐或放弃分号前的空格之间做出较小的选择声明:-(

Answer 1

我无法重现您的结果。我没有 .perltidyrc 命令文件，它可能包含您的命令行中没有的选项。

您可以使用 perltidy -nopro忽略任何 .perltidyrc 命令文件的选项，如果有的话。