计算点突变

作者:L. Grondin

进化是一系列错误

http://rosalind.info/problems/hamm/

示例输入

GAGCCTACTAACGGGAT
CATCGTAATGACGGCCT

示例输出

7

源代码: hamm-grondilu.pl

use v6;

sub MAIN(@default-data = qw{GAGCCTACTAACGGGAT CATCGTAATGACGGCCT}) {
    my ($S, $t) = @default-data;
    say [+] ($S.comb Zeq $t.comb)».not».Int;
}