Make it work on perls less than v5.8.3 again