Perl golf:打印数字的力量

使用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'

perl -le'map{print.37**$_}0..8'

31个字符 - 我没有5.10用"说"来尝试明显的改进,但这是28:

perl -E'map{say.37**$_}0..8'