sub r{@_[0..$#_]=reverse@_}; @a=('a'..'f'); r @a; print @a; #### sub r{@_=reverse@_}; @a=('a'..'f'); r @a; print @a;