Perl 高尔夫 : Print the powers of a number

Question

最短的 Perl 单行代码是什么，它打印出硬编码的 2 位小数的前 9 次幂(例如，.37)，每行各占一行？

输出看起来像这样:

1
0.37
0.1369
[etc.]

官方 Perl 高尔夫规则:

1. (键)击次数最少的获胜
2. 您的笔画数包括命令行

Answer 1

使用 perl 5.10.0 及更高版本:

perl -E'say 0.37**$_ for 0..8'

对于较旧的 perls，您没有 say 和 -E，但这有效:

perl -le'print 0.37**$_ for 0..8'

更新:第一个解决方案由 30 个按键组成。去掉第一个 0 得到 29。另一个空间可以节省，所以我最终的解决方案是 28 笔画:

perl -E'say.37**$_ for 0..8'