support older perls.