fix for older perls