System error

error:  Can't call method "prepare" on an undefined value 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/seller/buyer_form.mas:156
/var/www/html_test/seller/buyer_reg.html:95
/var/www/html_test/seller/autohandler:64
raw error






























Can't call method "prepare" on an undefined value 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 an undefined value 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(0xcf2e240)') 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/seller/buyer_form.mas line 156
HTML::Mason::Commands::__ANON__('submit_to', 'new_buyer_submit.html', 'return_to', '/seller/buyer_reg.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(0xcf6f490)', 'submit_to', 'new_buyer_submit.html', 'return_to', '/seller/buyer_reg.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_buyer_submit.html', 'return_to', '/seller/buyer_reg.html') called at /var/www/html_test/seller/buyer_reg.html line 95
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(0xcf718b8)') 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(0xd289f28)') called at /var/www/html_test/seller/autohandler line 64
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(0xcf6df80)') 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(0xd289f28)') 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(0xd289f28)') 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(0xcccb19c)', 'Apache2::RequestRec=SCALAR(0xd259400)') called at (eval 205) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0xd259400)') called at -e line 0
eval {...} at -e line 0