Profiling in perl has a big overhead. You can use it to find hot spots on the code, but not to time things.