fix problem fpr perl < 5.6