sub foo {chop(@_=@_)}

##</code><code>##

@a = ('ab','cd','ef');
print chop @a;     # f

print foo(@a);     # b

# the list assignment has the same effect here:
print chop(@a=@a); # b

##</code><code>##

sub foo {chop(@_=reverse @_)}