偶数斐波那契数列

作者：Gerhard R

斐波那契数列中的每一项都是前两项的和。从 1、1、2 开始，前 10 项是

1, 1, 2, 3, 5, 8, 13, 21, 34, 55 ...

考虑斐波那契数列中值不超过四百万的项，求所有偶数值项的和。

use v6;

say [+] grep * %% 2, (1, 1, *+* ...^ * > 4_000_000);