my (Str $y, Int $x) := ret-test'(5);  # y=>'Smith', x=>1, so OK