And there's also Devel::SmallProf, which will profile at the line (as opposed to the function) level. This is good for banging away at the pig you found with Devel::DProf