Mori Akizashi <[EMAIL PROTECTED]> wrote:
Segmentation fault adalah peristiwa "amazing" bagi sebuah aplikasi perl.
mungkin ada beberapa file yang korup dari source msql-mysql. hmm.. mungkin
kita perlu liat source kode dari programnya :)
sorry kalo pendapatku nggak membantu
source code nya seperti ini (sepertinya sih tidak ada yang salah) :
#!/usr/bin/perl -w
use DBI;
my $database = "coba";
my $data_source = "DBI:mysql:$database";
my $username = " ";
my $password = " ";
my $dbh = DBI->connect($data_source, $username, $password)
or die "Can't connect to $data_source: " , DBI->errstr;
my $sth = $dbh->prepare("SELECT * FROM user");
$sth->execute or die "Unable to execute query: $dbh->errstr\n";
chop @row;
@row = $sth->fetchrow_array;
$sth->finish;
my $result = $dbh->disconnect;
sub ResultQuery() {
print "Content-type: text/html\n\n";
print <<"end";
<html>
<head>
<title>Hasil</title>
</head>
<body>
<br>
end
foreach (@row) {
print "$_\n";
print "<br>";
}
print "</body>\n";
print "</html>\n";
}
kemarin saya dapat jawaban dari mas Yusron Hilmy begini :
#!/usr/bin/perl -w
use DBI;
my $database = "coba";
my $data_source = "DBI:mysql:$database";
my $username = "";
my $password = "";
my $dbh = DBI->connect($data_source, $username, $password)
or die "Can't connect to $data_source: " , DBI->errstr;
diganti menjadi :
my $dbh = DBI->connect("DBI:mysql:database=coba;host=localhost", "", "",
{'RaiseError' => 1}) or dst ....;
Kemudian saya ganti, tapi ketika saya eksekusi hasilnya masih sama tuh
error di browsernya "Internal Server Error", dengan error log "Premature end
of script headers : /home/httpd/cgi-bin/nyoba.cgi.
Kemudian di command linenya hasilnya "Segmentation fault (core dumped).
noven
-------------
____________________________________________________________________
Get free email and a permanent address at http://www.netaddress.com/?N=1
--------------------------------------------------------------------------------
Utk berhenti langganan, kirim email ke [EMAIL PROTECTED]
Informasi arsip di http://www.linux.or.id/milis.php3
Pengelola dapat dihubungi lewat [EMAIL PROTECTED]
