sub foo (+$x = 3) { $x } is(foo(4), 3, "a positional parameter should not bind to a forced named parameter");