$dbh = DBI->connect("DBI:mysql:$database:$host:$port","$user", "$password",{ PrintError => 0}) || die $DBI::errstr; if ($dbh->do("call error_test_proc(1)")){ printf("Stored procedure execution succeededn");}else{ printf("Error executing stored procedure: MySQL error %d (SQLSTATE %s)n %sn", $dbh->err,$dbh->state,$dbh->errstr); }
Name (required)
email (will not be published) (required)
Website