Profiling 

$ DBI_PROFILE=2 ./dbi.pl

# ... Normal program output here ...

DBI::Profile: 0.005237s (16 calls) dbi.pl @ 2008-06-10 16:42:25
'' =>
    0.003389s / 11 = 0.000308s avg
    (first 0.000011s, min 0.000002s, max 0.003297s)
'SELECT * FROM deals LIMIT 1' =>
    0.001848s / 5 = 0.000370s avg
    (first 0.000089s, min 0.000011s, max 0.001563s)