System error

error:  Can't call method "disconnect" on an undefined value at /var/www/weblog/index.html line 303.
context: 
... 
299:  print '<li onClick="fill(\''.$genename->[0].'\');">'.$genename->[0].',&nbsp&nbsp<bold>'.$genename->[1].'</bold>,
300:  &nbsp&nbsp<em>'.$genename->[2].'</em></li>';}
301:  }
302:  }
303:  $dbh->disconnect;
304:  </%perl>
305:  }CODE
306: 
307:  I hope this helps anybody out there trying to implement autocomplete. Since this post is way long, I didn't include the CSS that is used to format the autocomplete results. You can refer to the link I provided above for CSS details. My only suggestion would be in .suggestionsBox make "position:" absolute if you encounter problems with default settings.
... 
code stack:  /var/www/weblog/index.html:303
raw error






























Can't call method "disconnect" on an undefined value at /var/www/weblog/index.html line 303.


Trace begun at /usr/local/share/perl/5.10.0/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Can\'t call method "disconnect" on an undefined value at /var/www/weblog/index.html line 303.^J') called at /var/www/weblog/index.html line 303
HTML::Mason::Commands::__ANON__ at /usr/local/share/perl/5.10.0/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xb8e31240)') called at /usr/local/share/perl/5.10.0/HTML/Mason/Request.pm line 1279
eval {...} at /usr/local/share/perl/5.10.0/HTML/Mason/Request.pm line 1274
HTML::Mason::Request::comp(undef, undef, undef) called at /usr/local/share/perl/5.10.0/HTML/Mason/Request.pm line 473
eval {...} at /usr/local/share/perl/5.10.0/HTML/Mason/Request.pm line 473
eval {...} at /usr/local/share/perl/5.10.0/HTML/Mason/Request.pm line 425
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0xb9488268)') called at /usr/local/share/perl/5.10.0/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0xb9488268)') called at /usr/local/share/perl/5.10.0/HTML/Mason/ApacheHandler.pm line 825
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0xb8c93f10)', 'Apache2::RequestRec=SCALAR(0xb9484b28)') called at (eval 33) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0xb9484b28)') called at -e line 0
eval {...} at -e line 0