System error

error:  Too many connections at /mnt/intermedia/www/mason/comps/shared/db/getDBH line 52.
context: 
... 
48:  $m->out("\n<!-- topTest: $topTest | callerTest : $callerTest -->\n");
49:  $m->out("\n<!-- getDBH: using database on $host_database -->\n");
50:  }
51:  if(!$dbh){
52:  die $DBI::errstr;
53:  } else {
54:  return $dbh;
55:  }
56:  </%init>
... 
code stack:  /mnt/intermedia/www/mason/comps/shared/db/getDBH:52
/mnt/intermedia/www/mason/comps/firearms/autohandler:36
raw error






























Too many connections at /mnt/intermedia/www/mason/comps/shared/db/getDBH line 52.


Trace begun at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Too many connections at /mnt/intermedia/www/mason/comps/shared/db/getDBH line 52.^J') called at /mnt/intermedia/www/mason/comps/shared/db/getDBH line 52
HTML::Mason::Commands::__ANON__('database_name', 'firearms') called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xab2dfb4)', 'database_name', 'firearms') called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 1257
eval {...} at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 1252
HTML::Mason::Request::comp(undef, undef, 'database_name', 'firearms') called at /mnt/intermedia/www/mason/comps/firearms/autohandler line 36
HTML::Mason::Commands::__ANON__ at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xab2478c)') called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 1257
eval {...} at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 1252
HTML::Mason::Request::comp(undef, undef, undef) called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 466
eval {...} at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 466
eval {...} at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 418
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0xaa5e71c)') called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0xaa5e71c)') called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/ApacheHandler.pm line 826
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x9fe8ba0)', 'Apache2::RequestRec=SCALAR(0x9fe8bac)') called at /mnt/intermedia/www/conf/mason_handler_simple.pl line 39
eval {...} at /mnt/intermedia/www/conf/mason_handler_simple.pl line 39
MyMason::MyApp::handler('Apache2::RequestRec=SCALAR(0x9fe8bac)') called at -e line 0
eval {...} at -e line 0