RosettaCodeData/Task/Van-der-Corput-sequence/Perl-6/van-der-corput-sequence-2.pl6

sub VdC($base = 2) {
    map {
        [+] $_ && .polymod($base xx *) Z/ [\*] $base xx *
    }, ^Inf
}

.say for VdC[^10];