in reply to Re: Re: Optimization/Efficiency Question
in thread Optimization/Efficiency Question

I am not sure if this is a typo or not but you may want to look at this bit of code ... 
foreach my $audit (keys(%$audits))
{
     
    $query = q{
         ...
    );
                         
    my $sth = $dbh->prepare($query);
    sth->execute($audit);
    ...

[download]
It looks like you are setting up to run $query but you execute $audit. Maybe that is what you intended, but maybe its a typo.

Well this stinks. dws has just pointed out that $audit is the query's parameters and not a typo.

Plankton: 1% Evil, 99% Hot Gas.

In Section Seekers of Perl Wisdom