If there is not already a module on cpan (which I doubt) you could implement it with Tie::Array .

Overwriting EXTEND () looks like the best approach.

Be warned about the performance loss involved when using tie.

Try searching cpan for other solutions.