2
$fs->traverse('/foo')->filter(sub ($name, $dir) { $name !~ /^\./; });
$fs->traverse('/foo')->filter(sub { $_[0] !~ /^\./; });

是否有任何选项可以保持第一行不变?因为使用 -pbp perltidy 因为签名功能将其分成 5 行。

4

1 回答 1

2

perltidy -fnl(“如果您不希望对脚本中代码行中的换行符进行任何更改”)似乎可行,但我不确定您希望其余代码的外观如何。

https://metacpan.org/pod/distribution/Perl-Tidy/bin/perltidy#Line-Break-Control

于 2016-06-17T02:41:38.250 回答