should work properly under threaded perl now