System error

error:  cannot connect to dbi:mysql:AAP at /usr/local/lib/site_perl/DataControl.pm line 159.
context: 
... 
155:  sub connectAsRoot {
156: 
157:  # DEPRICATED #
158:  #returns a handle to the cairn Database connected as Root
159:  my $pkg = shift;
160:  my $request = shift; #apache request object
161: 
162:  my $pwd = $request->headers_in()->{ Host } =~ /www\.cloud-computing\.rocks/ ? $prodRoot : $alphaRoot;
163:  my $dbh = DBI->connect( "DBI:mysql:database=cairn;host=192.168.10.10", 'root', $pwd) or die "cannot connect";
... 
code stack:  /usr/local/lib/site_perl/DataControl.pm:159
/home/jim/SANDBOX/AAP/autohandler:91
raw error






























cannot connect to dbi:mysql:AAP at /usr/local/lib/site_perl/DataControl.pm line 159.


Trace begun at /usr/share/perl5/HTML/Mason/Exceptions.pm line 125
HTML::Mason::Exceptions::rethrow_exception('cannot connect to dbi:mysql:AAP at /usr/local/lib/site_perl/DataControl.pm line 159.^J') called at /usr/local/lib/site_perl/DataControl.pm line 159
DataControl::connectToDB('DataControl', 'aap') called at /home/jim/SANDBOX/AAP/autohandler line 91
HTML::Mason::Commands::__ANON__ at /usr/share/perl5/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x5645e9d7ce60)') called at /usr/share/perl5/HTML/Mason/Request.pm line 1300
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 1292
HTML::Mason::Request::comp(undef, undef, undef) called at /usr/share/perl5/HTML/Mason/Request.pm line 481
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 481
eval {...} at /usr/share/perl5/HTML/Mason/Request.pm line 433
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x5645ea005008)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 165
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x5645ea005008)') called at /usr/share/perl5/HTML/Mason/ApacheHandler.pm line 831
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x5645e8480c88)', 'Apache2::RequestRec=SCALAR(0x5645e9fcf4b8)') called at (eval 26) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x5645e9fcf4b8)') called at -e line 0
eval {...} at -e line 0