|No such thing as a small change|
There's one thing that jumps out at me that totally avoids dealing with the broken code you gave us to look at (which can't be the same code you're using to get the results you mentioned): In a persistent process such as mod_perl, you're going to suffer from the Monday Morning bug; the database connection eventually grows stale, the handle is left holding onto a dead line, and you will keep trying to use it. This is the problem that DBIx::Connector is designed to fix. Or a little less conveniently (imo), DBI's connect_cached() method.
This probably has nothing to do with the problem you described as, "...when i start through mod_perl in my table 1 is only 1 query the last one.", but it will save you posting a second question in a few days. ;)