«
»

Perl MySQL Örnekleri

Aşağıda perl ile mysql sunucusundan bilgi çekmeye ve yazmaya yarayan kod bulunmaktadır.

Aşağıdaki örneği apache+perl yüklü bir sunucuda çalıştırabilirsiniz. Veya linux veya unix shell inden ” root@local>>; perl dosya.pl ” komutuyla konsoldan çalıştırabilirsiniz.

Örnek :

#!/usr/bin/perl
use strict;
use DBI();

# tanimlamalar
my $dbname = "taner_db";
my $dbhost = "localhost";
my $dbuser = "root";
my $dbpass = "parola";
my $connString = "DBI:mysql:database=$dbname;host=$dbhost";
my $conn = DBI->connect($connString,$dbuser,$dbpass,{RaiseError => 1 });

## Burada tanimalamalar yapiliyor.
my $rs = $conn->prepare("select * from kisiler");
if (!$rs->execute) {
 die "Hata : " . $rs->errstr ."\n";
}

# dongu basliyor
while(my $ref = $rs->fetchrow_hashref()) {
 print "id= $ref->{‘id’}, name = $ref->{‘adi’}\n";
}

####### server info#
print $conn->{‘mysql_serverinfo’} . "\n";

####### insert ornegi #
$conn->do("insert into kisiler values (6,’Kemal’)");
$rs->finish();
$conn->disconnect();

 

Son Aramalar:

Be Sociable, Share!

Diğer Alakalı Sayfalar:

  1. VB6 MySQL Örnekleri
  2. Vb.Net MySQL Örnekleri

Etiketler: mysql örnekleri, perl

Bu yazı Cuma, 11 Haziran 2010, 17:34 tarihinde Örnek Kodlar kategorisi altında yayınlandı. Bu yazıya yapılacak yorumlardan haberdar olmak için RSS 2.0 beslemesini kullanabilirsiniz. Yorum yapma ve pingleme kapalı.

Yorum yapma kapalı.