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/user.mhtml line 45.
context: 
... 
41:  $main .= h2({class => 'section'}, "MusicAtlas picture uploads by this user") . ul($atlaspictures) if $atlaspictures;
42: 
43:  # collect user contributions other than comments
44:  my $contr = '';
45:  foreach (@{$dbh->selectall_arrayref("SELECT comp.comp, comp.fnm, comp.snm FROM comp, u_contr WHERE u_contr.comp = comp.comp AND u_contr.user = ? ORDER BY comp.snm" , undef, $id)}) {
46:  my $_snm = $_->[2];
47:  $_snm =~ s/\|.*//g;
48:  $contr .= li(a({href=>"/comp/$_->[0]"}, "$_->[1] <strong>$_snm</strong>"));
49:  }
... 
code stack:  /home/classical-composers/public_html/www/mason/user.mhtml:45
/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/user.mhtml line 45.


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/user.mhtml line 45.^J') called at /home/classical-composers/public_html/www/mason/user.mhtml line 45
HTML::Mason::Commands::__ANON__('data', 'ARRAY(0x7f6065842800)', 'id', 1130, 'rest', 'ARRAY(0x7f60655e9318)', 'comment_error', '', 'user', '', 'logged_in', 0, 'sid', '---', 'google_maps_div', '', 'smpstring', '', '_id', 1130, '_type', 'user') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f60658fcfe0)', 'data', 'ARRAY(0x7f6065842800)', 'id', 1130, 'rest', 'ARRAY(0x7f60655e9318)', 'comment_error', '', 'user', '', 'logged_in', 0, 'sid', '---', 'google_maps_div', '', 'smpstring', '', '_id', 1130, '_type', 'user') 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(0x7f6065842800)', 'id', 1130, 'rest', 'ARRAY(0x7f60655e9318)', 'comment_error', '', 'user', '', 'logged_in', 0, 'sid', '---', 'google_maps_div', '', 'smpstring', '', '_id', 1130, '_type', 'user') called at /home/classical-composers/public_html/www/mason/index.html line 872
HTML::Mason::Commands::__ANON__('_id', 1130, '_type', 'user') called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f60655970b0)', '_id', 1130, '_type', 'user') 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', 1130, '_type', 'user') 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(0x7f6065558500)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 165
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x7f6065558500)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 831
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x7f6065555360)', 'Apache2::RequestRec=SCALAR(0x7f6064c0a670)') called at (eval 34) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x7f6064c0a670)') called at -e line 0
eval {...} at -e line 0