I am relatively certain that the leak occurs somewhere within these lines of code, however the code for all packages being used is far to large to post
# create instance of BEAST_UPDATE module
my $bdbi = new BEAST_UPDATE();
$bdbi->init('bes', $blast_type, $blast_db, 'all', "");
my $connector = new AAFCBLAST;
for (my $currjob = $startjob; $currjob <= $endjob; $currjob++) {
$connector->{'job_id'} = $currjob;
my $query_ids = $connector->getJobQueryIds();
foreach my $query_id (split ",", $query_ids) {
print "Getting query result: $query_id of job: ".$connector->{'job
+_id'}."\n";
# print $query_id. "\n";;
my $result = $connector->getQueryResult($query_id);
my $FH;
open $FH, "<", \$result;
my $searchio = new Bio::SearchIO(-format => "blast",
-fh => $FH);
while (my $o_blast = $searchio->next_result()) {
my $clone_id = $o_blast->query_name();
my $statement = $bdbi->form_push_SQL ($o_blast, $clone_id, 5);
print $statement . "\n";
#$bdbi->update($statement);
}
$FH->close;
}
}
thanks for the help,
Wayne
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.