nicht $shift sondern nur shift!

würdest du use strict und use warnings benutzen würde dich der compiler vor undeklarierten Variablen und ähnlichen Fehlern bewahren.