my $dbh = DBI->connect(...);

##</code><code>##

    my $sth = $dbh->prepare_cached(...);

##</code><code>##

    $sth->execute;
    $sth->finish;