3 和 5 的倍数
作者：David Romano
https://projecteuler.net/problem=1
列出10以下所有3或5的倍数，我们得到 3、5、6 和 9。这些倍数的总和是 23。
求 1000 以下所有 3 或 5 的倍数的总和。
源代码： prob001-unobe.pl
use v6;
say [+] (1..^1000).grep: { !($_ % (3&5)) };
Perl 6 示例
作者：David Romano
https://projecteuler.net/problem=1
列出10以下所有3或5的倍数，我们得到 3、5、6 和 9。这些倍数的总和是 23。
求 1000 以下所有 3 或 5 的倍数的总和。
源代码： prob001-unobe.pl
use v6;
say [+] (1..^1000).grep: { !($_ % (3&5)) };