say xx(3); # 4 say sub { xx(shift) }->(3); # 4