System error

error:  DBD::mysql::db selectall_arrayref failed: Table './ccd/u_contr' is marked as crashed and should be repaired at /home/classical-composers/public_html/www/mason/u_contr.mhtml line 7.
context: 
... 
3:  </%args>
4:  <%init>
5:  return if $m->cache_self( key => $id, expires_in => '3 days' );
6:  </%init>
7:  % my $contrs = $dbh->selectall_arrayref("SELECT users.id, users.username, users.status FROM users, u_contr WHERE u_contr.user = users.id AND u_contr.comp = ? ORDER BY users.username" , undef, $id);
8:  % if ($#$contrs >= 0) {
9:  <hr/>
10:  <div>
11:  Contributions by:
... 
code stack:  /home/classical-composers/public_html/www/mason/u_contr.mhtml:7
/usr/share/perl5/HTML/Mason/Request.pm:848
/home/classical-composers/public_html/www/mason/u_contr.mhtml:5
/home/classical-composers/public_html/www/mason/comp.mhtml:150
/home/classical-composers/public_html/www/mason/index.html:872
raw error






























DBD::mysql::db selectall_arrayref failed: Table './ccd/u_contr' is marked as crashed and should be repaired at /home/classical-composers/public_html/www/mason/u_contr.mhtml line 7.


Trace begun at /usr/share/perl5/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('DBD::mysql::db selectall_arrayref failed: Table \'./ccd/u_contr\' is marked as crashed and should be repaired at /home/classical-composers/public_html/www/mason/u_contr.mhtml line 7.^J') called at /home/classical-composers/public_html/www/mason/u_contr.mhtml line 7
HTML::Mason::Commands::__ANON__('id', 'bruneau') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f6066ab05d8)', 'id', 'bruneau') called at /usr/share/perl5/HTML/Mason/Request.pm line 919
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 918
HTML::Mason::Request::call_self('HTML::Mason::Request::ApacheHandler=HASH(0x7f6066c0dca8)', 'SCALAR(0x7f6064a7cbf8)', 'ARRAY(0x7f6064a7cc58)', 'SCALAR(0x7f6064a7cc28)', 'CACHE_SELF') called at /usr/share/perl5/HTML/Mason/Request.pm line 848
HTML::Mason::Request::cache_self('HTML::Mason::Request::ApacheHandler=HASH(0x7f6066c0dca8)', 'key', 'bruneau', 'expires_in', '3 days') called at /home/classical-composers/public_html/www/mason/u_contr.mhtml line 5
HTML::Mason::Commands::__ANON__('id', 'bruneau') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f6066ab05d8)', 'id', 'bruneau') called at /usr/share/perl5/HTML/Mason/Request.pm line 1302
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, 'id', 'bruneau') called at /home/classical-composers/public_html/www/mason/comp.mhtml line 150
HTML::Mason::Commands::__ANON__('data', 'ARRAY(0x7f6065581f90)', 'id', 'bruneau', 'rest', 'ARRAY(0x7f6066c04e38)', 'comment_error', '', 'user', '', 'logged_in', 0, 'sid', '---', 'google_maps_div', '', 'smpstring', '', '_id', 'bruneau', '_type', 'comp') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f6066363f68)', 'data', 'ARRAY(0x7f6065581f90)', 'id', 'bruneau', 'rest', 'ARRAY(0x7f6066c04e38)', 'comment_error', '', 'user', '', 'logged_in', 0, 'sid', '---', 'google_maps_div', '', 'smpstring', '', '_id', 'bruneau', '_type', 'comp') called at /usr/share/perl5/HTML/Mason/Request.pm line 1302
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, 'data', 'ARRAY(0x7f6065581f90)', 'id', 'bruneau', 'rest', 'ARRAY(0x7f6066c04e38)', 'comment_error', '', 'user', '', 'logged_in', 0, 'sid', '---', 'google_maps_div', '', 'smpstring', '', '_id', 'bruneau', '_type', 'comp') called at /home/classical-composers/public_html/www/mason/index.html line 872
HTML::Mason::Commands::__ANON__('_id', 'bruneau', '_type', 'comp') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f606697dd30)', '_id', 'bruneau', '_type', 'comp') called at /usr/share/perl5/HTML/Mason/Request.pm line 1297
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, undef, '_id', 'bruneau', '_type', 'comp') called at /usr/share/perl5/HTML/Mason/Request.pm line 481
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 481
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 433
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x7f6066c0dca8)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 165
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x7f6066c0dca8)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 831
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x7f6065b68860)', 'Apache2::RequestRec=SCALAR(0x7f6064c0a700)') called at (eval 34) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x7f6064c0a700)') called at -e line 0
eval {...} at -e line 0