sub reversi { my (@array) = @_; print resverse sort(@array); } #### sub reversi { my (@array) = @_; print reverse sort(@array); }