sub indexArray2 { while(@_){$_[0] eq pop && return @_-1} }