"Yusron Hilmy" <[EMAIL PROTECTED]> wrote:
> "Premature end of script headers : /home/httpd/cgi-bin/nyoba.cgi"
>
Pesan di browsernya gimana ??? Internal Server Error ??? Kalo ini sih
biasanya header response-nya ga tertulis lengkap...
Pastikan udah ada : Content-type: text/html \r\n\r\n pada awal sekali
sebelum mengeluarkan output.
Kalo ternyata udah ada biasanya ini karena program kamu waktu run tidak
terminate dengan baik, coba deh jalanin program kamu dari command line.
Sementara misalnya kamu melakukan inputan ke database, pake text static
dulu. Kalo di command line udah jalan dengan bagus baru dicoba di web
server.
BTW, sebenarnya pake DBI aja udah cukup koq untuk akses ke MySQL.
Moga-moga membantu.
pesan di browsernya, Internal Server Error....header responsenya sebelumnya
juga udah ada, yaitu Content-type: text/html\r\n\r\n....
tapi hasilnya tetap error....
saya sudah coba menjalankan programnya di command line dengan perintah perl
nyoba.cgi....tapi keluar outputnya seperti di bawah ini :
"Segmentation fault (core dumped)"
kira2 apanya ya yang salah ?...
statement sql-nya sebagai berikut (spt-nya sih nggak ada yang salah dgn
statement ini ) :
#!/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\r\n\r\n";
print "<html>\n";
print "<head>\n";
print "<title>Hasil</title>\n";
print "</head>\n";
print "<body>\n";
print "<br>\n";
foreach (@row) {
print "$_\n";
print "<br>";
}
print "</body>\n";
print "</html>\n";
}
apa ada yang salah/kurang dengan statement di atas ?......
apakah ada yang salah dengan setting-an httpdnya ?...
sori kalo email saya kepanjangan...
terima kasih
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]
