You could get array FETCH()es that did precisely what you want by using Tie::Array. In fact, if you used @ISA = ('Tie::StdArray'), it wouldn't even be very much work — I mean for this idea to help with changing the behavior of a negative index operation.