in reply to Re^2: Can I rewrite this code?
in thread Can I rewrite this code?

The + in front of shift tells Perl that you want the function shift and not a string "shift" as the hash key.