sub add-one(Int $n) of Int {
    $n + 1;
}

add-one(3) == 4 or die "Wrong value";