On a side note, as of Perl v5.14, shift, unshift, push, and pop can now take a reference to an unblessed array as their first argument, which will be automatically dereferenced, although it is considered experimental.