How to make perl fast enough