Starting with perl version 5.6.1 you can override shift, like you can with other built-ins. As an indication of this prototype("CORE::shift") returns \@ (which seems a little odd considering the default argument... Hmm...)