System error

error:  Can't call method "prepare" on unblessed reference at /var/www/html_test/lib/areas_by_state.mas line 30.
context: 
... 
26: 
27:  my $sql="SELECT start_zip_code, end_zip_code, description, id " .
28:  "FROM area, area_zip WHERE id = area_id AND state=? " .
29:  "ORDER BY start_zip_code";
30:  my $sth=$dbh->prepare($sql)
31:  or die " Cannot prepare statement \'$sql\': " . $dbh->errstr();
32:  $sth->execute($state)
33:  or die " Cannot execute statement \'$sql\': " . $dbh->errstr();
34:  </%init>
... 
code stack:  /var/www/html_test/lib/areas_by_state.mas:30
/var/www/html_test/broker/broker_form.mas:144
/var/www/html_test/broker/broker_reg.html:46
/var/www/html_test/broker/autohandler:109
raw error






























Can't call method "prepare" on unblessed reference at /var/www/html_test/lib/areas_by_state.mas line 30.


Trace begun at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Can\'t call method "prepare" on unblessed reference at /var/www/html_test/lib/areas_by_state.mas line 30.^J') called at /var/www/html_test/lib/areas_by_state.mas line 30
HTML::Mason::Commands::__ANON__ at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xbf75408)') called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 1256
eval {...} at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 1250
HTML::Mason::Request::comp(undef, undef) called at /var/www/html_test/broker/broker_form.mas line 144
HTML::Mason::Commands::__ANON__('submit_to', 'new_user_submit.html') called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xbfb63fc)', 'submit_to', 'new_user_submit.html') called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 1256
eval {...} at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 1250
HTML::Mason::Request::comp(undef, undef, 'submit_to', 'new_user_submit.html') called at /var/www/html_test/broker/broker_reg.html line 46
HTML::Mason::Commands::__ANON__ at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xbf370c4)') called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 1256
eval {...} at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 1250
HTML::Mason::Request::comp(undef, undef) called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 915
HTML::Mason::Request::call_next('HTML::Mason::Request::ApacheHandler=HASH(0xbf88c04)') called at /var/www/html_test/broker/autohandler line 109
HTML::Mason::Commands::__ANON__ at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0xbf3c374)') called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 1251
eval {...} at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 1250
HTML::Mason::Request::comp(undef, undef, undef) called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 460
eval {...} at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 460
eval {...} at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/Request.pm line 412
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0xbf88c04)') called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0xbf88c04)') called at /usr/lib/perl5/site_perl/5.8.5/HTML/Mason/ApacheHandler.pm line 826
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0xbceec9c)', 'Apache2::RequestRec=SCALAR(0xbfb4a9c)') called at (eval 205) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0xbfb4a9c)') called at -e line 0
eval {...} at -e line 0