System error

error:  Can't connect to sql server. Reason: Too many connections at /opt/perl-5.8.8/lib/site_perl/5.8.8/x86_64-linux-thread-multi/HKMDB/User.pm line 172.
context: 
... 
168:  if (!$ENV{'MOD_PERL'}) {
169:  require DBI;
170:  }
171:  #$dbh = DBI -> connect("DBI:mysql:phpbb_db:localhost", "root", "")
172:  $dbh = DBI -> connect("DBI:mysql:phpbb3:localhost", "root", "")
173:  or die "Can't connect to sql server. Reason: $DBI::errstr";
174: 
175:  if (!$ENV{'MOD_PERL'}) {
176:  $dbh->{'Warn'} = 0;
... 
code stack:  /opt/perl-5.8.8/lib/site_perl/5.8.8/x86_64-linux-thread-multi/HKMDB/User.pm:172
/opt/perl-5.8.8/lib/site_perl/5.8.8/x86_64-linux-thread-multi/HKMDB/User.pm:185
/opt/perl-5.8.8/lib/site_perl/5.8.8/x86_64-linux-thread-multi/HKMDB/User.pm:298
/var/www/db/common/navbar.mhtml:213
/var/www/db/common/navbar.mhtml:49
/var/www/db/movies/autohandler:23
/var/www/db/autohandler:2
raw error






























Can't connect to sql server.  Reason: Too many connections at /opt/perl-5.8.8/lib/site_perl/5.8.8/x86_64-linux-thread-multi/HKMDB/User.pm line 172.


Trace begun at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Exceptions.pm line 125
HTML::Mason::Exceptions::rethrow_exception('Can\'t connect to sql server.  Reason: Too many connections at /opt/perl-5.8.8/lib/site_perl/5.8.8/x86_64-linux-thread-multi/HKMDB/User.pm line 172.^J') called at /opt/perl-5.8.8/lib/site_perl/5.8.8/x86_64-linux-thread-multi/HKMDB/User.pm line 172
HKMDB::User::pp_db_connect at /opt/perl-5.8.8/lib/site_perl/5.8.8/x86_64-linux-thread-multi/HKMDB/User.pm line 185
HKMDB::User::ck_phpbb_group(undef, 6) called at /opt/perl-5.8.8/lib/site_perl/5.8.8/x86_64-linux-thread-multi/HKMDB/User.pm line 298
HKMDB::User::is_editor('HKMDB::User=HASH(0x7fed6ac1bf50)') called at /var/www/db/common/navbar.mhtml line 213
HTML::Mason::Commands::__ANON__('id', 5433, 'display_set', 'big5') called at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::Subcomponent=HASH(0x7fed6ac19200)', 'id', 5433, 'display_set', 'big5') called at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Request.pm line 1302
eval {...} at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, 'id', 5433, 'display_set', 'big5') called at /var/www/db/common/navbar.mhtml line 49
HTML::Mason::Commands::__ANON__('mode', 'movie', 'id', 5433, 'display_set', 'big5') called at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7fed6ac192a0)', 'mode', 'movie', 'id', 5433, 'display_set', 'big5') called at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Request.pm line 1302
eval {...} at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, 'mode', 'movie', 'id', 5433, 'display_set', 'big5') called at /var/www/db/movies/autohandler line 23
HTML::Mason::Commands::__ANON__('image_id', 319831, 'display_set', 'big5', 'id', 5433, 'display_set', 'big5', 'image_id', 319831, 'id', 5433) called at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x2f23870)', 'image_id', 319831, 'display_set', 'big5', 'id', 5433, 'display_set', 'big5', 'image_id', 319831, 'id', 5433) called at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Request.pm line 1302
eval {...} at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, undef, 'image_id', 319831, 'display_set', 'big5', 'id', 5433, 'display_set', 'big5', 'image_id', 319831, 'id', 5433) called at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Request.pm line 955
HTML::Mason::Request::call_next('HTML::Mason::Request::ApacheHandler=HASH(0x25070c0)', 'display_set', 'big5', 'image_id', 319831, 'id', 5433) called at /var/www/db/autohandler line 2
HTML::Mason::Commands::__ANON__('image_id', 319831, 'display_set', 'big5', 'id', 5433) called at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7fed6abfdfd0)', 'image_id', 319831, 'display_set', 'big5', 'id', 5433) called at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Request.pm line 1297
eval {...} at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, undef, 'image_id', 319831, 'display_set', 'big5', 'id', 5433) called at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Request.pm line 481
eval {...} at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Request.pm line 481
eval {...} at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/Request.pm line 433
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x25070c0)') called at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x25070c0)') called at /opt/perl-5.8.8/lib/site_perl/5.8.8/HTML/Mason/ApacheHandler.pm line 825
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x24d76a0)', 'Apache2::RequestRec=SCALAR(0x24c15b0)') called at (eval 30) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x24c15b0)') called at -e line 0
eval {...} at -e line 0