Fix for older/newer? perl version