System error

error:  Can't use string ("Message number 769000 does not e"...) as a HASH ref while "strict refs" in use at /pub/www/db/mhtml/comps/message line 167.
context: 
... 
163:  $ref->{message} = &My::AA::hilite_all($ref->{message},$c{string}{HiLitePREPEND},$c{string}{HiLitePOSTPEND},$FORM->{'i'},@terms);
164: 
165:  if ($ref->{parent} > 0) {
166:  my $reply_ref = &My::mysql::get_message($ref->{forum},$ref->{parent});
167:  my $display_date = &My::Date::mysql_display_date($reply_ref->{date});
168:  my $alt_dir = $c{dir}{mesgdir};
169:  $alt_dir .= "/" . int($ref->{parent}/10000) if $ref->{parent} > 9999;
170:  if ($reply_ref->{login} == 1) { $reply_ref->{author} = "<strong>$reply_ref->{author}</strong>"; }
171:  $in_reply = qq~In Reply to: <a href="$c{page}{m_mpl}?forum=$ref->{forum}&n=$ref->{parent}&highlight=$highlight&search_url=$search_url">
... 
code stack:  /pub/www/db/mhtml/comps/message:167
/pub/www/db/mhtml/m.html:86
raw error






























Can't use string ("Message number 769000 does not e"...) as a HASH ref while "strict refs" in use at /pub/www/db/mhtml/comps/message line 167.


Trace begun at /opt/local/lib/perl5/vendor_perl/5.28/HTML/Mason/Exceptions.pm line 125
HTML::Mason::Exceptions::rethrow_exception('Can\'t use string ("Message number 769000 does not e"...) as a HASH ref while "strict refs" in use at /pub/www/db/mhtml/comps/message line 167.^J') called at /pub/www/db/mhtml/comps/message line 167
HTML::Mason::Commands::__ANON__('ad_link', 't', 'highlight', 'tetsuo', 'is_member', undef, 'FORM', 'HASH(0x7f9e814adf98)', 'FORUM', 'HASH(0x7f9e86931da8)', 'cookies', 'HASH(0x7f9e86931aa8)', 'ref', 'HASH(0x7f9e81f1daa0)', 'search_url', '/cgi/search.mpl?author=tetsuo&user_id=19063&forum=ALL&sortRank=None&sort=date&sortOrder=DESC', 'user', 'HASH(0x7f9e85ad5178)', 'social', 1) called at /opt/local/lib/perl5/vendor_perl/5.28/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f9e8144bde0)', 'ad_link', 't', 'highlight', 'tetsuo', 'is_member', undef, 'FORM', 'HASH(0x7f9e814adf98)', 'FORUM', 'HASH(0x7f9e86931da8)', 'cookies', 'HASH(0x7f9e86931aa8)', 'ref', 'HASH(0x7f9e81f1daa0)', 'search_url', '/cgi/search.mpl?author=tetsuo&user_id=19063&forum=ALL&sortRank=None&sort=date&sortOrder=DESC', 'user', 'HASH(0x7f9e85ad5178)', 'social', 1) called at /opt/local/lib/perl5/vendor_perl/5.28/HTML/Mason/Request.pm line 1302
eval {...} at /opt/local/lib/perl5/vendor_perl/5.28/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, 'ad_link', 't', 'highlight', 'tetsuo', 'is_member', undef, 'FORM', 'HASH(0x7f9e814adf98)', 'FORUM', 'HASH(0x7f9e86931da8)', 'cookies', 'HASH(0x7f9e86931aa8)', 'ref', 'HASH(0x7f9e81f1daa0)', 'search_url', '/cgi/search.mpl?author=tetsuo&user_id=19063&forum=ALL&sortRank=None&sort=date&sortOrder=DESC', 'user', 'HASH(0x7f9e85ad5178)', 'social', 1) called at /pub/www/db/mhtml/m.html line 86
HTML::Mason::Commands::__ANON__('search_url', '/cgi/search.mpl?author=tetsuo&user_id=19063&forum=ALL&sortRank=None&sort=date&sortOrder=DESC', 'r', '', 'forum', 'outside', 'highlight', 'tetsuo', 'n', 769002) called at /opt/local/lib/perl5/vendor_perl/5.28/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x7f9e85a657c8)', 'search_url', '/cgi/search.mpl?author=tetsuo&user_id=19063&forum=ALL&sortRank=None&sort=date&sortOrder=DESC', 'r', '', 'forum', 'outside', 'highlight', 'tetsuo', 'n', 769002) called at /opt/local/lib/perl5/vendor_perl/5.28/HTML/Mason/Request.pm line 1300
eval {...} at /opt/local/lib/perl5/vendor_perl/5.28/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, undef, 'search_url', '/cgi/search.mpl?author=tetsuo&user_id=19063&forum=ALL&sortRank=None&sort=date&sortOrder=DESC', 'r', '', 'forum', 'outside', 'highlight', 'tetsuo', 'n', 769002) called at /opt/local/lib/perl5/vendor_perl/5.28/HTML/Mason/Request.pm line 481
eval {...} at /opt/local/lib/perl5/vendor_perl/5.28/HTML/Mason/Request.pm line 481
eval {...} at /opt/local/lib/perl5/vendor_perl/5.28/HTML/Mason/Request.pm line 433
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x7f9e81f1da40)') called at /opt/local/lib/perl5/vendor_perl/5.28/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x7f9e81f1da40)') called at /opt/local/lib/perl5/vendor_perl/5.28/HTML/Mason/ApacheHandler.pm line 825
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x7f9e8692bf00)', 'Apache2::RequestRec=SCALAR(0x7f9e81f10300)') called at (eval 26) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x7f9e81f10300)') called at -e line 0
eval {...} at -e line 0