System error

error:  Can't call method "prepare" on unblessed reference at /var/www/htdocs/products/dhandler line 45.
context: 
... 
41:  my $farg = $m->dhandler_arg;
42:  $farg =~ s/([^\.]+)\.html/$1/;
43:  my $dbh = DBI->connect( $dbdsn, $dbuser, $dbpass);
44:  $dbh->{LongReadLen} = 16384;
45:  my $sth = $dbh->prepare( "select prodName from prodTbl where prodSKU = '$farg'" );
46:  $sth->execute;
47:  my $row = $sth->fetchrow_hashref;
48:  my $ptitle;
49:  $ptitle = 'INDEX' unless($ptitle = $row->{'prodName'});
... 
code stack:  /var/www/htdocs/products/dhandler:45
/usr/local/libdata/perl5/site_perl/HTML/Mason/Request.pm:741
/usr/local/apache/mason/obj/products/dhandler:16
/var/www/htdocs/autohandler:32
/usr/local/libdata/perl5/site_perl/HTML/Mason/Request.pm:745
/usr/local/apache/mason/obj/autohandler:32
/var/www/htdocs/syshandler:42
raw error






























Can't call method "prepare" on unblessed reference at /var/www/htdocs/products/dhandler line 45.


Trace begun at /usr/local/libdata/perl5/site_perl/HTML/Mason/Exceptions.pm line 131
HTML::Mason::Exceptions::rethrow_exception('Can\'t call method "prepare" on unblessed reference at /var/www/htdocs/products/dhandler line 45.^J') called at /var/www/htdocs/products/dhandler line 45
HTML::Mason::Commands::__ANON__ at /usr/local/libdata/perl5/site_perl/HTML/Mason/Component.pm line 145
HTML::Mason::Component::dynamic_subs_init('HTML::Mason::Component::FileBased=HASH(0x5d061c)') called at /usr/local/libdata/perl5/site_perl/HTML/Mason/Request.pm line 741
HTML::Mason::Request::call_dynamic('HTML::Mason::Request::ApacheHandler=HASH(0xa554fc)', 'method_title') called at /usr/local/apache/mason/obj/products/dhandler line 16
HTML::Mason::Commands::__ANON__ at /usr/local/libdata/perl5/site_perl/HTML/Mason/Component.pm line 134
HTML::Mason::Component::run('HTML::Mason::Component::Subcomponent=HASH(0x5cedc8)') called at /usr/local/libdata/perl5/site_perl/HTML/Mason/Request.pm line 1062
eval {...}('HTML::Mason::Component::Subcomponent=HASH(0x5cedc8)') called at /usr/local/libdata/perl5/site_perl/HTML/Mason/Request.pm line 1056
HTML::Mason::Request::comp(undef, undef) called at /var/www/htdocs/autohandler line 32
HTML::Mason::Commands::__ANON__ at /usr/local/libdata/perl5/site_perl/HTML/Mason/Component.pm line 156
HTML::Mason::Component::run_dynamic_sub('HTML::Mason::Component::FileBased=HASH(0x600c48)', 'main') called at /usr/local/libdata/perl5/site_perl/HTML/Mason/Request.pm line 745
HTML::Mason::Request::call_dynamic('HTML::Mason::Request::ApacheHandler=HASH(0xa554fc)', 'main') called at /usr/local/apache/mason/obj/autohandler line 32
HTML::Mason::Commands::__ANON__ at /usr/local/libdata/perl5/site_perl/HTML/Mason/Component.pm line 134
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x600c48)') called at /usr/local/libdata/perl5/site_perl/HTML/Mason/Request.pm line 1062
eval {...}('HTML::Mason::Component::FileBased=HASH(0x600c48)') called at /usr/local/libdata/perl5/site_perl/HTML/Mason/Request.pm line 1056
HTML::Mason::Request::comp(undef, undef) called at /usr/local/libdata/perl5/site_perl/HTML/Mason/Request.pm line 752
HTML::Mason::Request::call_next('HTML::Mason::Request::ApacheHandler=HASH(0xa554fc)') called at /var/www/htdocs/syshandler line 42
HTML::Mason::Commands::__ANON__ at /usr/local/libdata/perl5/site_perl/HTML/Mason/Component.pm line 134
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x5e5ba8)') called at /usr/local/libdata/perl5/site_perl/HTML/Mason/Request.pm line 1057
eval {...}('HTML::Mason::Component::FileBased=HASH(0x5e5ba8)') called at /usr/local/libdata/perl5/site_perl/HTML/Mason/Request.pm line 1056
HTML::Mason::Request::comp(undef, undef, undef) called at /usr/local/libdata/perl5/site_perl/HTML/Mason/Request.pm line 331
eval {...}(undef, undef, undef) called at /usr/local/libdata/perl5/site_perl/HTML/Mason/Request.pm line 331
eval {...}(undef, undef, undef) called at /usr/local/libdata/perl5/site_perl/HTML/Mason/Request.pm line 290
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0xa554fc)') called at /usr/local/libdata/perl5/site_perl/HTML/Mason/ApacheHandler.pm line 134
eval {...}('HTML::Mason::Request::ApacheHandler=HASH(0xa554fc)') called at /usr/local/libdata/perl5/site_perl/HTML/Mason/ApacheHandler.pm line 134
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0xa554fc)') called at /usr/local/libdata/perl5/site_perl/HTML/Mason/ApacheHandler.pm line 792
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x5d055c)', 'Apache=SCALAR(0x87427c)') called at (eval 86) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache=SCALAR(0x87427c)') called at /dev/null line 0
eval {...}('HTML::Mason::ApacheHandler', 'Apache=SCALAR(0x87427c)') called at /dev/null line 0