Man or boy

# Based on https://rosettacode.org/wiki/Man_or_boy_test#Raku (April 2024)
sub A($k is copy, \x1, \x2, \x3, &x4, &x5) {
    my &B = { A --$k, &?BLOCK, x1, x2, x3, &x4 }
    $k ≤ 0 ?? x4() + x5() !! B
}
 
say A 13, {1}, {-1}, {-1}, {1}, {0}
say now - INIT now;
say A 19, {1}, {-1}, {-1}, {1}, {0}
say now - INIT now;