计算预期后代数

作者:L. Grondin

http://rosalind.info/problems/iev/

示例输入

1 0 0 1 0 1

示例输出

3.5

源代码: iev-grondilu.pl

use v6;

sub MAIN(Str $default-data = "1 0 0 1 0 1") {
    say 2 * [+] <1 1 1 3/4 1/2 0> Z* $default-data.split: " ";
}