System error

error:  Can't call method "prepare" on an undefined value at /opt/perlapache/htdocs/mason/bricolage/comps/smetimes/utils/comment_box.html line 92.
context: 
... 
88:  </style>
89:  <%perl>
90:  use UtilsDB;
91:  my $dbh_ro = &UtilsDB::db_connect(DB_NAME=>'bric',DB_HOST=>&Conf::RO_DB_POOL,DB_PASS=>&Conf::BRIC_DB_PASS);
92:  my $sth = $dbh_ro->prepare("select msg_id from smetimes.discussion_master where story_id=$str_id and parent_msg_id =0 and status = 'APPROVED' order by msg_id desc ");
93:  $sth->execute();
94:  </%perl>
95:  <table bgcolor="#ffffff" width="100%">
96:  <tr><td>
... 
code stack:  /opt/perlapache/htdocs/mason/bricolage/comps/smetimes/utils/comment_box.html:92
/usr/local/bricolage/data/burn/stage/oc_1027/smetimes/news/global-business/2012/Dec/15/us-industrial-production-up-in-november6278065.html:287
raw error






























Can't call method "prepare" on an undefined value at /opt/perlapache/htdocs/mason/bricolage/comps/smetimes/utils/comment_box.html line 92.


Trace begun at /usr/share/perl5/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Can\'t call method "prepare" on an undefined value at /opt/perlapache/htdocs/mason/bricolage/comps/smetimes/utils/comment_box.html line 92.^J') called at /opt/perlapache/htdocs/mason/bricolage/comps/smetimes/utils/comment_box.html line 92
HTML::Mason::Commands::__ANON__('str_id', 85437) called at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xac77c3c)', 'str_id', 85437) called at /usr/share/perl5/HTML/Mason/Request.pm line 1251
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1245
HTML::Mason::Request::comp(undef, undef, 'str_id', 85437) called at /usr/local/bricolage/data/burn/stage/oc_1027/smetimes/news/global-business/2012/Dec/15/us-industrial-production-up-in-november6278065.html line 287
HTML::Mason::Commands::__ANON__ at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xac916f0)') called at /usr/share/perl5/HTML/Mason/Request.pm line 1246
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1245
HTML::Mason::Request::comp(undef, undef, undef) called at /usr/share/perl5/HTML/Mason/Request.pm line 459
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 459
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 411
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0xabf6790)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 165
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0xabf6790)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 832
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x95dbe9c)', 'Apache=SCALAR(0xab02608)') called at (eval 45) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache=SCALAR(0xab02608)') called at /dev/null line 0
eval {...} at /dev/null line 0