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(0xd089298)') 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(0xd069da0)', '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(0xd0229bc)') 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(0xd025a40)') 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(0xd025a58)') 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(0xd025a40)') 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(0xd025a40)') 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(0xcd58054)', 'Apache2::RequestRec=SCALAR(0xd0115d8)') called at (eval 205) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0xd0115d8)') called at -e line 0
eval {...} at -e line 0