>perl -E"sub f{say qw/s l v/[wantarray//'2']};+f;$a=+f;@a=+f"
v
s
l