use feature 'signatures';
sub foo ($x, $y = 1, @r) { }
sub ($, %) {}