in reply to passing an array without a name to pop()

Your last one was close. print pop @{ [2,4,6] };

In Section Seekers of Perl Wisdom