milist;

aku lihat source sebuah script perl
sub Do_SQL{
  eval{
    $sth = $dbh->prepare($SQL);
  }; # End of eval

  # Check for errors.
  if($@){<--------------------- Apa arti command ini
    $dbh->disconnect;
    print "Content-type: text/html\n\n";
    print "An ERROR occurred! $@\n<P>";
    exit;
  } else {
    $sth->execute;
  } # End of if..else
  return ($sth);

 mohon masuka dari milist
 
  
makasih sebelumnya
-- 
Prt
"Belajar tidak mengenal tempat dan waktu ....
 demikian juga dengan tidur....:)"n



--------------------------------------------------------------------------------
Utk berhenti langganan, kirim email ke [EMAIL PROTECTED]
Informasi arsip di http://www.linux.or.id/milis.php3
Pengelola dapat dihubungi lewat [EMAIL PROTECTED]

Kirim email ke